Changeset 33
- Timestamp:
- Jun 29, 2024, 8:04:24 AM (2 months ago)
- Location:
- trunk
- Files:
-
- 1 deleted
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Core.pas
r32 r33 68 68 Preferences := TPreferences.Create; 69 69 70 LoadConfig; 71 70 72 TFormEx.ScaleDPI := ScaleDPI1; 71 73 TFormEx.Translator := Translator1; … … 136 138 begin 137 139 for I := 0 to DbManager.DataTypes.Count - 1 do begin 138 TDataType(DbManager.DataTypes[I]).Title := Translator1.TranslateText(TDataType(DbManager.DataTypes[I]).Title, TDataType(DbManager.DataTypes[I]).Title);140 DbManager.DataTypes[I].Title := Translator1.TranslateText(DbManager.DataTypes[I].Title, DbManager.DataTypes[I].Title); 139 141 end; 140 142 end; … … 197 199 {$ENDIF} 198 200 Initialized := True; 199 LoadConfig;200 201 UpdateInterface; 201 202 if Preferences.RememberDatabase then begin
Note:
See TracChangeset
for help on using the changeset viewer.