for i := length(myString) downto 1 do
begin
if myString = ';' then
ShowMessage('Das letzte ; befindet sich an der Stelle ' + IntToStr(length(myString)-i));
end;
Mögliche Fehler sind nicht ausgeschlossen, habe das letzte mal Delphi (intensiv) vor etwa 1 Jahr beutzt:stupid: