Class THttpTestForm (unit httptst1) |
Inherits from
TForm
procedure AbortButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Check64ButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure FormClose(Sender: TObject; var Action: TCloseAction);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure FormShow(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure GetButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HeadButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HttpCli1Command(Sender: TObject; const s: String);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HttpCli1DocBegin(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HttpCli1DocEnd(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HttpCli1RequestDone(Sender: TObject; RqType: THttpRequest;
Error: Word);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure PostButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SetButtonState(State : Boolean);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
AbortButton : TButton;
Check64Button : TButton;
DataEdit : TEdit;
DateTimeEdit : TEdit;
DisplayMemo : TMemo;
DocumentMemo : TMemo;
GetButton : TButton;
HeadButton : TButton;
HttpCli1 : THttpCli;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Panel1 : TPanel;
PostButton : TButton;
ProxyHostEdit : TEdit;
ProxyPortEdit : TEdit;
URLEdit : TEdit;
Initialized : Boolean;
Déclarations privées
procedure AbortButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Check64ButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure FormClose(Sender: TObject; var Action: TCloseAction);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure FormShow(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure GetButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HeadButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HttpCli1Command(Sender: TObject; const s: String);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HttpCli1DocBegin(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HttpCli1DocEnd(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure HttpCli1RequestDone(Sender: TObject; RqType: THttpRequest;
Error: Word);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure PostButtonClick(Sender: TObject);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SetButtonState(State : Boolean);
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
AbortButton : TButton;
Check64Button : TButton;
DataEdit : TEdit;
DateTimeEdit : TEdit;
DisplayMemo : TMemo;
DocumentMemo : TMemo;
GetButton : TButton;
HeadButton : TButton;
HttpCli1 : THttpCli;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Panel1 : TPanel;
PostButton : TButton;
ProxyHostEdit : TEdit;
ProxyPortEdit : TEdit;
URLEdit : TEdit;
Initialized : Boolean;
Déclarations privées