VMProtectGetSerialNumberState witch flags in

Issues related to VMProtect
Post Reply
ouiouioui
Posts: 3
Joined: Thu Dec 17, 2009 4:56 pm
Contact:

VMProtectGetSerialNumberState witch flags in

Post by ouiouioui »

Hello, how find in result of VMProtectGetSerialNumberState witch flags set ?
If SERIAL_STATE_FLAG_DATE_EXPIRED and SERIAL_STATE_FLAG_MAX_BUILD_EXPIRED are set i get 72 so what is the reverse for get the flags

I don't how get all flags set in VMProtectGetSerialNumberState.

I use Delphi.

Many thanks for your help.

Regards, Alexandre.
Admin
Site Admin
Posts: 2693
Joined: Mon Aug 21, 2006 8:19 pm
Location: Russia, E-burg
Contact:

Re: VMProtectGetSerialNumberState witch flags in

Post by Admin »

Please see the example from VMProtect Ultimate\Examples\Licensing\Delphi:

Code: Select all

unit Unit1;
...
  // set the serial number
  nState := VMProtectSetSerialNumber(PAnsiChar(AnsiString(edSerialNumber.Text)));

  // parse serial number state
  edInfo.Lines.Clear;
  edInfo.Lines.Add(Format('VMProtectSetSerialNumber() returned: 0x%.8X', [nState]));
  if nState and SERIAL_STATE_FLAG_CORRUPTED <> 0 then
   edInfo.Lines.Add(#9'SERIAL_STATE_FLAG_CORRUPTED');
  if nState and SERIAL_STATE_FLAG_INVALID <> 0 then
   edInfo.Lines.Add(#9'SERIAL_STATE_FLAG_INVALID');
  if nState and SERIAL_STATE_FLAG_BLACKLISTED <> 0 then
   edInfo.Lines.Add(#9'SERIAL_STATE_FLAG_BLACKLISTED');
  if nState and SERIAL_STATE_FLAG_DATE_EXPIRED <> 0 then
   edInfo.Lines.Add(#9'SERIAL_STATE_FLAG_DATE_EXPIRED');
  if nState and SERIAL_STATE_FLAG_RUNNING_TIME_OVER <> 0 then
   edInfo.Lines.Add(#9'SERIAL_STATE_FLAG_RUNNING_TIME_OVER');
  if nState and SERIAL_STATE_FLAG_BAD_HWID <> 0 then
   edInfo.Lines.Add(#9'SERIAL_STATE_FLAG_BAD_HWID');
  if nState and SERIAL_STATE_FLAG_MAX_BUILD_EXPIRED <> 0 then
   edInfo.Lines.Add(#9'SERIAL_STATE_FLAG_MAX_BUILD_EXPIRED');
...
ouiouioui
Posts: 3
Joined: Thu Dec 17, 2009 4:56 pm
Contact:

Re: VMProtectGetSerialNumberState witch flags in

Post by ouiouioui »

Many thanks for your help. It's perfect.
Post Reply