Var OkResult:string; begin OkResult:=string(OD_DeleteMemory(pchar(session_id),'0')); end;
{ char* OkResult; OkResult = OD_DeleteMemory(session_id,"0"); }
Dim OkResult As String OkResult = OD_DeleteMemory(session_id,"0");