|
Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
FreePascal / Lazarus
|
AW: Text vor einem bestimmten Zeichen NICHT löschen
6. Mär 2020, 21:32
wie wäre es mit so etwas:
Delphi-Quellcode:
suchstr:='shell>';
p:=pos(suchstr,text);
if p>0 then delete(text,p,length(suchstr)-1);
Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
|