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.674 by h677, Sun Jun 15 13:31:48 2008 UTC revision 1.675 by h677, Sun Jul 6 04:14:54 2008 UTC
# Line 1739  begin Line 1739  begin
1739                                  BBSs[ i ].Free;                                  BBSs[ i ].Free;
1740                          BBSs[ i ] := nil;                          BBSs[ i ] := nil;
1741                  end;                  end;
1742            DestorySpecialBBS(BoardGroup.SpecialBBS);
1743          except          except
1744          end;          end;
1745    
# Line 3084  begin Line 3085  begin
3085                  BBSs[i].SelectText := SelectText;                  BBSs[i].SelectText := SelectText;
3086                  BBSs[i].KubetsuChk := KubetsuChk;                  BBSs[i].KubetsuChk := KubetsuChk;
3087          end;          end;
3088        BoardGroup.SpecialBBS.SelectText := SelectText;
3089        BoardGroup.SpecialBBS.KubetsuChk := KubetsuChk;
3090        
3091          ViewType := AViewType;          ViewType := AViewType;
3092          if ActiveList is TBoard then begin          if ActiveList is TBoard then begin
3093                  Board := TBoard(ActiveList);                  Board := TBoard(ActiveList);

Legend:
Removed from v.1.674  
changed lines
  Added in v.1.675

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