Autor Beitrag
*Knust*
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 95



BeitragVerfasst: Sa 14.11.09 15:42 
Moin!
Ich habe mich hier im Forum ein bisschen umgeguckt aber noch keine Antwort auf meine Frage gefunden:
Ich möchte gerne mit imap mails abfragen und auch anzeigen. ich bin schon soweit, dass ich die mailbox 'inbox' auswähle und dann auch die mails checke. ich muss dann aber irgendwie aus den mails den textteil herausbekommen.
es gibt da ja eine möglichkeit imap.mailbox.messagelist.messages[0].body... geht das irgendwie damit? oder muss man erst eine TIdMessage-->nachricht erstellen und dann imap.retrieve(0,nachricht) und dann aus nachricht den text filtern?

Über eine schnelle Antwort würde ich mich freuen!

mfg

Knust


Moderiert von user profile iconUGrohne: Topic aus Off Topic verschoben am Sa 14.11.2009 um 17:10
UGrohne
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Veteran
Beiträge: 5502
Erhaltene Danke: 220

Windows 8 , Server 2012
D7 Pro, VS.NET 2012 (C#)
BeitragVerfasst: Sa 14.11.09 18:11 
Hallo Knust,

die Leute brauchen sicher ein paar mehr Infos. Zuallererst bin ich mal von Delphi als Sprache ausgegangen und habe das Topic entsprechend verschoben. Dann solltest Du am Besten etwas von Deinem bisherigen Code zeigen, dann lässt sich einfacher daran weiter arbeiten, vor allem auch was für Komponenten Du verwendest.

Grüße,

Uwe
schaumermal
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 72



BeitragVerfasst: Sa 05.12.09 12:27 
Hi,

ich habe mal was ähnliches programmiert.

Möglicherweise ist dies ein Ansatz für Dich
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
function TOutlookAddIn.eMailBodyExtrahieren:Variant;
var App : OleVariant;
begin
     try
        App:=CreateOleObject('Outlook.Application');

        Result:=App.ActiveExplorer.Selection.Item(1).Body;
     finally
         App := unassigned;
     end;
end;

Mit dieser Funktion erhälst Du den Text der markierten eMail in Outlook.

Moderiert von user profile iconNarses: Delphi-Tags hinzugefügt