|
Registriert seit: 8. Nov 2005
Ort: nähe Stuttgart
981 Beiträge
Delphi XE2 Professional
|
Re: Suchen und ersetzten
17. Mär 2006, 18:42
Delphi-Quellcode:
While pos('te',text ) <> 0 do
Delete(text,pos('te',text ),length('te'));
[edit] Hatte vergessen die ' zu setzen.
|