units/indy/IdRawClient.pas

   1 // 19-nov-2002
   2 unit IdRawClient;
   3
   4 interface
   5
   6 uses IdRawBase;
   7
   8 type
   9   PIdRawClient=^TIdRawClient;
  10   TIdRawClient = object(TIdRawBase)
  11 //  public
  12  //   procedure Init; virtual;
  13 //    public
  14    { published }
  15 //    property ReceiveTimeout;
  16 //    property Host;
  17 //    property Port;
  18 //    property Protocol;
  19   end;
  20
  21 function NewIdRawClient:PIdRawClient;
  22
  23 implementation
  24
  25 function NewIdRawClient:PIdRawClient;
  26 begin
  27   New( Result, Create );
  28 end;
  29
  30 {procedure TIdRawClient.Init;
  31 begin
  32   inherited;
  33 end;     }
  34
  35 end.