Assa's Service Unit - FPC mag es nicht

[gbl]

Ha, da war aber einer schnell ...

Delphi-Quellcode:

function StartServiceCtrlDispatcherA(lpServiceStartTable: LPSERVICE_TABLE_ENTRYA): BOOL; stdcall;

{$EXTERNALSYM StartServiceCtrlDispatcherA}

function StartServiceCtrlDispatcherW(lpServiceStartTable: LPSERVICE_TABLE_ENTRYW): BOOL; stdcall;

{$EXTERNALSYM StartServiceCtrlDispatcherW}

function StartServiceCtrlDispatcher(lpServiceStartTable: LPSERVICE_TABLE_ENTRY): BOOL; stdcall;

{$EXTERNALSYM StartServiceCtrlDispatcher}