Calculadora - Urgente!!
Como faço para chamar a calculadora do Windows a partir de um botão em um form no meu programa? :cry:
Hermeson Menezes
Curtidas 0
Respostas
Dor_poa
10/02/2003
Winexec(´C:\WINNT\System32\calc.exe´, SW_SHOW);
GOSTEI 0
Carnette
10/02/2003
uses Shellapi
procedure ExecutePrograma(Nome, Parametros: String);
Var
Comando: Array[0..1024] of Char;
Parms: Array[0..1024] of Char;
begin
StrPCopy (Comando, Nome);
StrPCopy (Parms, Parametros);
ShellExecute (0, Nil, Comando, Parms, Nil, SW_ShowMaximized);
end;
Para rodar ela:
ExecutePrograma(´WinWord.Exe, ´´);
ou se quiser rodar um documento ou arquivo:
ExecutePrograma (´C:\MSOffice\Excel\Excel.Exe´, ´Contas.Xls´);
procedure ExecutePrograma(Nome, Parametros: String);
Var
Comando: Array[0..1024] of Char;
Parms: Array[0..1024] of Char;
begin
StrPCopy (Comando, Nome);
StrPCopy (Parms, Parametros);
ShellExecute (0, Nil, Comando, Parms, Nil, SW_ShowMaximized);
end;
Para rodar ela:
ExecutePrograma(´WinWord.Exe, ´´);
ou se quiser rodar um documento ou arquivo:
ExecutePrograma (´C:\MSOffice\Excel\Excel.Exe´, ´Contas.Xls´);
GOSTEI 0