extern "C" __declspec( dllimport ) __stdcall BOOL EP_TrialExecutions( int* Total, int* Left );

function EP_TrialExecutions( var Total, Left : integer) : boolean; stdcall;

Public Declare Function EP_TrialExecutions Lib "enigma_ide.dll" (ByRef Total As Long, ByRef Left As Long) As Byte

public class Enigma_IDE
{
    [DllImport("enigma_ide.dll", CallingConvention = CallingConvention.StdCall)]
    public static extern bool EP_TrialExecutions(ref Int32 Total, ref Int32 Left);
}

uses 
  enigma_ide; // the module contains a definitions of Enigma API

procedure CheckTrial;
var
  TotalExecs : integer;
  LeftExecs  : integer;
begin
  if EP_TrialExecutions(TotalExecs, LeftExecs) then
  begin
    if LeftExecs = 0 then 
    begin
      MessageBox(0, 'Your trial period has expired! You must purchase application to take effect!', 'Application', 0);
      ExitProcess(0);
    end;
  end else 
    MessageBox(0, 'I seem that you have forgotten to define executions trial limit in Enigma!', 'Application', 0);
end;

#include "include/enigma_api.h" // the module contains a definitions of Enigma API
#pragma link "include/enigma_ide.lib"

void CheckTrial()
{
  int TotalExecs;
  int LeftExecs;
  if (EP_TrialExecutions(&TotalExecs, &LeftExecs))
  {
    if (LeftExecs == 0)
    {
      MessageBox(0, "Your trial period has expired! You must purchase application to take effect!", "Application", 0);
      ExitProcess(0);
    }
  } else
  {
    MessageBox(0, "I seem that you have forgotten to define days trial limit in Enigma!", "Application", 0);
  }
}