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.29 by h677, Wed Mar 24 09:51:44 2004 UTC revision 1.30 by h677, Tue Mar 30 12:45:25 2004 UTC
# Line 183  type Line 183  type
183      CreationTimeLogsCheckBox: TCheckBox;      CreationTimeLogsCheckBox: TCheckBox;
184      FutureThreadCheckBox: TCheckBox;      FutureThreadCheckBox: TCheckBox;
185      DeleteSyriaCheckBox: TCheckBox;      DeleteSyriaCheckBox: TCheckBox;
186        TabSheet4: TTabSheet;
187        SambaGroupBox: TGroupBox;
188        UseSambaCheckBox: TCheckBox;
189                  procedure FormCreate(Sender: TObject);                  procedure FormCreate(Sender: TObject);
190                  procedure FormDestroy(Sender: TObject);                  procedure FormDestroy(Sender: TObject);
191                  procedure ApplyButtonClick(Sender: TObject);                  procedure ApplyButtonClick(Sender: TObject);
# Line 698  begin Line 701  begin
701          LogDeleteMessageCheckBox.Checked := GikoSys.Setting.DeleteMsg;          LogDeleteMessageCheckBox.Checked := GikoSys.Setting.DeleteMsg;
702          //終了時確認ダイアログ          //終了時確認ダイアログ
703          ShowDialogForEndCheckBox.Checked := GikoSys.Setting.ShowDialogForEnd;          ShowDialogForEndCheckBox.Checked := GikoSys.Setting.ShowDialogForEnd;
704        //Samba
705        UseSambaCheckBox.Checked := GikoSys.Setting.UseSamba;
706          //ポップアップ位置          //ポップアップ位置
707          case GikoSys.Setting.PopupPosition of          case GikoSys.Setting.PopupPosition of
708                  gppRightTop:            PopupPositionRadioGroup.ItemIndex := 0;                  gppRightTop:            PopupPositionRadioGroup.ItemIndex := 0;
# Line 874  begin Line 878  begin
878          GikoSys.Setting.DeleteMsg := LogDeleteMessageCheckBox.Checked;          GikoSys.Setting.DeleteMsg := LogDeleteMessageCheckBox.Checked;
879          //終了時確認ダイアログ          //終了時確認ダイアログ
880          GikoSys.Setting.ShowDialogForEnd := ShowDialogForEndCheckBox.Checked;          GikoSys.Setting.ShowDialogForEnd := ShowDialogForEndCheckBox.Checked;
881        //Samba
882        GikoSys.Setting.UseSamba := UseSambaCheckBox.Checked;
883          //ポップアップ位置          //ポップアップ位置
884          case PopupPositionRadioGroup.ItemIndex of          case PopupPositionRadioGroup.ItemIndex of
885                  0: GikoSys.Setting.PopupPosition := gppRightTop;                  0: GikoSys.Setting.PopupPosition := gppRightTop;

Legend:
Removed from v.1.29  
changed lines
  Added in v.1.30

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