Inhaltsverzeichnis
cpShowMessage
Einleitung
Mit diesem Befehl ist es möglich, ein Dialogfenster mit einer Meldung anzeigen zu lassen.
Syntax
| Befehl | cpShowMessage(MessageText); |
|---|---|
| Funktion | Zeigt die Zeichenfolge „MessageText“ in einem Windows Meldungsfenster. |
Codebeispiele
Einfache Zeichenfolge
begin
cpShowMessage('Hallo Cockpit-XP Nutzer.');
end.
Das ist ein einfacher Text, der kaum weiterer Erklärungen Bedarf. Zeichenfolgen werden in einfache Hochkommas eingeschlossen, um sie als Text zu kennzeichnen. Sieht dann so aus:
Zusammengesetzte Zeichenfolge mit Integervariable
var
i : Integer;
begin
i := 2015;
cpShowMessage('Diese Zeilen wurden im Jahr ' + IntToStr(i) + ' erstellt.');
end.
Die Variable ist vom Typ Integer und enthält damit eine Zahl. Damit sie in einer Zeichenfolge nutzbar ist, muss sie mit der Funktion IntToStr() in einen Text um- gewandelt werden. Der Plus-Zeichen ist ein Verkettungsoperator, mit dem die ein- zelnen Zeichenfolgen nacheinander angehängt werden.
Mehrzeilige Meldungen
var
jahr : Integer;
autor : String;
prozent : Extended;
begin
jahr := 2015;
autor := 'slot-xtreme';
prozent := 15.05;
cpShowMessage('Diese Meldung wurde im Jahr ' + IntToStr(jahr) + Chr(10) + Chr(13) +
'von ' + autor + ' erstellt.' + Chr(10) + Chr(13) +
'Die Systemlast lag bei ' + FloatToStr(prozent) + ' %.');
end.
Die Umwandlung der Jahreszahl aus der Variable 'jahr' ist bereits bekannt. Neu kommen die Konvertierung einer Fließkommazahl vom Typ Float/Extended in eine Zeichenfolge und die Funktion Chr() hinzu.
Die Umwandlung der Fließkommazahl entspricht von der Funktion FloatToStr() der Variante, mit der wir die Ganzzahl in Beispiel ein konvertiert haben. Bitte beachten, dass das Dezimaltrennzeichen der Punkt und kein Komma ist. In der Meldung ist das dann vom System korrekt umgewandelt worden.
Die Chr()-Funktion erlaubt das Einfügen beliebiger Zeichen aus dem ASCII-Zeichensatz in eine Zeichenfolge. Die beiden Werte '10' und '13' stehen für ein Zeilenendezeichen und einen Zeilenumbruch. Damit gelangen wir entsprechend in die 2. Zeile der zu generierenden Meldung. Das Ergebnis sieht dann so aus:
Hinweise
Die angezeigte Meldung muss durch Klick auf die Schaltfläche OK bestätigt werden und blockiert bis zu dieser Bestätigung weitere Eingaben von Cockpit-XP. Sie eignet sich daher eher für Entwicklungsarbeit. Während der normalen Nutzung ist es praktikabler, Meldungen mit Cockpit.WriteLog in eine Protokolldatei zu schreiben.
Siehe auch: cpShowMessage2
