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

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

Public Declare Function EP_TrialDays 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_TrialDays(ref Int32 Total, ref Int32 Left);
}

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

procedure CheckTrial;
var
  TotalDays : integer;
  LeftDays  : integer;
begin
  if EP_TrialDays(TotalDays, LeftDays) then
  begin
    if LeftDays = 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 days 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 TotalDays;
  int LeftDays;
  if (EP_TrialDays(&TotalDays, &LeftDays))
  {
    if (LeftDays == 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);
  }
}