Das ist ein bisserl wenig Info ...
Schreib doch mal auf, was dort übergeben wird und was als Rückgabewerte herauskommen soll.
Code:
Input:
lLine:string = "Hallo<Wie.Gehts>denn.so"
Output:
lDate:TDateTime = ?
lIdent:array of string = ?
lLogMessage:string = ?
lSeverityStatus:string = ?
Result:Boolean = ?
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)