我有一個應用程式可以通過以下方式打開 AutoCAD 應用程式:
XlApp := GetActiveOleObject('AutoCAD.Application');
現在我也想做同樣的事情,但是使用 ZWCAD 應用程式,我該怎么做?
uj5u.com熱心網友回復:
GetActiveOleObject不打開應用程式。它回傳對正在運行的應用程式的 COM/OLE 自動化物件的介面參考。
如果應用程式沒有運行,您可以使用CreateOleObject創建/實體化一個。
稍后,有了參考,您可以從應用程式外部管理應用程式。就像打開/管理一些檔案一樣,做一些處理和/或向用戶展示。
請注意,并非所有應用程式都支持 COM/OLE 自動化。您必須查看官方檔案或開發人員指南。通常它包含介面描述,例如您可以呼叫的屬性和方法。此外,Delphi 提供了tlibimp工具來從 dll 檔案中匯入可用的介面。
快速查看了一下,中望CAD好像支持COM自動化,可以試試下面的代碼:
var O: Variant;
begin
O := CreateOleObject('ZWCAD.Application');
try
// Work with object
O.Visible := True;
finally
O := Unassigned;
end;
end;
或者,如果您只是想打開 ZWCAD,您可以使用
ShellExecute(0, 'open', 'c:\path\to\zwcad.exe', nil, nil, SW_SHOWNORMAL);
轉載請註明出處,本文鏈接:https://www.uj5u.com/net/474107.html
下一篇:如何在java中將字串轉換為泛型
