Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Emails Filter per String (https://www.delphipraxis.net/109982-emails-filter-per-string.html)

gene 11. Mär 2008 04:58


Emails Filter per String
 
Hi, wie kann ich es realisieren wenn zB in einer Textfile steht:

'gene@dsa.net','bla','bla'

Wenn ich mit Pos() nach dem @ suche und wenn er es findet eben gene@dsa.net ausliest?

ULIK 11. Mär 2008 05:23

Re: Emails Filter per String
 
Schon mal an reguläre Ausdrücke gedacht? (TRegEx oder DiRegEx zum Beispiel) Da findet man dann auch Ausdrücke zum extrahieren von EMailadressen.

Grüße,
Uli

marabu 11. Mär 2008 06:04

Re: Emails Filter per String
 
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

gene 11. Mär 2008 20:00

Re: Emails Filter per String
 
danke marabu, aber ich kenn die mailaddressen ja nicht ;/

werd mir mal regex anschauen, thx

marabu 13. Mär 2008 09:13

Re: Emails Filter per String
 
Ich kenne die Mail-Adresse auch nicht, ich erwarte sie einfach nur als erstes Feld im CSV-Datensatz.

inherited 13. Mär 2008 09:17

Re: Emails Filter per String
 
Statt DelimitedText kannst du auch einfach den ganzen String übergeben.


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:00 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz