OpenDialog Mehrfachauswahl, Filename

[Aviator]

Zitat von Freyr77:

Zitat von HolgerX:

Und immer schön

Delphi-Quellcode:

if OpenDialog1.Execute then begin

..

end;

Denn wo der Benutzer keine Datei ausgewählt hat, steht in Files / Filename auch nichts drinnen

Das ist eine Button-Click Prozedur, deswegen bleibt dem Nutzer nichts anderes übrig außer etwas auszuwählen oder das Programm zu beenden

Der Benutzer kann dann aber immer noch das X oder Abbrechen im OpenDialog anklicken. Und schon läuft deine Funktion ins Leere. Wieso sträubst du dich so davor es richtig zu machen? Es sind nur zwei Zeilen die du zu deinem Code hinzufügen müsstest und schon hättest du eine mögliche Fehlerquelle entfernt.

[DeddyH]

So schwer ist das doch gar nicht:

Delphi-Quellcode:

if OpenDialog1.Execute then
  for i := 0 to OpenDialog1.Files.Count - 1 do
    DateiAuswerten(OpenDialog1.Files[i]);

Dabei wird DateiAuswerten eine eigene Routine mit einem String-Parameter für den Dateinamen, feddich is die Laube.