extern "C" __declspec( dllimport ) __stdcall BOOL EP_RegCheckAndSaveKey( char* Name, char* Key );

function EP_RegCheckAndSaveKey(  Name : PChar; Key : PChar) : boolean; stdcall;

Public Declare Function EP_RegCheckAndSaveKey Lib "enigma_ide.dll" (ByVal Name As String, ByVal Key As String) As Boolean

public class Enigma_IDE
{
    [DllImport("enigma_ide.dll", CallingConvention = CallingConvention.StdCall)]
    public static extern bool EP_RegCheckAndSaveKey(string Name, string Key);
}

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

function ProcessRegistration(Name, Key : string) : boolean;
begin
  Result := fasle;
  if EP_RegCheckAndSaveKey(PChar(Name), PChar(Key)) then // check and save registration information
  begin
    MessageBox(0, 'The Registration information had been saved successfully!', 'Application', 0); 
    Result := true; // return successful result
  end;
end;

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

BOOL ProcessRegistration(char* Name, char* Key)
{
  if (EP_RegCheckAndSaveKey(Name, Key)) // check and save registration information
  {
    MessageBox(0, "The Registration information had been saved successfully!", "Application", 0);
    return TRUE; // return successful result
  }
  return FALSE;
}

private void btnRegister_Click(object sender, System.EventArgs e)
{
    if (Enigma_IDE.EP_RegCheckAndSaveKey(tbUserInfo.Text , tbKey.Text ))
    {
        OnRegistration(true);
        MessageBox.Show("Registration key is valid!\nThanks you for registration!!!", "Registration completed");
    } 
    else
    {
        OnRegistration(false);
        MessageBox.Show("Registration key is invalid!\nPlease, try again!!!", "Registration incompleted");
    }
}