DLL问题？？

CONST
  LIBRARYNAME = '<文件名>.DLL';TYPE
  PACKETS=ARRAY [1..512] OF CHAR;
  PPACKET=^PACKETs;FUNCTION FormatPacket(PPacket:PPACKET;
                      PacketSize:WORD):WORD;stdcall; external LIBRARYNAME;
FUNCTION Version(ApiPacket:PPACKET;
                out mVer1 :POINTER;
                out mVer2 :POINTER;
                out rev  :POINTER;
                out osDT :POINTER)
                :WORD;stdcall; external LIBRARYNAME;FUNCTION GetRound(Packet:PPACKET;
                  Vin  :WORD;
                  add1  : POINTER;
                  add2  : POINTER )
                  :WORD;stdcall; external LIBRARYNAME;
implementation{$R *.dfm}end.