Delphi -> Asm -> Stackproblem?

[Gruber_Hans_12345]

so, hab das problem ...
die unit was ich verwendet habe

Delphi-Quellcode:

(************************************************************
Author: Deepak Shenoy
        [email][e-mail][/email]
Copyright (C) 2000 Agni Software Pvt. Ltd.
All Rights Reserved.
[url]http://www.agnisoft.com[/url]

Description:
Helper class for ADSI functions
********************************************************)
unit adshlp;
...
function ADsGetObject(lpszPathName:WideString; const riid:TGUID;
                      out ppObject):HRESULT; safecall; <<<< das muß stdcall sein

da müssen die funktionen in stdcall umgeändert werden (denn mit safecall legt er ein register zusätzlich am stack ab, das aber niemand abholt, und so hab ich diesen blöden fehler bekommen ... naja, war wieder mal ein kleiner ausflug in asm)