| Revisión | 919cd3a2d95a2535f517b7c41c74d778044a7200 (tree) |
|---|---|
| Tiempo | 2007-07-29 12:13:13 |
| Autor | h677 <h677> |
| Commiter | h677 |
起動時のタブ復元で左端のスクロール位置がトップに戻る不具合の修正
Giko.pas (diff) GikoDataModule.pas (diff)
gikoNavi.res (diff)| @@ -2740,7 +2740,8 @@ var | ||
| 2740 | 2740 | begin |
| 2741 | 2741 | Thread := inThread; |
| 2742 | 2742 | idx := BrowserTab.TabIndex; |
| 2743 | - if (FActiveContent <> nil) and | |
| 2743 | + if (not FStartUp) and | |
| 2744 | + (FActiveContent <> nil) and | |
| 2744 | 2745 | (FActiveContent.Thread <> Thread.Thread) and |
| 2745 | 2746 | (FActiveContent.Browser <> nil) and |
| 2746 | 2747 | (Assigned(FActiveContent.Browser.Document)) then begin |
| @@ -2261,9 +2261,11 @@ begin | ||
| 2261 | 2261 | if item <> nil then |
| 2262 | 2262 | GikoForm.InsertBrowserTab( item, false ); |
| 2263 | 2263 | end; |
| 2264 | - //最初の１枚に設定 アドレスの設定のためのカラ呼び | |
| 2265 | - if GikoForm.BrowserTab.Tabs.Count > 0 then begin | |
| 2266 | - GikoForm.BrowserTab.OnChange(nil); | |
| 2264 | + //最初の１枚に設定 | |
| 2265 | + if (GikoSys.Setting.URLDisplay) and | |
| 2266 | + (GikoForm.BrowserTab.Tabs.Count > 0) then begin | |
| 2267 | + GikoForm.AddressComboBox.Text := | |
| 2268 | + TBrowserRecord(GikoForm.BrowserTab.Tabs.Objects[0]).Thread.URL; | |
| 2267 | 2269 | end; |
| 2268 | 2270 | end; |
| 2269 | 2271 | finally |
Fork