Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Button zur Dateiauswahl (https://www.delphipraxis.net/59776-button-zur-dateiauswahl.html)

K-Asche 28. Dez 2005 14:30


Button zur Dateiauswahl
 
Hi@all,

gibt es in Delphi einen Standard - Button, über den man innerhalb der Verzeichnisse auf dem System eine Datei auswählen kann, wie die Durchsuchen - Buttons in Windows halt.
Falls nicht, gibt es fertige methoden, die man über einen Button ansprechen könnte?

Gruß

Karsten

fkerber 28. Dez 2005 14:35

Re: Button zur Dateiauswahl
 
HI!

Meinst du einen normalen OpenDialog (Registerkarte Dialogs)?


Ciao Frederic

K-Asche 28. Dez 2005 14:50

Re: Button zur Dateiauswahl
 
Zitat:

Zitat von fkerber
HI!
Meinst du einen normalen OpenDialog (Registerkarte Dialogs)?

Kann schon sein

Matze 28. Dez 2005 14:52

Re: Button zur Dateiauswahl
 
Hi,

OpenDialog auf's Formular setzen und so erfolgt dann die Dateiauswahl:

Delphi-Quellcode:
if OpenDialog1.Execute then
  Dateiname := OpenDialog1.FileName;

ManuMF 28. Dez 2005 14:54

Re: Button zur Dateiauswahl
 
Es gibt keinen Button, aber einen TOpendialog.
Zeih ihn und z.B. einen TButton auf dein Formular.
Im OnClick des Buttons kannst du dann mit OpenDialog.Execute überprüfen, ob wirklich eine Datei geöffnet wurde, oder der User auf Abbrechen geklickt hat. In OpenDialog.FileName steht dann die Datei.

Gruß,
ManuMF

P.S.: Im Objektinspektor würde ich noch den Filter anpassen.

[edit]Huch! Kein Roter Kasten?[/edit]

K-Asche 28. Dez 2005 15:28

Re: Button zur Dateiauswahl
 
Hab mich vertan, ich brauch nur das Verzeichnis keine Dateien auszuwählen.
Gibt es dafür auch einen fertigen Dialog
Der Dlg müsste Ordner suchen heißen

Waldteufel 28. Dez 2005 15:35

Re: Button zur Dateiauswahl
 
Hi.

Ich glaube, du meinst sowas hier: http://www.delphipraxis.net/internal...ct.php?t=13872

dfried 28. Dez 2005 15:36

Re: Button zur Dateiauswahl
 
In der Unit FileCtrl gibt es eine Procedure SelectDirectory, die blendet eine solchen Dialog ein. Hier ein kleines Beispiel:

Delphi-Quellcode:
uses FileCtrl;

var
  StartDir : string;
  SelectedDir : string;
begin
  StartDir := 'C:\';
  if SelectDirectory('Verzeichnis auswählen:', StartDir, SelectedDir) then
    ShowMessage(SelectedDir);
end;
Allerdings ist der Dialog nicht gerade der "schnellste", aber er funktioniert :wink:

K-Asche 28. Dez 2005 15:48

Re: Button zur Dateiauswahl
 
@dfried

Japp auch gerade rausgefunden, aber besten Dank trotzdem;


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:04 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz