Changeset 192
- Timestamp:
- May 17, 2019, 12:08:12 AM (6 years ago)
- Location:
- branches/generator
- Files:
-
- 12 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/generator/Forms/UFormGrammer.lfm
r190 r192 9 9 DesignTimePPI = 144 10 10 OnClose = FormClose 11 OnCreate = FormCreate 11 12 OnShow = FormShow 12 13 LCLVersion = '2.0.2.0' -
branches/generator/Forms/UFormGrammer.pas
r167 r192 21 21 Label2: TLabel; 22 22 procedure FormClose(Sender: TObject; var CloseAction: TCloseAction); 23 procedure FormCreate(Sender: TObject); 23 24 procedure FormShow(Sender: TObject); 24 25 private … … 51 52 begin 52 53 Core.PersistentForm1.Save(Self); 54 end; 55 56 procedure TFormGrammer.FormCreate(Sender: TObject); 57 begin 58 Core.CoolTranslator1.TranslateComponentRecursive(Self); 53 59 end; 54 60 -
branches/generator/Forms/UFormLookupTable.lfm
r190 r192 9 9 DesignTimePPI = 144 10 10 OnClose = FormClose 11 OnCreate = FormCreate 11 12 OnShow = FormShow 12 13 LCLVersion = '2.0.2.0' -
branches/generator/Forms/UFormLookupTable.pas
r167 r192 19 19 Label1: TLabel; 20 20 procedure FormClose(Sender: TObject; var CloseAction: TCloseAction); 21 procedure FormCreate(Sender: TObject); 21 22 procedure FormShow(Sender: TObject); 22 23 private … … 45 46 end; 46 47 48 procedure TFormLookupTable.FormCreate(Sender: TObject); 49 begin 50 Core.CoolTranslator1.TranslateComponentRecursive(Self); 51 end; 52 47 53 procedure TFormLookupTable.FormShow(Sender: TObject); 48 54 begin -
branches/generator/Forms/UFormLookupTables.pas
r137 r192 118 118 procedure TFormLookupTables.FormCreate(Sender: TObject); 119 119 begin 120 Core.CoolTranslator1.TranslateComponentRecursive(Self); 120 121 LookupTables := nil; 121 122 end; -
branches/generator/Forms/UFormRule.pas
r167 r192 80 80 I: TRuleLevel; 81 81 begin 82 Core.CoolTranslator1.TranslateComponentRecursive(Self); 82 83 FormRuleItems := TFormRuleItems.Create(nil); 83 84 FormRuleItems.ManualDock(TabSheet1); -
branches/generator/Forms/UFormRuleItem.pas
r137 r192 94 94 procedure TFormRuleItem.FormCreate(Sender: TObject); 95 95 begin 96 Core.CoolTranslator1.TranslateComponentRecursive(Self); 96 97 FormRuleItems := TFormRuleItems.Create(nil); 97 98 FormRuleItems.ManualDock(TabSheetSubItems); -
branches/generator/Forms/UFormRuleItems.pas
r136 r192 65 65 implementation 66 66 67 68 67 {$R *.lfm} 68 69 uses 70 UCore; 69 71 70 72 { TFormRuleItems } … … 151 153 procedure TFormRuleItems.FormCreate(Sender: TObject); 152 154 begin 155 Core.CoolTranslator1.TranslateComponentRecursive(Self); 153 156 RuleItems := nil; 154 157 end; -
branches/generator/Forms/UFormRules.pas
r137 r192 127 127 procedure TFormRules.FormCreate(Sender: TObject); 128 128 begin 129 Core.CoolTranslator1.TranslateComponentRecursive(Self); 129 130 Rules := nil; 130 131 end; -
branches/generator/Languages/generator.cs.po
r191 r192 25 25 msgctxt "tformgrammer.caption" 26 26 msgid "Grammer settings" 27 msgstr "Nastavenà gramatiky :"27 msgstr "Nastavenà gramatiky" 28 28 29 29 #: tformgrammer.label1.caption -
branches/generator/Packages/CoolTranslator
-
Property svn:ignore
set to
lib
-
Property svn:ignore
set to
-
branches/generator/generator.lpr
r191 r192 33 33 Application.CreateForm(TFormMain, FormMain); 34 34 Application.CreateForm(TFormRules, FormRules); 35 Application.CreateForm(TFormLookupTable, FormLookupTable);36 35 Application.Run; 37 36 end.
Note:
See TracChangeset
for help on using the changeset viewer.