Texte aus Text herausschneiden - schwer zu beschreiben

[MCXSC]

Hallo!

Folgendes Problem:

Ich habe vor eine Art Adressbuch zu schreiben (Teil eines Mailers, deshalb nur E-Mails).

Ich habe eine ComboBox in der z.B. steht:

MCXSC <[e-mail]>

Nach einem Klick auf einen Button, soll in einem Textfeld jedoch nur

[e-mail]

angezeigt werden (ohne Name und den < und >).

Ich bekomme das nicht hin. Kann mir jemand helfen? Habe die Sources als ZIP angehangen.

Sorry, hatte den BEitrag gestern abend geschrieben und das war gerade eben der falsche. Jetzt ist es der richtige!

[alcaeus]

Irgendwie passt das Attachment nicht wirklich zum Beitrag, jedenfalls sehe ich von Navigation im Proggi nichts :roll:

[sakura]

Was hat das Proggie mit Deinem Problem zu tun :shock: Klär mal auf - wo ist die Delphifrage?

...:cat:...

[Die Muhkuh]

Ich glaube er will wissen wie man die E-Mehl da rausbekommt.


@MCXSC


schau dir mal Pos und Copy an :thumb:

[alcaeus]

Das sagt das Projekt, aber der Beitrag handelt von ganz was anderem.
@MCXSC: CSS ist eine Stylesprache, schleifen usw. gibts da nicht. Damit kannst du höchstens festlegen, wie eine Überschrift oder eine Tabelle auszusehen hat.

[Matze]

Aber es ist in der Delphi-Sparte. :?

=> Okay, das mag nichts heißen. :mrgreen:

[MCXSC]

Auch wenn ich hier neu bin, muss mal meckern:
@alcaus: 4 Minuten vorher habe ich den Atikel bearbeitet... und das mit CSS weiß ich, mit HTML, CSS und PHP kenne ich mich extrem gut aus...

Aber das gehöt nicht zum Thema :-)

[Matze]

Dann schau dir Spiders beitrag an, das sollte dir helfen. :)

[alcaeus]

Wie spider schon gesagt hat: Schau dir mal Pos und Copy an. Pos gibt dir die Anfangsposition eines Strings an, Copy einen Teil eines Strings.
Also könnte es so aussehen:

Delphi-Quellcode:

eMail := Copy(GesamtEMail, Pos('<',GesamtEMail), Pos('>',GesamtEMail)-Pos('<',GesamtEMail)-1);

Code ist ungetestet, so ungefähr müsste es aber gehen.

[edit]Falscher User, sorry Spider[/edit]

[a.vollmer]

oder so!

Delphi-Quellcode:

var
str : String;
begin
str := 'MCXSC <[e-mail]>';
delete(str,1,pos('<',str));
delete(str,length(str),1);

ShowMessage(str);
end;

Alex