原本一個寫好的MTS Date Module的DLL(IdentifyZip.dll)檔,給ASP網頁使用,
asp使用的寫法,{
Set ZipIdentify=CreateObject("IdentifyZip.mtsIdentyfyZip")
FindZip=ZipIdentify.LookupZip("台北市")
}
但我想在一個簡單環境,delphi開發下,如何使用這個元件IdentifyZip.dll中的LookupZip
如何使用interface

------
eric

只要把 CreateObject 改成 CreateOleObject 就好了

------
歡迎參訪 "腦殘賤貓的備忘錄" http://maolaoda.blogspot.com/

如何直接在delphi的開發環境下,使用你說的CreateOleObject
我測試中,IdentifyZip是個com 的dll,interface是mtsldentyfyZip
在一個

var
Form1: TForm1;
procedure TForm1.Button1Click(Sender:TOject);
Var
Zipidentify :??? 宣告成什麼物件
begin
Zipidentify := CreateOleObject(IdentifyZip.mtsldentyfyZip)
Edit2.Text := Zipidentify.LookupZip( Edit1.Text)
end;

------
eric

正確解釋,一個已經註冊的COM 的原件,他在DELPHI開發環境下,如何使用的此COM 的interface

------
eric

既然是 CreateOleObject，自然就宣告成 OleVariant
用完之後記得設定為 NULL 就行

------
歡迎參訪 "腦殘賤貓的備忘錄" http://maolaoda.blogspot.com/

感謝你!!!!謝謝妳的指點!!

------
eric