Var OkResult:string; begin OkResult:=string(OD_DataXor(pchar(session_id))); end;
{ char* OkResult; OkResult = OD_DataXor(session_id); }
Dim OkResult As String OkResult = OD_DataXor(session_id)