Delphi:

public procedure Add(var ASessionID: string; ASession: TObject);

C++:

void public: __fastcall Add(String ASessionID, TObject * ASession);