🚀 go-pugleaf

I have experience in Delphi , but in c++builder
just 2 months. I can't develop a callback method in midas project.
At server's side (in server.tlb) I created a interface "IEbClient"
(IDispatch) and its
method "CallbackClient".

In delphi, at client's side (clientfrm) is:
-------------------------------------------------------------
type
  TCallBack = class(TAutoIntfObject, IEbClient)
  procedure CallBackClient(ActionID,UpdateKind: Integer; aValue:
oleVariant); Safecall;
  end;
.....

procedure TCallBack.CallBackClient(ActionId,UpdateKind: Integer;aValue:
OleVariant);
Begin
Case ActionId of
0: clientform.Close;
1: Clientform.Updatedata(ActionID,UpDateKind,aValue);
end;
end;

----------------------------------------------------------------

But I couldn't translated it in c++builder.

Thanks in advance
Nikitas
( email - goumatianos@hotmail.com )