Mit FileListBox in verschiedene Verzeichnisse springen

[smart]

Hallo Alle!
Ich möchte mit der FileListBox während der Laufzeit in verschiedene Verzeichnisse springen und die dortigen Dateien in einer ListBox übertragen. Die Verzeichnisse Stehen im Memo1. Wieso klappt dieser Code nicht?

Delphi-Quellcode:

For I := 0 To Memo1.Lines.Count - 1 do
begin
    FileListBox1.Directory := Memo1.Lines[I];
    FileListBox1.Update;
    For A := 0 To FileListBox1.Items.Count -1 Do
   ListBox1.Items.Add(FileListBox1.Items[A])
end;

Gruß
Heike

[Luckie]

WAS klappt nicht? Du solltest eigentlich mittlerweile wissen, dass so eine Fehlerbeschreibung mehr als ungenügend ist.

[smart]

Zitat von Luckie:

WAS klappt nicht? Du solltest eigentlich mittlerweile wissen, dass so eine Fehlerbeschreibung mehr als ungenügend ist.

Hi.
Hast Recht. Entschuldigung!
Leider kommt keine Fehlermeldung! Wenn in Memo1 zB. volgender Inhalt ist:
C:\
d:\
e:\
wird nur das erste Verzeichnis angesprungen (erste Zeile) und der Inhalt in der ListBox übertragen.

Gruß
Heike