// *********************************************************************//
// DispIntf: ISEMServerDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {289FCFF1-A846-11D6-AE04-000103189EA7}
// *********************************************************************//
ISEMServerDisp = dispinterface
['{289FCFF1-A846-11D6-AE04-000103189EA7}']
procedure Scoring(const ClientID: WideString; const RequstID: WideString;
const Person: WideString; const InP: WideString; out OutP: OleVariant); dispid 1;
end;


я для оутпут параметра импользую olevariant