"Datei suchen" - Dialog aufrufen

[Renè Kapron]

Halle Leute,
hat jemand es schon geschafft den “Datei suchen“ - Dialog des Explorers über Delphi aufzurufen? Oder hat jemand eine Idee, wo ich suchen könnte.
Ich wäre für jeden Tip dankbar.
René

[Loryn Brendes]

Hallo Rene,

in der Komponentenpalette findest Du im Register Dialoge die Komponente OpenDialog. Das dürfte das Gesuchte sein. Näheres erzählt Dir die Online-Hilfe.

Gruß Lory

[Andreas Kosch]

Hallo,

das folgende Beispiel sollte den gesuchten Dialog "hervorzaubern":
<pre>
uses ShellAPI, ShlObj;

procedure TForm1.Button1Click(Sender: TObject);
var
aSEI : TShellExecuteInfo;
begin
ZeroMemory(@aSEI, sizeof(aSEI));
with aSEI do
begin
cbSize := SizeOf(aSEI);
fMask := SEE_MASK_INVOKEIDLIST;
lpVerb := 'find';
lpFile := PChar('C:\');
end;
ShellExecuteEx(@aSEI);
end;
</pre>

Alles nähere ist entweder im <b>Win32-SDK</b> oder in der Delphi-Hilfedatei <b>Win32 Developers Reference</b> unter dem Stichwort <i>ShellExecuteEx</i> zu finden