Var OkResult:string; LicenceKey:string; LicenceKey:='07B4767637E13FCE529D46EA92B086FEB82232C6D8458956FD863B252E793ACA6F3A21C53D81A1922D9B4A656A44474D436BE4B625D21EE25175C427F7816AE8' Begin OkResult:=string(OD_CheckLicence(pchar(session_id),pchar(LicenceKey))); end;
{ char* OkResult; char* LicenceKey; LicenceKey="07B4767637E13FCE529D46EA92B086FEB82232C6D8458956FD863B252E793ACA6F3A21C53D81A1922D9B4A656A44474D436BE4B625D21EE25175C427F7816AE8"; OkResult = OD_CheckLicence(session_id,LicenceKey); }
Dim OkResult As String Dim LicenceKey As String LicenceKey="07B4767637E13FCE529D46EA92B086FEB82232C6D8458956FD863B252E793ACA6F3A21C53D81A1922D9B4A656A44474D436BE4B625D21EE25175C427F7816AE8" OkResult = OD_CheckLicence(session_id,LicenceKey)