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.280 by yoffy, Mon Apr 12 05:55:45 2004 UTC revision 1.281 by yoffy, Mon Apr 12 13:06:51 2004 UTC
# Line 3354  begin Line 3354  begin
3354                          SetBoardListItem(TCategory(Obj));                          SetBoardListItem(TCategory(Obj));
3355                  end else if Obj is TBoard then begin                  end else if Obj is TBoard then begin
3356                          SetThreadListItem(TBoard(Obj));                          SetThreadListItem(TBoard(Obj));
                 end;  
         end;  
3357    
3358          if GikoSys.Setting.ListOrientation = gloHorizontal then begin                          if GikoSys.Setting.ListOrientation = gloHorizontal then begin
3359                  if GikoSys.Setting.ListWidthState = glsMax then begin                                  if GikoSys.Setting.ListWidthState = glsMax then begin
3360                          BrowserMinAction.Execute;                                          BrowserMinAction.Execute;
3361                          if GikoForm.Visible then                                          if GikoForm.Visible then
3362                                  ListView.SetFocus;                                                  ListView.SetFocus;
3363                  end;                                  end;
3364          end else begin                          end else begin
3365                  if GikoSys.Setting.ListHeightState = glsMax then begin                                  if GikoSys.Setting.ListHeightState = glsMax then begin
3366                          BrowserMinAction.Execute;                                          BrowserMinAction.Execute;
3367                          if GikoForm.Visible then                                          if GikoForm.Visible then
3368                                  ListView.SetFocus;                                                  ListView.SetFocus;
3369                                    end;
3370                            end;
3371                  end;                  end;
3372          end;          end;
3373  end;  end;

Legend:
Removed from v.1.280  
changed lines
  Added in v.1.281

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