OpenDialog --> mehere Dateien --> Dateinamen

[Nisbo]

Moin Moin

ich denke mal es ist ganz einfach, nutze beim OpenDialog muliselect und möchte so eine Liste mit Dateinamen auslesen, leider bietet die OH dazu kein Bsp in D5

auch hier im Board konnte ich leider nichts finden
wie muß ich die zeile

showmessage(OpenDialog1.Filename);

abändern das jeweils der aktuelle dateiname ausgegeben wird ?

Delphi-Quellcode:

   if OpenDialog1.Execute then
    begin
       dateien              := OpenDialog1.Files;

       with OpenDialog1.Files do
       for I := 0 to Count - 1 do
       begin
            showmessage(OpenDialog1.Filename);
       end;

       //showmessage(dateien.commatext);
    end;