Hallo,
ich möchte nach einem Buttonklick eine Laufwerks-/Verzeichnisauswahl-Dialog anzeigen.
Der 'alte' Code funktioniert unter XE2 wohl nicht mehr ...
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9:
| ---BEGIN procedure TForm1.Button1Click(Sender: TObject); var Dir: String; begin SelectDirectory('Select a directory', '', Dir); ShowMessage(Dir); end; ---END |
Wie könnte ich das lösen?
Danke!
PS: Ich suche seit einiger Zeit nach einem aktuellen Delphi-Kompendium (ab Version 10.x). Bin für Tipps dankbar.
Moderiert von Th69: Delphi-Tags hinzugefügtModeriert von Th69: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Mo 21.12.2020 um 20:13