AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi Zeile einer Email auslesen mittels Indy

Zeile einer Email auslesen mittels Indy

Ein Thema von chris_davidi · begonnen am 21. Feb 2006 · letzter Beitrag vom 22. Feb 2006
Antwort Antwort
chris_davidi

Registriert seit: 21. Feb 2006
Ort: Karlsruhe
1 Beiträge
 
#1

Zeile einer Email auslesen mittels Indy

  Alt 21. Feb 2006, 21:15
Hallo,

ich bin gerade dabei eine Anwendung die ich programmiert habe umzuschreiben. In dieser Anwendung nutze ich einige FastNet-Komponenten die ich nun gegen die Indy-Komponenten austauschen moechte. Soweit hat bisher alles gut funktioniert. Nun habe ich aber bei der Nutzung der IdPOP31 Indy-Komponente Probleme bzw. komme nicht weiter.

Ich habe eine Schleife die so oft laeuft wie Nachrichten auf dem Server sind. Nun soll eine weitere Schleife so oft laufen wie die Nachricht Zeilen im Body hat. Mein Programm muss also wissen wieviel Zeilen der Body hat. Wie ermittle ich dies und wie greife ich auf Zeile xy im Body zu?

Hier ein Teil meines Programmes.

Delphi-Quellcode:
 IdPOP3.Connect;
 mailCount := IdPOP3.CheckMessages; // Anzahl der Nachrichten ermitteln
 ProgressBar.Max := mailCount;

 txtLog.Lines.Add(IntToStr(mailCount) +' Nachrichte(n) auf Server, '+ FormatDateTime('hh:nn:ss', now) + #13#10);

 for i := 1 to mailCount do // Schleife (Durchlauf = Anzahl Nachichten)
  begin
   msg.Clear;
   IdPOP3.RetrieveHeader(i, msg);

   if checkSubject(msg.Subject) = true then // pruefe anhand des Subjects der Nachricht ob korrekt
    begin
     IdPOP3.Retrieve(i, msg); // hole Nachricht i

     ProgressBar.Position := i;

     for y := 0 to ??? do // Schleife (Durchlauf = Anzahl Zeilen der Nachricht)
Hoffe Ihr koennte mir bei meinem kleinen Problem helfen.

Danke und Gruesse,
Chris
  Mit Zitat antworten Zitat
Benutzerbild von sh17
sh17

Registriert seit: 26. Okt 2005
Ort: Radebeul
1.640 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Zeile einer Email auslesen mittels Indy

  Alt 22. Feb 2006, 23:50
versuch es mal mit

msg.body

Das ist ein ganz normales TStrings

Also

for i := 0 to msg.body.count-1
Sven Harazim
--
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:03 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