Question:
How can I execute the Windows Explorer Find File Dialog Box?
Answer:
The following example demonstrates using DDE to execute Explorer's
find file dialog. The example opens the dialog in the Directory
"C:\Download".
procedure TForm1.Button1Click(Sender: TObject);
begin
 with TDDEClientConv.Create(Self) do begin
 ConnectMode := ddeManual;
 ServiceApplication := 'explorer.exe';
 SetLink( 'Folders', 'AppProperties');
 OpenLink;
 ExecuteMacro('[FindFolder(, C:\DOWNLOAD)]', False);
 CloseLink;
 Free;
 end;
end;