Zitat von
Der_Unwissende:
einfacher geht das ganze mit StringReplace
Hm, da ist was dran. Meins sähe so aus, falls es bonanza interessiert:
Delphi-Quellcode:
function DeleteStuff(const S, Del: string): string;
begin
Delete(S, Pos(Del, S), Length(Del));
result := S;
end;
// Aufruf:
MyString := DeleteStuff(MyString, 'Uhrzeit: ');
MyString := DeleteStuff(MyString, 'Datum: ');