Forum: Win32/Win64 API (native code)
Delphi
by EmWieMichael,
23. Jan 2021
Ohne jemanden entmutigen zu wollen (und ich kenn ja auch die Qualität der zu untersuchenden Daten nicht), aber spätestens wenn Sätze wie
Herr Dr. Mustermann, K. mit ABCDEFGHI/00A (1): Terminplan(08:00 Uhr)
Herr von Mustermann, Klaus W. mit ABCDEFGHI/00A (1): Terminplan(08:00 Uhr)
auftauchen, wird klar, dass die hier vorgestellten Lösungen nicht funktionieren.
Die Logik zur Ermittlung...
Forum: Win32/Win64 API (native code)
Delphi
by EmWieMichael,
17. Jan 2021
Sicher führen viele Wege nach Rom. Hier ist einer davon:
procedure TSIPForm.Test;
var Line, aWord : String;
A : Array of String;
I, K, L : Integer;
function GetNextWord(var S:String):String;
var P:Integer;
begin