Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Round.pas

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

revision 1.7 by deux, Wed Dec 24 08:18:31 2003 UTC revision 1.8 by h677, Tue Jan 6 13:49:18 2004 UTC
# Line 69  begin Line 69  begin
69  //              GikoSys.MsgBox(msg, 'エラー', MB_OK or MB_ICONSTOP);  //              GikoSys.MsgBox(msg, 'エラー', MB_OK or MB_ICONSTOP);
70  //              Exit;  //              Exit;
71  //      end;  //      end;
72  //    Giko.GikoForm.LoginAction.Checked := true;      Giko.GikoForm.LoginAction.Checked := true;
73          if not Giko.GikoForm.LoginAction.Checked then begin          if not Giko.GikoForm.LoginAction.Checked then begin
74                  msg := 'ログインしないと巡回は出来ません';// + #13#10                  msg := 'ログインしないと巡回は出来ません';// + #13#10
75  //                               + '分からない人はギコナビスレッドで聞いてください';  //                               + '分からない人はギコナビスレッドで聞いてください';
# Line 258  end; Line 258  end;
258    
259  procedure TRoundDialog.RoundDeleteButtonClick(Sender: TObject);  procedure TRoundDialog.RoundDeleteButtonClick(Sender: TObject);
260  var  var
261          Board: TBoard;  //      Board: TBoard;
262          ThreadItem: TThreadItem;  //      ThreadItem: TThreadItem;
263          RoundItem: TRoundItem;          RoundItem: TRoundItem;
264          ListChangeEvent: TLVChangeEvent;          ListChangeEvent: TLVChangeEvent;
265  begin  begin

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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