In fact it is realy simple
see the following...
procedure TForm1.Buton1Click(Sender : TObject);
begin
ShellExecute(Handle,'Open','control',nil,nil,SW_SHOWNORMAL);
end;
there are a lot of things you can do with this code
just replace the string 'control' with a
normal command line (c:\)
NOTE you must add "ShellApi" to the uses clause!
0 comments:
Post a Comment