TServerSocket hjælp

Jeg sidder og prøver at lave mig et lille chat program, men har et problem med at få brugt TServerSocket's "On" procedurerer...
Da jeg har Delphi 7 Personal ligger de ikke oppe i component fanerne, så jeg er nødt til at lave dem ved hjælp af noget kode

I kan se hele koden til programmet her:

Kode 

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ScktComp, StdCtrls;

type
  TForm1 = class(TForm)
    Memo1: TMemo;
    procedure FormCreate(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    procedure ServerSocket1ClientRead(Sender: TObject;
      Socket: TCustomWinSocket)
  private
    { Private declarations }
    ServerSocket1: TServerSocket;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  ServerSocket1 := TServerSocket.Create(nil);

  ServerSocket1.Port := 20;
  ServerSocket1.Active := True;

  ServerSocket1.OnClientRead := //Her skal den kalde ServerSocket1ClientRead :)
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  ServerSocket1.Active := False;
end;

procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
  Socket: TCustomWinSocket)
begin
  Memo1.Lines.Assign(Socket.ReceiveText);
end;

end.

Mit problem er, at jeg ikke ved havd der skal stå ved TCustomWinSocket... Håber nogen kan hjælpe...

Altså:
ServerSocket1.OnClientRead := ServerSocket1ClientRead(Self, ??);

/Mads

Da jeg har Delphi 7 Personal ligger de ikke oppe i component fanerne, så jeg er nødt til at lave dem ved hjælp af noget kode

Da jeg har Delphi 7 Personal ligger de ikke oppe i component fanerne, så jeg er nødt til at lave dem ved hjælp af noget kode

I Delphis Readme.txt kan du læse hvordan du installerer dem...

Emil Melgaard