Hi,

The win32 API call, GetStartupInfo() fails under FPC with {$Mode Delphi} and no preceding @ sign in the parameter. Under Delphi 7 you can call GetStartupInfo as show below.

---------- Delphi [System.pas]  ------------------------
procedure GetStartupInfo(var lpStartupInfo: TStartupInfo); stdcall;
  external kernel name 'GetStartupInfoA';
example of usage:
function GetCmdShow: Integer;
var
  SI: TStartupInfo;
begin
  Result := 10;
  GetStartupInfo(SI);
  if SI.dwFlags and 1  0 then
    Result := SI.wShowWindow;
end;
----------------------------------------
----------- FPC [ascfun.inc]  --------------------------
procedure GetStartupInfo(lpStartupInfo:LPSTARTUPINFO); external
'kernel32' name 'GetStartupInfoW';

Under FPC it must be called as follows, it DELPHI mode or ObjFPC mode. [ ... ]

  GetStartupInfo(@startupinfo);

[ ... ]

----------------------------------------------------

Under FPC the GetStartupInfo parameter is defined differently to Delphi. Is this a bug in FPC?

Regards,
Graeme.

The win32 API call, GetStartupInfo() fails under FPC with {$Mode Delphi} and no preceding @ sign in the parameter. Under Delphi 7 you can call GetStartupInfo as show below.

Fixed in trunk. r4238 in case sb wants to merge it.

Marco van de Voort wrote

Fixed in trunk. r4238 in case sb wants to merge it.

Damn that was quick! Thanks.

Graeme.