Delphi - Como ejecutar un programa Windows desde mi aplicac

 
Vista:

Como ejecutar un programa Windows desde mi aplicac

Publicado por BuGuS (1 intervención) el 23/02/2001 18:16:47
Hola a todos los delphimaniacos:

Mi pregunta es si sabrías decirme como puedo ejecutar una aplicación dos/windows desde mi aplicación delphi. Por ejemplo si quiero ejecutar el notepad de windows que instrucción debo utilizar para realizarlo ya sea de Delphi o alguna API de Windows.

Gracias de antemano, y hasta la proxima....
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como ejecutar un programa Windows desde mi apli

Publicado por Ricardo Nolasco (1 intervención) el 24/02/2001 01:58:41
Es muy facil solo tienes que usar el componente OleContainer que se encuentra en la ficha de system.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como ejecutar un programa Windows desde mi apli

Publicado por Vlad (1 intervención) el 24/02/2001 05:18:41
pues puedes usar esto

const
SW_HIDE = 0;
SW_SHOW = 5;

function StrLCopy(Dest, Source: PChar; MaxLen: Cardinal): PChar; assembler;
asm
PUSH EDI
PUSH ESI
PUSH EBX
MOV ESI,EAX
MOV EDI,EDX
MOV EBX,ECX
XOR AL,AL
TEST ECX,ECX
JZ @@1
REPNE SCASB
JNE @@1
INC ECX
@@1: SUB EBX,ECX
MOV EDI,ESI
MOV ESI,EDX
MOV EDX,EDI
MOV ECX,EBX
SHR ECX,2
REP MOVSD
MOV ECX,EBX
AND ECX,3
REP MOVSB
STOSB
MOV EAX,EDX
POP EBX
POP ESI
POP EDI
end;

function StrPCopy(Dest: PChar; const Source: string): PChar;
begin
Result := StrLCopy(Dest, PChar(Source), 255);
end;

procedure ExecuteFile(const FileName, Params, DefaultDir: string;
ShowCmd: Integer);
var
zFileName,
zParams,
zDir: array[0..79] of Char;
begin
ShellExecute(0, nil,
StrPCopy(zFileName, FileName), StrPCopy(zParams, Params),
StrPCopy(zDir, DefaultDir), ShowCmd);
end;


y la mandas a llamar asi

try
ExecuteFile(Archivo.exe,Parametro,Ruta,
SW_SHOW);// Y si no quiers que se vea le pones sw:hide
except end;

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como ejecutar un programa Windows desde mi apli

Publicado por MAKZ (43 intervenciones) el 25/02/2001 03:25:03
facil:
winexec('ruta',1);
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar