Buenas paldave.
Gracias por tu aportación.
Tengo un problema con el código que pusiste de la función. Al compilarlo:
Código:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TLaunchMode = (lmNormal, lmMaximized, lmMinimizedActive, lmMinimizedInactive, lmHide);
TPriority =(pIdle, pNormal, pHigh,pRealTime);
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
function LaunchExtended(Filename:String; WaitForEnd: Boolean; TimeForWait:Cardinal=0; Parameters, StartFolder:String; LaunchMode:TLaunchMode; Priority:TPriority):Integer;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
...
Tendría un botón que llamaría a ese función como pones pero como decía, en la compilación da el siguiente error:
[Error] Unit1.pas(16): Default value required for 'StartFolder'
...
Por qué puede ser?
perdona mi ignorancia