interface
uses
  forms,IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
  IdEcho;      function MyAloneFunc(v:integer):integer;    implementation    function MyAloneFunc(v:integer):integer;
var
  IdEcho: TIdEcho;
begin
  IdEcho:=TIdEcho.Create(Application);
  IdEcho.Free;
end;