Foros Club Delphi - Error al importar dll

Buenas,

estoy intentando compilar un proyecto nuevo, en el que importo una librería dll. Pero me da un error de compilación (lo indico abajo en el código), a priori sencillo de resolver, pero no encuentro el problema.
Podeis echarme una mano?.

Saludos y gracias.

Código:

unit Tarjeta;



interface



uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, ExtCtrls, StdCtrls;



type

  TFormPrincipal1 = class(TForm)

  private

    { Private declarations }

  public

    { Public declarations }

    procedure AUX;

  end;



var

  FormPrincipal1: TFormPrincipal1;

  dev:THANDLE;



implementation



{$R *.DFM}



const SmartCardLibrary='LTC2x.dll';



type LONG=longint;

     INT=smallint;

     pINT=PINTEGER;



function C3Reset        (hComDev:THandle;LATR:pINT;ATR:pointer):LONG;                                                                stdcall; external SmartCardLibrary name 'C3RESET';

function C3IfdStatus    (hComDev:THandle):LONG;                                                                                      stdcall; external SmartCardLibrary name 'C3IFDSTATUS';

function C3CardInserted (hCommDev:THandle;CCA:INT):bool;                                                                             stdcall; external SmartCardLibrary name 'C3CARDINSERTED';

function C3ReaderPowered(hCommDev:THandle):bool;                                                                                     stdcall; external SmartCardLibrary name 'C3READERPOWERED';

function C3Open         (Port:PCHAR):THandle;                                                                                        stdcall; external SmartCardLibrary name 'C3OPEN';

function C3Close        (hComDev:THandle):bool;



procedure TFormPrincipal1.AUX; <- Error de ... ';' expected but '.' found

begin

  ShowMessage('Prueba');

end;





end.