DCOM problem .....

DCOM problem .....
1. I could run it in same pc(server,client)
2. I can lunch server from client
3. I get a "interface not supported" When I running following line in client

procedure TAxesBrain.Connect;
var
    punk: IUnknown;
begin
    if FIntf = nil then
    begin
        punk := GetServer;   <<-- OK
        ConnectEvents(punk); <<-- OK
        Fintf := punk as IAxesBrain;  <<------ give me "interface not supported"
    end;
end;


P.S
iUnknown = IIterface

IAxesBrain = interface(IDispatch)
        ['{1F110135-14DE-4ACE-ADF3-017ED1A35687}']
        procedure Test(iTestNumber: Smallint); safecall;
         :

FIntf: IAxesBrain;

Comments