Ver Mensaje Individual
  #8  
Antiguo 27-11-2009
SyncReuter SyncReuter is offline
Miembro
 
Registrado: ene 2007
Posts: 26
Reputación: 0
SyncReuter Va por buen camino
En mi desesperación realice un proyecto aparte con mi drama.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  Path: string;
  F: string;
begin
  Path:=ExtractFilePath(Application.ExeName);
  F:='AppWFP.EXE';

  //ShowMessage(Path); // Devuelve:--> D:\Proyectos\Delphi\Test\
  //ShowMessage(Path + F); // Devuelve:--> D:\Proyectos\Delphi\Test\AppWFP.EXE

  //WinExec(PAnsiChar(Path + F), SW_SHOW); // NO FUNCIONA

  //WinExec('D:\Proyectos\Delphi\Test\AppWFP.EXE', SW_SHOW); // NO FUNCIONA

  WinExec('C:\AppWFP.EXE', SW_SHOW); // SI FUNCIONA :-)

end;

En ambas rutas (Path) existe el archivo AppWFP.EXE, Utilizo Delphi 2005 Pro UPD3 y tengo winxp pro sp3

Saludos

Última edición por SyncReuter fecha: 27-11-2009 a las 18:04:27.
Responder Con Cita