Hm i cant edit my last post...
i tried it like this now:
type
PLoadinfo = ^TLoadinfo;
TLoadinfo = record
mVersion: DWORD;
mHwnd: HWND;
mKeep: BOOL;
end;
procedure LoadDll(Loadinfo: PLoadinfo); stdcall;
begin
ShowMessage(
'mIRC-Version: ' +
IntToStr(LOWORD(Loadinfo^.mVersion)) + '.' +
IntToStr(HIWORD(Loadinfo^.mVersion))
);
end;
if i load it with: $dll(my.dll, proc, param) now
then it shows me the dialog "mIRC-Version: 6.16" after a click on "OK" -> Crash.