Undefinierter Bezeichner: 'ServerClientRead'

[DeddyH]

Versuch es mal so:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    Button1: TButton;
    Memo1: TMemo;
    procedure DdeServerConv1Open(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure ServerClientRead(Sender: TObject; Socket: TCustomWinSocket);  //diese Zeile fehlt
  private
    { Private-Deklarationen }
  public
    Server: TServerSocket;
    Client: TClientSocket;
    { Public-Deklarationen }
  end;