Prozedur umleiten?

[Pseudemys Nelsoni]

hi,

ich schreib grad eine dll, und versuche eine verbindung auzubauen und möchte OnConnect reagieren...aber wieso geht das hier nicht bzw was ist daran falsch:

Delphi-Quellcode:

library Project2;

uses
  Classes, ScktComp, md5;

{$R *.res}

procedure sockConnect(Socket: TSocketNotifyEvent);
begin
  Socket.       //  <<< hier nach dem "." erscheint nichtmal ein popup...
end;

var
  sock: TClientSocket;

begin
  sock := TClientSocket.Create(nil);
  sock.Address := '213.39.196.118';
  sock.Port := 1234;
  sock.OnConnect := sockConnect;
  sock.Open;
end.

?