| 1472 |
item : TThreadItem; |
item : TThreadItem; |
| 1473 |
begin |
begin |
| 1474 |
if FStartUp then begin |
if FStartUp then begin |
| 1475 |
|
FStartUp := false; |
| 1476 |
ShowWindow(Application.Handle, SW_HIDE); |
ShowWindow(Application.Handle, SW_HIDE); |
|
|
|
| 1477 |
//FormCreateでやると可視設定が反映されない場合があるのでFormShowでやることにした |
//FormCreateでやると可視設定が反映されない場合があるのでFormShowでやることにした |
| 1478 |
//ツールバー表示 |
//ツールバー表示 |
| 1479 |
GikoDM.StdToolBarVisibleAction.Checked := GikoSys.Setting.StdToolBarVisible; |
GikoDM.StdToolBarVisibleAction.Checked := GikoSys.Setting.StdToolBarVisible; |
| 1498 |
// ResetBandInfo( ListCoolBar, ListToolBar ); |
// ResetBandInfo( ListCoolBar, ListToolBar ); |
| 1499 |
FIsIgnoreResize := rtNone; |
FIsIgnoreResize := rtNone; |
| 1500 |
|
|
| 1501 |
|
//ActionListのGroupIndexを元に戻す |
| 1502 |
|
SetGroupIndex(GikoDM.GikoFormActionList); |
| 1503 |
|
|
| 1504 |
//FormCreteから移動。 |
//FormCreteから移動。 |
| 1505 |
if GikoSys.Setting.TabAutoLoadSave then begin |
if GikoSys.Setting.TabAutoLoadSave then begin |
| 1506 |
GikoDM.TabsOpenAction.Tag := 1; |
GikoDM.TabsOpenAction.Tag := 1; |
| 1508 |
GikoDM.TabsOpenAction.Tag := 0; |
GikoDM.TabsOpenAction.Tag := 0; |
| 1509 |
if (GikoSys.Setting.LastCloseTabURL <> '') then begin |
if (GikoSys.Setting.LastCloseTabURL <> '') then begin |
| 1510 |
if ( FActiveContent <> nil) and (FActiveContent.Browser <> nil) then begin |
if ( FActiveContent <> nil) and (FActiveContent.Browser <> nil) then begin |
|
PostMessage( Handle, USER_DOCUMENTCOMPLETE, Integer( FActiveContent.Browser ), 0 ); |
|
|
end; |
|
|
if ( FActiveContent <> nil) and (FActiveContent.Browser <> nil) then begin |
|
| 1511 |
while (FActiveContent.Browser.ReadyState <> READYSTATE_COMPLETE) and |
while (FActiveContent.Browser.ReadyState <> READYSTATE_COMPLETE) and |
| 1512 |
(FActiveContent.Browser.ReadyState <> READYSTATE_INTERACTIVE) do begin |
(FActiveContent.Browser.ReadyState <> READYSTATE_INTERACTIVE) do begin |
| 1513 |
Application.ProcessMessages; |
// メッセージを受け取らないようにスリープに変更 |
| 1514 |
|
Sleep(1); |
| 1515 |
end; |
end; |
| 1516 |
end; |
end; |
| 1517 |
item := BBSsFindThreadFromURL( GikoSys.Setting.LastCloseTabURL ); |
item := BBSsFindThreadFromURL( GikoSys.Setting.LastCloseTabURL ); |
| 1518 |
|
GikoSys.Setting.LastCloseTabURL := ''; |
| 1519 |
if (item <> nil) and (item.IsLogFile) then begin |
if (item <> nil) and (item.IsLogFile) then begin |
| 1520 |
OpenThreadItem(item, item.URL); |
OpenThreadItem(item, item.URL); |
| 1521 |
end; |
end; |
| 1522 |
GikoSys.Setting.LastCloseTabURL := ''; |
//ShowWindow(Self.Handle, SW_SHOW); |
| 1523 |
end; |
end; |
| 1524 |
end; |
end; |
|
|
|
|
//ActionListのGroupIndexを元に戻す |
|
|
SetGroupIndex(GikoDM.GikoFormActionList); |
|
|
|
|
|
FStartUp := false; |
|
| 1525 |
end; |
end; |
| 1526 |
end; |
end; |
| 1527 |
|
|