Ver Mensaje Individual
  #5  
Antiguo 19-06-2024
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.806
Reputación: 22
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Obviamente deberás modificar la función para adaptarse a lo que necesitas...
La compilación condicional deberá tener en cuenta las librerías, además del código.

Algo así:
Código Delphi [-]
uses {$IFDEF WIN32}WinApi{$ENDIF} 
     {$IFDEF LINUX}LinApi{$ENDIF} ; // Este último me lo he inventado

{$IFDEF WIN32}
function RunAndWait(Handle: THandle; Ejecutable, Argumentos: string; const RunDirectory: PChar = nil; const Visibilidad: integer = SW_SHOWNORMAL; MensajeSiCorrecto: boolean = True): DWORD;
...
{$ENDIF} 
{$IFDEF LINUX}
function RunAndWait(Handle: THandle; Ejecutable, Argumentos: string; const RunDirectory: PChar = nil; const Visibilidad: integer = SW_SHOWNORMAL; MensajeSiCorrecto: boolean = True): DWORD;
...
{$ENDIF} ;
Responder Con Cita