Changeset 22 for trunk/UOptionsForm.pas


Ignore:
Timestamp:
Feb 12, 2012, 8:15:36 PM (13 years ago)
Author:
chronos
Message:
  • Fixed: Default language selection and remeber explicitly selected language.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/UOptionsForm.pas

    r21 r22  
    4747begin
    4848  MainForm.CoolTranslator1.LanguageListToStrings(ComboBoxLanguage.Items);
    49   ComboBoxLanguage.ItemIndex := MainForm.CoolTranslator1.Languages.IndexOf(MainForm.CoolTranslator1.Language);
     49  ComboBoxLanguage.ItemIndex := ComboBoxLanguage.Items.IndexOfObject(MainForm.CoolTranslator1.Language);
    5050  if ComboBoxLanguage.ItemIndex = -1 then ComboBoxLanguage.ItemIndex := 0;
    5151  CheckBox1.Checked := MainForm.OpenProjectOnStart;
Note: See TracChangeset for help on using the changeset viewer.