Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Giko.pas

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

revision 1.413 by yoffy, Wed Sep 8 15:52:10 2004 UTC revision 1.414 by yoffy, Thu Sep 9 02:26:20 2004 UTC
# Line 4516  begin Line 4516  begin
4516                                  SetActiveList( Item );                                  SetActiveList( Item );
4517                          end;                          end;
4518                  end;                  end;
4519            end;
4520    
4521                  if Item is TBoard then begin // not TCategory          if Item is TBoard then begin // not TCategory
4522                          if GikoSys.Setting.ListOrientation = gloHorizontal then begin                  if GikoSys.Setting.ListOrientation = gloHorizontal then begin
4523                                  if GikoSys.Setting.ListWidthState = glsMax then begin                          if GikoSys.Setting.ListWidthState = glsMax then begin
4524                                          BrowserMinAction.Execute;                                  BrowserMinAction.Execute;
4525                                          if GikoForm.Visible then                                  if GikoForm.Visible then
4526                                                  ListView.SetFocus;                                          ListView.SetFocus;
4527                                  end;                          end;
4528                          end else begin                  end else begin
4529                                  if GikoSys.Setting.ListHeightState = glsMax then begin                          if GikoSys.Setting.ListHeightState = glsMax then begin
4530                                          BrowserMinAction.Execute;                                  BrowserMinAction.Execute;
4531                                          if GikoForm.Visible then                                  if GikoForm.Visible then
4532                                                  ListView.SetFocus;                                          ListView.SetFocus;
                                 end;  
4533                          end;                          end;
4534                  end;                  end;
4535          end;          end;

Legend:
Removed from v.1.413  
changed lines
  Added in v.1.414

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