ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/Settings.pas
(Generate patch)

Comparing oup/current/Settings.pas (file contents):
Revision 109 by alloc, Wed Feb 21 03:12:33 2007 UTC vs.
Revision 112 by alloc, Thu Feb 22 00:37:39 2007 UTC

# Line 6 | Line 6 | uses
6  
7   type
8    TForm_Settings = class(TForm)
9 –    check_filesashex: TCheckBox;
9      btn_ok:     TButton;
10      btn_cancel: TButton;
11      label_charset: TLabel;
# Line 97 | Line 96 | procedure TForm_Settings.btn_okClick(Sen
96   var
97    temps: String;
98   begin
100 –  AppSettings.FilenumbersAsHex := check_filesashex.Checked;
99    AppSettings.CharSet := StrToInt(
100      MidStr(combo_charset.Items.Strings[combo_charset.ItemIndex], Pos(
101      ' ', combo_charset.Items.Strings[combo_charset.ItemIndex]) + 3, Length(
# Line 182 | Line 180 | begin
180    else
181      check_reg_opf.Checked := False;
182  
185 –  check_filesashex.Checked := AppSettings.FilenumbersAsHex;
183    check_hideunused.Checked := AppSettings.HideUnusedData;
184  
185    for i := 0 to combo_charset.Items.Count - 1 do

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)