Datein (eines Ordners) in einer Listbox auflisten...

[Plague]

Hallo,

ich möchte meine Mails in einen Ordner exportieren und in Delphi nun ein Programm erstellen in dem ich die Mails (im txt Format) aufgelistet habe.
Gibt es dafür einen bestimmten Befehl? Ich habe es nämlich noch nicht geschafft :(

Danke
Thomas

[Alexander]

Delphi-Quellcode:

procedure Topen.GetFiles(Path: string; List : TListView);
var
  SearchRec : TSearchRec;
  Item: TListItem;
begin
  if FindFirst(Path + '*.*', faAnyFile, SearchRec) = 0 then
  begin
    repeat
      if (SearchRec.Attr <> faDirectory) then
      begin
       Item := List.Items.Add;
       Item.Caption := SearchRec.Name;
       end;
     until FindNext(SearchRec) <> 0;
    FindClose(SearchRec);
    anIcon.Free;
  end;
end;

Probier das mal...
Habe ich gerade aus einem meiner Projekte rausgeschnitten, allerdings musste ich ein paar Sacehn verändern, habe es dann aber nicht mehr getestet...

[Sharky]

Hai Plaque,

schaue dir mal die Befehle FindFirst und FindNext an.

Ich glaube wir haben sogar ein Beispiel in der Code-Library.

[subw00fer]

Wie exportierst du die Mails. Wenn du Outlook verwendest gibt es unter Datei den Punkt Importieren/Exportieren. Du kannst alle Daten in Ein Excel exportieren. Und wenn du Lust hast kannst du dann die Daten die du brauchst auslesen un in ein Textfile schreiben. Doch ich finde das Excel ist sehr übersichtig.

mfg subw00fer

[Plague]

Also erstmal danke für die Infos!
Der Vorschlag mit Excel kommt für mich nicht in Frage, da ich bereits in meinem Programm eine Funktion geschrieben habe, die vordefinierte Infos aus der Mail in mein Programm übernimmt. Am liebsten wäre mir ja ein eigener POP3 Eingang, aber das kann ich leider nicht...
Daher möchte ich nun die Mails über Outlook als *.txt speichern und dann mit meinem Delphi-Programm öffnen...

Dafür bräuchte ich das...
Kennt eventuell jemand eine Anleitung für ein POP3 Mail Eingangs-Programm?

Thomas

[Alexander]

Hi,
Kuck dir mal die Indy-Komponenten an. Da sind dann auch Demos dabei..
http://www.nevrona.com/indy/

[Sharky]

Hai Plague,

hast Du die Indy-Komponenten? Wenn ja: Bei denen ist ein Demo für Mail empfang dabei. Wenn nein: Hole sie dir ;-)

[Plague]

Also die Indy-Komponente habe ich, aber wo finde ich dort die Demo? :?:

Danke
Thomas