вот ошипочные строки

ошипка
[Error] Unit1.pas(19): Undeclared identifier: 'TIdSocketHandle'
Строка
ABinding: TIdSocketHandle);
---------------------------------------------------------
ошипка
[Error] Unit1.pas(46): ')' expected but identifier 'PeerIP' found
Строка
Memo1.Lines.Add(ABinding.PeerIP+' '+StringFormatedStream.DataString);
---------------------------------------------------------
ошипка
[Error] Unit1.pas(46): 'END' expected but ')' found
строка
Memo1.Lines.Add(ABinding.PeerIP+' '+StringFormatedStream.DataString);
---------------------------------------------------------
ошипка
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'
строка
Unit1 in 'Unit1.pas' {Form1};