|
Registriert seit: 18. Apr 2004
Ort: Linz
2.044 Beiträge
Turbo Delphi für Win32
|
Re: alles zwischen <body> und </body> kopieren
8. Mai 2004, 19:10
dann machs so:
Delphi-Quellcode:
var
a, e: Integer;
begin
a := Pos('<body>', Edit1.Text) + 6;
e := Pos('</body>', Edit1.Text) - 7;
Memo2.Text := Copy(Edit1.Text, a, e-a);
end;
Faux Manuel Wer weiß, dass er nichts weiß, weiß mehr, als der der nicht weiß, dass er nichts weiß.
 GoTrillian
|
|
|
Zitat
|