Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/Option.pas

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

revision 1.95 by h677, Tue Feb 22 13:37:51 2011 UTC revision 1.96 by h677, Sun Feb 27 01:30:50 2011 UTC
# Line 1725  procedure TOptionDialog.BoukenDelButtonC Line 1725  procedure TOptionDialog.BoukenDelButtonC
1725  begin  begin
1726      if ( BoukenComboBox.Items.IndexOf( BoukenComboBox.Text ) <> -1 ) then begin      if ( BoukenComboBox.Items.IndexOf( BoukenComboBox.Text ) <> -1 ) then begin
1727          if MsgBox(Self.Handle, BoukenComboBox.Text + ' を削除します。'#13#10 +          if MsgBox(Self.Handle, BoukenComboBox.Text + ' を削除します。'#13#10 +
1728              '削除すると復元できません。よろしいですか?', '冒険の書 ドメイン削除', MB_YESNO or MB_ICONQUESTION) = IDYES        then begin              '削除すると復元できません。よろしいですか?', '忍法帖 ドメイン削除', MB_YESNO or MB_ICONQUESTION) = IDYES  then begin
1729              GikoSys.DelBoukenCookie(BoukenComboBox.Text);              GikoSys.DelBoukenCookie(BoukenComboBox.Text);
1730              GikoSys.Setting.WriteBoukenSettingFile;              GikoSys.Setting.WriteBoukenSettingFile;
1731              BoukenComboBox.Items.Delete(BoukenComboBox.ItemIndex);              BoukenComboBox.Items.Delete(BoukenComboBox.ItemIndex);

Legend:
Removed from v.1.95  
changed lines
  Added in v.1.96

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