[lmikle]

Ну дык правильно крашится, у тебя функция неправильно описана. Должно быть как-то так:

Код:

function __apiInit(var Handle : Cardinal) : Boolean; stdcall; external 'Api32.dll';