Просто открытие.
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
h: hwnd;
begin
ShellExecute(h, 'open', 'C:\', nil, nil, SW_SHOW);
end;
В Uses - ShellApi
Если хочешь к ней привязать свою прогу - я тебе тут не помошник, хотя советую почитать справочники по winapi, может найдешь че полезное... |