Hallo zusammen..
hab schon die Suchfunktion hier bemüht, konnte aber nix finden, und laut Delphi-Hilfe wäre folgender Code die Lösung meines Problems gewesen:
Quelltext
1: 2: 3: 4: 5:
| with OpenDialog1 do begin Filter := 'TextMaker-Vorlagen (*.tmv)|*.TMV|Alle Dateien (*.*)|*.*)'; // DefaultExt := '*'; <--- Was soll das bringen?? if Execute then EdFaxOrder.Text := ExtractFilePath(Opendialog1.FileName) + ExtractFileName(Opendialog1.FileName); |
Hilft aber insofern nicht, das ich, wenn ich zur Laufzeit im OpenDialog den Filter auf Alle Dateien stelle, zeigt er eben nicht alle an...
weiß einer wo der Denkfehler liegt?
vielen Danke im Voraus
mfg
kiwicht