Var OkResult:string; begin OkResult:=string(OD_ShowError('1')); end;
{ char* OkResult; OkResult = OD_ShowError("1"); }
Dim OkResult As String OkResult = OD_ShowError("1")