２ちゃんねるブラウザ「OpenJnae」規制解除改造ｽﾚ

全て更新

procedure TMainWnd.actAllThreadUpdateExecute(Sender: TObject);
var
　i ,j: integer;
begin
　j := TabControl.TabIndex;
　for i:=0 to TabControl.Tabs.Count-1 do
　begin
　　TabControl.TabIndex := i;
　　ThreadChkNewResButtonClick(nil);
　end;
　TabControl.TabIndex := j;
end;

メインメニューの項目を増やしたりして追加