Foros Club Delphi - abrir .exe con delphi 7

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)

- - abrir .exe con delphi 7 (https://www.clubdelphi.com/foros/showthread.php?t=46347)

arespremium

30-07-2007 01:07:25

abrir .exe con delphi 7

Hola cual es el codigo para poder abrir un Block de notas de windows y asi otras cosas mas desde un boton de delphi

Ejemplo:
al hacer click sobre un boton este habra el block de notas
que se encuentra en:

%SystemRoot%\system32\notepad.exe

MaMu	30-07-2007 01:10:36

A ver si esto te orienta:

Código Delphi [-]begin
  WinExec(PChar('c:\windows\calc.exe'),SW_SHOWNORMAL); {Ejecuta la calculadora}
end;

Saludos

jhonny

30-07-2007 16:26:13

Cita:

Empezado por mamu

A ver si esto te orienta:

Código Delphi [-]begin
WinExec(PChar('c:\windows\calc.exe'),SW_SHOWNORMAL); {Ejecuta la calculadora}
end;

Saludos

De hecho, asi tambien funciona:

Código Delphi [-] 
WinExec(PChar('calc.exe'),SW_SHOWNORMAL);

cHackAll

30-07-2007 16:50:18

Cita:

Empezado por jhonny

De hecho, asi tambien funciona:

Código Delphi [-]WinExec(PChar('calc.exe'),SW_SHOWNORMAL);

Código Delphi [-] WinExec('calc', SW_SHOW);

jhonny

30-07-2007 16:58:59

Cita:

Empezado por cHackAll

Código Delphi [-] WinExec('calc', SW_SHOW);

Ahhh, pos si ¿no? :D

jhonny

30-07-2007 17:05:10

Si la cuestión es de acortar el numero de caracteres a usar en este asunto, entonces, :D :

Código Delphi [-] 
WinExec('calc', 5);

:)

Nota: No recomiendo cambiar el SW_SHOW por el 5

//Edite: Para colocar la nota ;).

Yusk333

22-08-2007 01:37:28

como seria para abrir el iexplorer , pero que lo abra y me dirija hacia una pagina??? :confused:

jhonny

22-08-2007 01:45:21

Cita:

Empezado por Yusk333 (Mensaje 225066)

como seria para abrir el iexplorer , pero que lo abra y me dirija hacia una pagina??? :confused:

En ClubDelphi hay varios temas al respecto, uno es el viejo truco:

Añade ShellApi como Unit y luego en alguna parte:

Código Delphi [-] ShellExecute(Handle,nil,PChar('Pagina.html'),'','',SW_SHOWNORMAL);

Y Listo, espero te sirva ;)

cHackAll

22-08-2007 01:49:20

http://www.clubdelphi.com/foros/showpost.php?p=206009

La franja horaria es GMT +2. Ahora son las 10:43:01.