WinExec
Estou precisando chamar um programa através do meu aplicativo. Só que eu gostaria que o programa executasse em background. Como poderei fazer isto.
Grata! Livia MG
Grata! Livia MG
Anonymous
Curtidas 0
Respostas
Anonymous
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