My program register _ DLL

It took two nights to create a DLLProgramRegistered

The address is in zzaiss.ik8.com/soft/register.rar.
Registration machine zzaiss.ik8.com/soft/getregsn.rar

During registration, you only need to copy the date and time in the serial number you have applied for. If you do not want to copy the serial number, you can obtain the copied date and time.

Enter the registration number in the text box, and click the registration code.

 

The export function of the DLL is named:

Function checkreg (handle: thandle; var days: integer): integer; stdcall;

Example

// Use static import or dynamic import of loadlibrary
Function checkreg (handle: thandle; var days: integer): integer; stdcall; External 'dll/register. dll ';

Use

Re: = checkreg (application. Handle, days );
If (RE = 1) or (RE = 2) then
Begin
If Re = 2 then // you can change the following to change the title bar.
Appconfig ^. appname: = appconfig ^. appname +
'--- Unregistered version can also use' + inttostr (days) +
'Day ';

End else
Begin
Application. Terminate;
Exit;
End;

Return Value
1-> Successful
2-> within the validity period
3-> program destroyed
4-> Registration
5-> exit