Var OkResult:string; begin OkResult:=string(OD_DesEnc('SampleStringData','12345678')); end;
{ char* OkResult; OkResult = OD_DesEnc("SampleStringData","12345678"); }
Dim OkResult As String OkResult = OD_DesEnc("SampleStringData","12345678")