Supongo que si me servira !:P
Gracias... Kurono...
De repente se me vino a la mente uno de tus post donde te da una santa regañada el maestro Delphius (I.A)...
jejeje..
Aqui les dejo la forma en que yo lo hagó dentro de mi aplicación...
Código Delphi
[-]
procedure TForm1.TimerDetenerTimer(Sender: TObject);
var
tam1:int64;
tam2:int64;
begin
if abiertos then begin
tam1:=disksize(6); tam2:=disksize(5);
if tam1<>-1 then
ShellExecute(0, 'open', nil, nil, PAnsiChar('f:\'), SW_SHOW);
if(tam2<>-1)and(tam1=-1) then
ShellExecute(0, 'open', nil, nil, PAnsiChar('e:\'), SW_SHOW);
abiertos:=false;
end;
...
................
Algo asi... aunque aqui esta muy especifico el codigo..y eso es lo que no me gustaba...
Gracias de Nuevo..