Zeichen bzw Chars aus String entfernen

[Mathematiker]

Mit

Delphi-Quellcode:

var
 s : String;
 begin
 s:='Max Mustermann<[e-mail]>';
 delete(s,1,pos('<',s));
 delete(s,length(s),1);
 label1.text:=s;
end;

wird in label1 der Text [e-mail] ausgegeben, d.h. es funktioniert.

Beste Grüße
Mathematiker