| 449 |
ToolButton16: TToolButton; |
ToolButton16: TToolButton; |
| 450 |
AllResAction: TAction; |
AllResAction: TAction; |
| 451 |
AllResToolButton: TToolButton; |
AllResToolButton: TToolButton; |
| 452 |
N41: TMenuItem; |
Reload: TMenuItem; |
| 453 |
N42: TMenuItem; |
GoBack: TMenuItem; |
| 454 |
N49: TMenuItem; |
GoFoward: TMenuItem; |
| 455 |
|
EditAction: TAction; |
| 456 |
|
ReloadAction: TAction; |
| 457 |
|
GoFowardAction: TAction; |
| 458 |
|
GoBackAction: TAction; |
| 459 |
procedure FormCreate(Sender: TObject); |
procedure FormCreate(Sender: TObject); |
| 460 |
procedure FormDestroy(Sender: TObject); |
procedure FormDestroy(Sender: TObject); |
| 461 |
procedure CabinetPanelHide(Sender: TObject); |
procedure CabinetPanelHide(Sender: TObject); |
| 699 |
Shift: TShiftState); |
Shift: TShiftState); |
| 700 |
procedure AllResActionExecute(Sender: TObject); |
procedure AllResActionExecute(Sender: TObject); |
| 701 |
procedure AllResActionUpdate(Sender: TObject); |
procedure AllResActionUpdate(Sender: TObject); |
| 702 |
procedure N41Click(Sender: TObject); |
procedure ReloadClick(Sender: TObject); |
| 703 |
procedure N42Click(Sender: TObject); |
procedure GoBackClick(Sender: TObject); |
| 704 |
procedure N49Click(Sender: TObject); |
procedure GoFowardClick(Sender: TObject); |
| 705 |
private |
private |
| 706 |
{ Private 宣言 } |
{ Private 宣言 } |
| 707 |
|
|
| 6792 |
AllResAction.Enabled := GetActiveContent <> nil; |
AllResAction.Enabled := GetActiveContent <> nil; |
| 6793 |
end; |
end; |
| 6794 |
|
|
| 6795 |
procedure TGikoForm.N41Click(Sender: TObject); |
procedure TGikoForm.ReloadClick(Sender: TObject); |
| 6796 |
var |
var |
| 6797 |
ThreadItem : TThreadItem; |
ThreadItem : TThreadItem; |
| 6798 |
begin |
begin |
| 6807 |
|
|
| 6808 |
end; |
end; |
| 6809 |
|
|
| 6810 |
procedure TGikoForm.N42Click(Sender: TObject); |
procedure TGikoForm.GoBackClick(Sender: TObject); |
| 6811 |
var |
var |
| 6812 |
ThreadItem : TThreadItem; |
ThreadItem : TThreadItem; |
| 6813 |
begin |
begin |
| 6823 |
|
|
| 6824 |
end; |
end; |
| 6825 |
|
|
| 6826 |
procedure TGikoForm.N49Click(Sender: TObject); |
procedure TGikoForm.GoFowardClick(Sender: TObject); |
| 6827 |
var |
var |
| 6828 |
ThreadItem : TThreadItem; |
ThreadItem : TThreadItem; |
| 6829 |
begin |
begin |