各位先進： 如何用Delphi的匯編呼叫COM組件呢？比如如下： procedure Call; var intf: ISomeIntf; begin intf:=CreateComObject (CLASS_XXX); //以下該如何呼叫ISomeIntf的SomeMethod方法呢？ ... end;

我沒使用過 ISomeIntf 這個 COM 界面    以下網址 給你參考 加油 ^_^     ×ÏÐÒÏÓÙ ÐÏ ÉÎÔÅÒÆÅÊÓÁÍ
Re: Slight rant
Interface ref counting
What is an OO language? (Re: Delphi prevets programmers to write ...
Re: Object factory question
Re: Creating an Interface using RTTI

------
︿︿

謝謝cmf！ 我的目的是通過如下代碼調用COM介面： procedure Call; var intf: ISomeIntf; begin intf:=CreateComObject (CLASS_XXX) as ISomeIntf; AsmInvoke (Intf); end; Procedure AsmInvoke(Intf: ISomeIntf) ASM //以下如何用匯編來實現調用COM介面的SomeMethod方法…? End;

首先 你需要 知道 ISomeIntf 提供了那些Method 如果你知道 貼上來看看

------
︿︿

關於ISomeIntf是我假設的界面 比如它是如下的： ISomeIntf = interface (IDispatch) ['{BA481D75-C51D-4539-A445-8B70F5FF4BD9}'] function MsgBox(const Messages: WideString): WideString; safecall; end; 那該如何調用MsgBox方法呢？（參數Messages可以是你隨意給定的值如“Thank cmf”） 另外如果不同類型的參數該如何入棧呢？

    procedure Call;
var
intf: ISomeIntf;
s:string;
begin
intf:=CreateComObject (CLASS_XXX) as ISomeIntf;     s:='HI kaimo';
 intf.MsgBox(WideString(S));     end;         

------
︿︿

intf.MsgBox(WideString(S)); 就這一句，我需要用ASM來寫該怎麼寫？。 謝謝！

阿哉 ^^

------
︿︿

呵呵，不好意思，描敘不清，望諒！

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.