Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/GikoDataModule.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.59 by h677, Tue Jun 26 15:49:25 2007 UTC revision 1.60 by h677, Sun Jul 29 03:40:06 2007 UTC
# Line 2261  begin Line 2261  begin
2261                      if item <> nil then                      if item <> nil then
2262                          GikoForm.InsertBrowserTab( item, false );                          GikoForm.InsertBrowserTab( item, false );
2263                  end;                  end;
2264                  //最初の1枚に設定 アドレスの設定のためのカラ呼び                  //最初の1枚に設定
2265                  if GikoForm.BrowserTab.Tabs.Count > 0 then begin                  if (GikoSys.Setting.URLDisplay) and
2266                      GikoForm.BrowserTab.OnChange(nil);                      (GikoForm.BrowserTab.Tabs.Count > 0) then begin
2267                                            GikoForm.AddressComboBox.Text :=
2268                            TBrowserRecord(GikoForm.BrowserTab.Tabs.Objects[0]).Thread.URL;
2269                  end;                  end;
2270              end;              end;
2271          finally          finally

Legend:
Removed from v.1.59  
changed lines
  Added in v.1.60

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26