Inhaltsverzeichnis
Cockpit.WriteLog
Syntax
Befehl | Cockpit.Writelog |
---|---|
Funktion | Schreibt frei definierbare Einträge mit Zeitstempel in die Datei LogAddOn.txt, wenn die Logging-Funktion eingeschaltet ist |
Typ | String |
Codebeispiel
var Runde : Integer; begin Runde := 15; Cockpit.WriteLog:='Alles lief gut in Runde ' + IntToStr(Runde) + '. Hurra.'; end.
Obiger Code schreibt die Information in die Datei LogAddOn.txt\
[20.03.2015 13:58:32] Alles lief gut in Runde 15. Hurra.
Hinweis
Das Datum und die Uhrzeit kommen direkt aus Cockpit-XP und stehen am Anfang jeder Protokollzeile.
Da nur eine Zeichenfolge in die Datei geschrieben werden kann, ist die Notwendigkeit gegeben, andere Variablentypen in diesen Typ zu konvertieren.
Im Beispiel handelt es sich bei der Variablen Runde um einen Zahlenwert. Dieser wird mit der Funktion IntToStr() in eine Zeichenfolge umgewandelt. Der gesamte Log-Eintrag entsteht durch den Verkettungsoperator + zwischen den jeweiligen Passagen.