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.
