Forum: Netzwerke
by Natcree,
26. Mär 2013
Die Frage mit dem Datum denke müsste sich mit dem Schnipsel geklärt haben
MailDatum := IdMessage1.Date;
Sehe ich das Richtig?
Forum: Netzwerke
by Natcree,
26. Mär 2013
So ein Quatsch. Ich versuche Viel über eigenrecherche in Erfahrung zu bringen und umzusetzen. Manchmal sieht man aber den Wald vor Bäumen nicht. Den Code fürs Email Senden und Empfangen habe ich mit aus ein duzend Threads zusammen gestellt und wo ich nicht weiter wusste habe ich gefragt.
Ich bin halt ein noob aber es macht mir spass zu proggen bzw. meinen vielleicht kleinen Horizont zu...
Forum: Netzwerke
by Natcree,
26. Mär 2013
Wie kann ich mir das Datum aus dem Header holen???
Forum: Netzwerke
by Natcree,
26. Mär 2013
Danke Dir
noch ein anderes Problem wenn ich im Stringgrid was drin stehen habe dann meckert bei erneuten email
abholen er kann die Daten wohl nicht schreiben weil schon was drin steht muss ich da noch ein if stringgrid1.cells='' then ´... schreiben oder wie mache ich das am besten ???
Forum: Netzwerke
by Natcree,
26. Mär 2013
Super Habs hinbekommen..
if idpop31.Connected then Nachrichtenliste:=idpop31.CheckMessages;
if Nachrichtenliste > 0 then
begin
for Index := Nachrichtenliste downto 1 do
begin
idmessage1.clear;
idPOP31.RetrieveHeader(Index, IdMessage1);
Form3.eltreestringgrid1.cells := IdMessage1.From.Text;
Forum: Netzwerke
by Natcree,
25. Mär 2013
Das Problem Wäre dann auch gelöst
var
s : String;
begin
s:='Max Mustermann<Max@XN--nat-gebudeservice-wqb.de>';
delete(s,1,pos('<',s));
delete(s,length(s),1);
label1.text:=s;
end;
Forum: Netzwerke
by Natcree,
25. Mär 2013
Ich habe denke ich schon einen Grossen Schritt gemacht nunmehr bastel ich an der Oberfläche. Andere Programmbenutzer sollen mich einen Kontakt hinzufügen können nur schmeisst er mir im Email Von einen solchen Wert rein <erven@XN--nat-gebudeservice-wqb.de>
Wie Kriege ich die Beiden <> und alle zeichen danneben weg um es anschliessend in eine Datenbank zuspeichern.