CAIdHttp.pas 364 B

123456789101112131415161718192021222324252627282930313233
  1. unit CAIdHttp;
  2. interface
  3. uses
  4. IdHTTP, Controls, Classes;
  5. type
  6. TCAIdHttp = class(TIdHTTP)
  7. private
  8. public
  9. // constructor Create(AOnwer: TComponent);
  10. end;
  11. implementation
  12. { TCAIdHttp }
  13. //constructor TCAIdHttp.Create(AOnwer: TComponent);
  14. //begin
  15. //// Request
  16. //end;
  17. procedure test;
  18. var
  19. ht: TIdHTTP;
  20. begin
  21. ht := TIdHTTP.Create(nil);
  22. end;
  23. end.