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