你可以在兩個x上分別定義訪問接口,然後互相訪問其接口,如果訪問成功就說明其存在!
並返回自定義數據。否則說明對方不存在!
eg:
function activex1.exsitOK():boolean;
function activex2.exsitOK():boolean;
在form1上調用:
var
a,b: booloean
begin
a:=activex1.exsitOK();
b:=activex2.exsitOK();
if a then messagebox "Activex1 exsited",'info',MB_OK...;
if b then messagebox "Activex2 exsited",'info',MB_OK...;
end;