Permalink
Browse files

Issue #448: Get old Silk icons back into a second TImageCollection, a…

…nd let the user chose his preferred icon pack in Preferences > General
  • Loading branch information...
ansgarbecker committed Jan 27, 2019
1 parent aa05409 commit 07de1dc7b8f3c48e8a6a343a217f5d6b8da3eee5
Showing with 5,557 additions and 397 deletions.
  1. +2 −1 source/apphelpers.pas
  2. +5,493 −394 source/main.dfm
  3. +26 −1 source/main.pas
  4. +17 −0 source/options.dfm
  5. +19 −1 source/options.pas
@@ -171,7 +171,7 @@ TQueryThread = class(TThread)
asPromptSaveFileOnTabClose, asWarnUnsafeUpdates, asQueryWarningsMessage,
asCompletionProposal, asCompletionProposalWidth, asCompletionProposalNbLinesInWindow, asAutoUppercase,
asTabsToSpaces, asFilterPanel, asAllowMultipleInstances, asFindDialogSearchHistory, asGUIFontName, asGUIFontSize,
asTheme,
asTheme, asIconPack,
asFindDialogReplaceHistory, asMaxQueryResults, asLogErrors,
asLogUserSQL, asLogSQL, asLogInfos, asLogDebug, asFieldColorNumeric,
asFieldColorReal, asFieldColorText, asFieldColorBinary, asFieldColorDatetime, asFieldColorSpatial,
@@ -3619,6 +3619,7 @@ constructor TAppSettings.Create;
InitSetting(asGUIFontName, 'GUIFontName', 0, False, '');
InitSetting(asGUIFontSize, 'GUIFontSize', 8);
InitSetting(asTheme, 'Theme', 0, False, 'Windows');
InitSetting(asIconPack, 'IconPack', 0, False, 'Icons8');
InitSetting(asMaxQueryResults, 'MaxQueryResults', 10);
InitSetting(asLogErrors, 'LogErrors', 0, True);
InitSetting(asLogUserSQL, 'LogUserSQL', 0, True);
Oops, something went wrong.

0 comments on commit 07de1dc

Please sign in to comment.