Moin,
die Mail-Adresse kann im vorliegenden Fall auch so herausgezogen werden:
Delphi-Quellcode:
begin
with TStringList.Create do
try
QuoteChar := '''';
DelimitedText := '''gene@dsa.net'',''bla'',''bla''' ;
ShowMessage(Strings[0]);
finally
Free;
end;
end;
Freundliche Grüße