DLL Code LUA fähig machen???

[GoSk4te]

zu aufrufkonvention: hab bereits stdcall verwendet... zu strings: ok, hab ich ausgetauscht.
Immer noch Fehlermeldung: "Lua Error". Mehr nicht. Hier der Code, vllt stimmt ja was net:
(Ist bis jetzt nur zum testen obs klappt...)

Code:

library Project1;


uses
    ShareMem,
  SysUtils,
  ScktComp,
  Classes;

{$R *.RES}

var
 clientSocket: TClientSocket;
 serverSocket: TServerSocket;

 procedure Connect(IP: PChar; Port: Integer); stdcall;
 begin
      clientSocket := TClientSocket.Create(clientSocket);
      clientSocket.Port := Port;
      clientSocket.Host := IP;
      clientSocket.Open;
 end;

 procedure Listen(Port: Integer); stdcall;
 begin
      serverSocket := TServerSocket.Create(serverSocket);
      serverSocket.Port := Port;
      serverSocket.Open;
 end;


 exports
 Connect,
 Listen;

begin
end.