mirror of
https://github.com/keymanapp/keyman.git
synced 2026-10-06 14:07:32 +00:00
d67c4911af
Some checks failed
Keyman Build Summary / Summarize build status checks (push) Has been cancelled
Also update the command line to use FBaseKeyboardID instead of FQuery.
199 lines
15 KiB
ObjectPascal
199 lines
15 KiB
ObjectPascal
program kmshell;
|
|
|
|
uses
|
|
IdStackWindows,
|
|
Winapi.Windows,
|
|
comobj,
|
|
Forms,
|
|
SysUtils,
|
|
ActiveX,
|
|
Dialogs,
|
|
initprog in 'main\initprog.pas',
|
|
RegistryKeys in '..\..\..\..\common\windows\delphi\general\RegistryKeys.pas',
|
|
Registry,
|
|
UfrmMain in 'main\UfrmMain.pas' {frmMain},
|
|
kmint in 'util\kmint.pas',
|
|
GetOsVersion in '..\..\..\..\common\windows\delphi\general\GetOsVersion.pas',
|
|
DebugPaths in '..\..\..\..\common\windows\delphi\general\DebugPaths.pas',
|
|
VersionInfo in '..\..\..\..\common\windows\delphi\general\VersionInfo.pas',
|
|
UfrmHTML in 'main\UfrmHTML.pas' {frmHTML},
|
|
HotkeyUtils in '..\..\global\delphi\general\HotkeyUtils.pas',
|
|
Unicode in '..\..\..\..\common\windows\delphi\general\Unicode.pas',
|
|
utilkmshell in 'util\utilkmshell.pas',
|
|
custinterfaces in '..\..\global\delphi\cust\custinterfaces.pas',
|
|
UfrmInstallKeyboard in 'install\UfrmInstallKeyboard.pas' {frmInstallKeyboard},
|
|
MessageIdentifiers in '..\..\global\delphi\cust\MessageIdentifiers.pas',
|
|
KeyNames in '..\..\..\..\common\windows\delphi\general\KeyNames.pas',
|
|
klog in '..\..\..\..\common\windows\delphi\general\klog.pas',
|
|
keymanapi_TLB in '..\..\engine\kmcomapi\keymanapi_TLB.pas',
|
|
UfrmSplash in 'startup\UfrmSplash.pas' {frmSplash},
|
|
UfrmKeymanBase in 'main\UfrmKeymanBase.pas' {frmKeymanBase},
|
|
httpuploader in '..\..\..\..\common\windows\delphi\general\httpuploader.pas',
|
|
httpuploader_messageprocessor_forms in '..\..\..\..\common\windows\delphi\general\httpuploader_messageprocessor_forms.pas',
|
|
utildir in '..\..\..\..\common\windows\delphi\general\utildir.pas',
|
|
XMLRenderer in 'render\XMLRenderer.pas',
|
|
KeyboardListXMLRenderer in 'render\KeyboardListXMLRenderer.pas',
|
|
OptionsXMLRenderer in 'render\OptionsXMLRenderer.pas',
|
|
HotkeysXMLRenderer in 'render\HotkeysXMLRenderer.pas',
|
|
SupportXMLRenderer in 'render\SupportXMLRenderer.pas',
|
|
LanguagesXMLRenderer in 'render\LanguagesXMLRenderer.pas',
|
|
utilhttp in '..\..\..\..\common\windows\delphi\general\utilhttp.pas',
|
|
UfrmChangeHotkey in 'main\UfrmChangeHotkey.pas' {frmChangeHotkey},
|
|
utilhotkey in '..\..\global\delphi\general\utilhotkey.pas',
|
|
InterfaceHotkeys in '..\..\global\delphi\general\InterfaceHotkeys.pas',
|
|
utilsystem in '..\..\..\..\common\windows\delphi\general\utilsystem.pas',
|
|
Upload_Settings in '..\..\..\..\common\windows\delphi\general\Upload_Settings.pas',
|
|
OnlineUpdateCheck in 'main\OnlineUpdateCheck.pas',
|
|
utilxml in '..\..\..\..\common\windows\delphi\general\utilxml.pas',
|
|
UfrmInstallKeyboardFromWeb in 'install\UfrmInstallKeyboardFromWeb.pas' {frmInstallKeyboardFromWeb},
|
|
UfrmWebContainer in 'main\UfrmWebContainer.pas' {frmWebContainer},
|
|
MessageIdentifierConsts in '..\..\global\delphi\cust\MessageIdentifierConsts.pas',
|
|
Keyman.UI.UfrmProgress in '..\..\global\delphi\general\Keyman.UI.UfrmProgress.pas' {frmProgress},
|
|
kmcomapi_errors in '..\..\global\delphi\general\kmcomapi_errors.pas',
|
|
GenericXMLRenderer in 'render\GenericXMLRenderer.pas',
|
|
help in 'main\help.pas',
|
|
UfrmProxyConfiguration in 'main\UfrmProxyConfiguration.pas' {frmProxyConfiguration: TTntForm},
|
|
OnlineUpdateCheckMessages in 'main\OnlineUpdateCheckMessages.pas',
|
|
WelcomeXMLRenderer in 'render\WelcomeXMLRenderer.pas',
|
|
ValidateKeymanInstalledSystemKeyboards in 'main\ValidateKeymanInstalledSystemKeyboards.pas',
|
|
uninstall in 'install\uninstall.pas',
|
|
KeymanControlMessages in '..\..\global\delphi\general\KeymanControlMessages.pas',
|
|
HintConsts in '..\..\global\delphi\hints\HintConsts.pas',
|
|
UfrmTextEditor in 'startup\help\UfrmTextEditor.pas' {frmTextEditor: TTntForm},
|
|
ttinfo in '..\..\..\..\common\windows\delphi\general\ttinfo.pas',
|
|
findfonts in '..\..\..\..\common\windows\delphi\general\findfonts.pas',
|
|
KMShellHints in 'util\KMShellHints.pas',
|
|
UfrmHint in '..\..\global\delphi\hints\UfrmHint.pas' {frmHint: TTntForm},
|
|
KeymanTextEditorRichEdit in '..\..\global\delphi\comp\KeymanTextEditorRichEdit.pas',
|
|
Hints in '..\..\global\delphi\hints\Hints.pas',
|
|
utilcheckfonts in '..\..\global\delphi\general\utilcheckfonts.pas',
|
|
wininet5 in '..\..\..\..\common\windows\delphi\general\wininet5.pas',
|
|
GlobalProxySettings in '..\..\..\..\common\windows\delphi\general\GlobalProxySettings.pas',
|
|
UFixupMissingFile in 'util\UFixupMissingFile.pas',
|
|
UImportOlderVersionKeyboards in 'main\UImportOlderVersionKeyboards.pas',
|
|
UImportOlderKeyboardUtils in 'main\UImportOlderKeyboardUtils.pas',
|
|
utiluac in '..\..\global\delphi\general\utiluac.pas',
|
|
UserMessages in '..\..\..\..\common\windows\delphi\general\UserMessages.pas',
|
|
UILanguages in 'util\UILanguages.pas',
|
|
UfrmKeyboardOptions in 'main\UfrmKeyboardOptions.pas' {frmKeyboardOptions},
|
|
KeymanTrayIcon in '..\..\engine\keyman\KeymanTrayIcon.pas',
|
|
UImportOlderVersionKeyboards10 in 'main\UImportOlderVersionKeyboards10.pas',
|
|
VisualKeyboard in '..\..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboard.pas',
|
|
VKeyChars in '..\..\..\..\common\windows\delphi\general\VKeyChars.pas',
|
|
UfrmPrintOSK in 'util\UfrmPrintOSK.pas' {frmPrintOSK},
|
|
VisualKeyboardExportHTML in '..\..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboardExportHTML.pas',
|
|
VisualKeyboardExportXML in '..\..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboardExportXML.pas',
|
|
VisualKeyboardParameters in '..\..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboardParameters.pas',
|
|
MSXML2_TLB in '..\..\..\..\common\windows\delphi\tlb\MSXML2_TLB.pas',
|
|
VKeys in '..\..\..\..\common\windows\delphi\general\VKeys.pas',
|
|
ExtShiftState in '..\..\..\..\common\windows\delphi\visualkeyboard\ExtShiftState.pas',
|
|
UImportOlderVersionSettings in 'main\UImportOlderVersionSettings.pas',
|
|
KeymanMutex in '..\..\global\delphi\general\KeymanMutex.pas',
|
|
ErrorControlledRegistry in '..\..\..\..\common\windows\delphi\vcl\ErrorControlledRegistry.pas',
|
|
MSXMLDomCreate in '..\..\..\..\common\windows\delphi\general\MSXMLDomCreate.pas',
|
|
utilexecute in '..\..\..\..\common\windows\delphi\general\utilexecute.pas',
|
|
KeymanVersion in '..\..\..\..\common\windows\delphi\general\KeymanVersion.pas',
|
|
BaseKeyboards in '..\..\global\delphi\general\BaseKeyboards.pas',
|
|
LoadIndirectStringUnit in '..\..\engine\keyman\langswitch\LoadIndirectStringUnit.pas',
|
|
Glossary in '..\..\..\..\common\windows\delphi\general\Glossary.pas',
|
|
UfrmInstallKeyboardLanguage in 'install\UfrmInstallKeyboardLanguage.pas' {frmInstallKeyboardLanguage},
|
|
UfrmBaseKeyboard in 'main\UfrmBaseKeyboard.pas' {frmBaseKeyboard},
|
|
UnicodeBlocks in '..\..\global\delphi\general\UnicodeBlocks.pas',
|
|
TempFileManager in '..\..\..\..\common\windows\delphi\general\TempFileManager.pas',
|
|
keyman_msctf in '..\..\global\delphi\winapi\keyman_msctf.pas',
|
|
utiltsf in '..\..\global\delphi\general\utiltsf.pas',
|
|
utilolepicture in '..\..\engine\kmcomapi\util\utilolepicture.pas',
|
|
kmxfile in '..\..\..\..\common\windows\delphi\keyboards\kmxfile.pas',
|
|
utilfiletypes in '..\..\..\..\common\windows\delphi\general\utilfiletypes.pas',
|
|
input_installlayoutortip in '..\..\global\delphi\winapi\input_installlayoutortip.pas',
|
|
KPInstallPackageStartMenu in '..\..\global\delphi\general\KPInstallPackageStartMenu.pas',
|
|
kmpinffile in '..\..\..\..\common\windows\delphi\packages\kmpinffile.pas',
|
|
PackageFileFormats in '..\..\..\..\common\windows\delphi\packages\PackageFileFormats.pas',
|
|
PackageInfo in '..\..\..\..\common\windows\delphi\packages\PackageInfo.pas',
|
|
utilstr in '..\..\..\..\common\windows\delphi\general\utilstr.pas',
|
|
utilwow64 in '..\..\global\delphi\general\utilwow64.pas',
|
|
KPUninstallPackageStartMenu in '..\..\global\delphi\general\KPUninstallPackageStartMenu.pas',
|
|
KPInstallFontKMShell in 'util\KPInstallFontKMShell.pas',
|
|
UpgradeMnemonicLayout in 'install\UpgradeMnemonicLayout.pas',
|
|
UfrmKeepInTouch in 'main\UfrmKeepInTouch.pas' {frmKeepInTouch},
|
|
UtilCheckOnline in 'util\UtilCheckOnline.pas',
|
|
KeyboardTIPCheck in 'main\KeyboardTIPCheck.pas',
|
|
utilfocusappwnd in 'util\utilfocusappwnd.pas',
|
|
UImportOlderVersionKeyboards8 in 'main\UImportOlderVersionKeyboards8.pas',
|
|
KeymanPaths in '..\..\..\..\common\windows\delphi\general\KeymanPaths.pas',
|
|
StockFileNames in '..\..\..\..\common\windows\delphi\general\StockFileNames.pas',
|
|
KeymanEngineControl in '..\..\global\delphi\general\KeymanEngineControl.pas',
|
|
KeymanOptionNames in '..\..\global\delphi\general\KeymanOptionNames.pas',
|
|
VisualKeyboardLoaderBinary in '..\..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboardLoaderBinary.pas',
|
|
VisualKeyboardLoaderXML in '..\..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboardLoaderXML.pas',
|
|
VisualKeyboardSaverBinary in '..\..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboardSaverBinary.pas',
|
|
VisualKeyboardSaverXML in '..\..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboardSaverXML.pas',
|
|
BCP47Tag in '..\..\..\..\common\windows\delphi\general\BCP47Tag.pas',
|
|
JsonUtil in '..\..\..\..\common\windows\delphi\general\JsonUtil.pas',
|
|
kmxfileconsts in '..\..\..\..\common\windows\delphi\keyboards\kmxfileconsts.pas',
|
|
Keyman.System.UpdateCheckResponse in '..\..\..\..\common\windows\delphi\general\Keyman.System.UpdateCheckResponse.pas',
|
|
UImportOlderVersionKeyboards9 in 'main\UImportOlderVersionKeyboards9.pas',
|
|
Keyman.System.UpgradeRegistryKeys in '..\..\global\delphi\general\Keyman.System.UpgradeRegistryKeys.pas',
|
|
UImportOlderVersionKeyboards9Plus in 'main\UImportOlderVersionKeyboards9Plus.pas',
|
|
Keyman.Configuration.UI.MitigationForWin10_1803 in 'install\Keyman.Configuration.UI.MitigationForWin10_1803.pas',
|
|
Keyman.System.CEFManager in '..\..\..\..\common\windows\delphi\chromium\Keyman.System.CEFManager.pas',
|
|
Keyman.UI.UframeCEFHost in '..\..\..\..\common\windows\delphi\chromium\Keyman.UI.UframeCEFHost.pas',
|
|
UfrmHelp in 'help\UfrmHelp.pas' {frmHelp},
|
|
Sentry.Client in '..\..\..\..\common\windows\delphi\ext\sentry\Sentry.Client.pas',
|
|
Sentry.Client.Vcl in '..\..\..\..\common\windows\delphi\ext\sentry\Sentry.Client.Vcl.pas',
|
|
sentry in '..\..\..\..\common\windows\delphi\ext\sentry\sentry.pas',
|
|
Keyman.System.LanguageCodeUtils in '..\..\..\..\common\windows\delphi\general\Keyman.System.LanguageCodeUtils.pas',
|
|
Keyman.System.Standards.ISO6393ToBCP47Registry in '..\..\..\..\common\windows\delphi\standards\Keyman.System.Standards.ISO6393ToBCP47Registry.pas',
|
|
Keyman.System.Standards.LCIDToBCP47Registry in '..\..\..\..\common\windows\delphi\standards\Keyman.System.Standards.LCIDToBCP47Registry.pas',
|
|
Keyman.System.Standards.BCP47SubtagRegistry in '..\..\..\..\common\windows\delphi\standards\Keyman.System.Standards.BCP47SubtagRegistry.pas',
|
|
Keyman.System.Standards.BCP47SuppressScriptRegistry in '..\..\..\..\common\windows\delphi\standards\Keyman.System.Standards.BCP47SuppressScriptRegistry.pas',
|
|
Keyman.System.KeymanSentryClient in '..\..\..\..\common\windows\delphi\general\Keyman.System.KeymanSentryClient.pas',
|
|
Keyman.Configuration.UI.UfrmDiagnosticTests in 'util\Keyman.Configuration.UI.UfrmDiagnosticTests.pas' {frmDiagnosticTests},
|
|
Keyman.Configuration.System.UmodWebHttpServer in 'web\Keyman.Configuration.System.UmodWebHttpServer.pas' {modWebHttpServer: TDataModule},
|
|
Keyman.Configuration.System.HttpServer.App in 'web\Keyman.Configuration.System.HttpServer.App.pas',
|
|
Keyman.System.HttpServer.Base in '..\..\..\..\common\windows\delphi\web\Keyman.System.HttpServer.Base.pas',
|
|
Keyman.Configuration.System.HttpServer.SharedData in 'web\Keyman.Configuration.System.HttpServer.SharedData.pas',
|
|
Keyman.Configuration.System.HttpServer.App.OnlineUpdate in 'web\Keyman.Configuration.System.HttpServer.App.OnlineUpdate.pas',
|
|
Keyman.System.LocaleStrings in '..\..\global\delphi\cust\Keyman.System.LocaleStrings.pas',
|
|
Keyman.Configuration.System.HttpServer.App.InstallKeyboard in 'web\Keyman.Configuration.System.HttpServer.App.InstallKeyboard.pas',
|
|
Keyman.Configuration.System.HttpServer.App.ProxyConfiguration in 'web\Keyman.Configuration.System.HttpServer.App.ProxyConfiguration.pas',
|
|
Keyman.Configuration.System.HttpServer.App.ConfigMain in 'web\Keyman.Configuration.System.HttpServer.App.ConfigMain.pas',
|
|
Keyman.Configuration.UI.InstallFile in 'install\Keyman.Configuration.UI.InstallFile.pas',
|
|
Keyman.Configuration.UI.KeymanProtocolHandler in 'install\Keyman.Configuration.UI.KeymanProtocolHandler.pas',
|
|
Keyman.Configuration.System.KeymanUILanguageManager in 'main\Keyman.Configuration.System.KeymanUILanguageManager.pas',
|
|
Keyman.System.UILanguageManager in '..\..\global\delphi\general\Keyman.System.UILanguageManager.pas',
|
|
Keyman.Configuration.System.TIPMaintenance in 'install\Keyman.Configuration.System.TIPMaintenance.pas',
|
|
UfrmDownloadProgress in 'util\UfrmDownloadProgress.pas' {frmDownloadProgress},
|
|
Keyman.Configuration.System.UImportOlderVersionKeyboards11To13 in 'main\Keyman.Configuration.System.UImportOlderVersionKeyboards11To13.pas',
|
|
Keyman.System.Settings in '..\..\global\delphi\general\Keyman.System.Settings.pas',
|
|
Keyman.System.SettingsManager in '..\..\global\delphi\general\Keyman.System.SettingsManager.pas',
|
|
Keyman.Configuration.UI.UfrmSettingsManager in 'settings\Keyman.Configuration.UI.UfrmSettingsManager.pas' {frmSettingsManager},
|
|
Keyman.Configuration.UI.UfrmSettingsAddTSFApp in 'settings\Keyman.Configuration.UI.UfrmSettingsAddTSFApp.pas' {frmSettingsAddTSFApp},
|
|
Keyman.System.SettingsManagerFile in '..\..\global\delphi\general\Keyman.System.SettingsManagerFile.pas',
|
|
Keyman.System.KeymanStartTask in 'util\Keyman.System.KeymanStartTask.pas',
|
|
TaskScheduler_TLB in '..\..\global\delphi\winapi\TaskScheduler_TLB.pas',
|
|
Keyman.Configuration.System.HttpServer.App.TextEditorFonts in 'startup\help\Keyman.Configuration.System.HttpServer.App.TextEditorFonts.pas',
|
|
Keyman.Configuration.System.HttpServer.App.Locale in 'web\Keyman.Configuration.System.HttpServer.App.Locale.pas',
|
|
Keyman.System.AndroidStringToKeymanLocaleString in '..\..\..\..\common\windows\delphi\general\Keyman.System.AndroidStringToKeymanLocaleString.pas',
|
|
Keyman.Configuration.System.Main in 'main\Keyman.Configuration.System.Main.pas',
|
|
UpdateXMLRenderer in 'render\UpdateXMLRenderer.pas',
|
|
Keyman.System.UpdateCheckStorage in 'main\Keyman.System.UpdateCheckStorage.pas',
|
|
Keyman.System.RemoteUpdateCheck in 'main\Keyman.System.RemoteUpdateCheck.pas',
|
|
Keyman.System.UpdateStateMachine in 'main\Keyman.System.UpdateStateMachine.pas',
|
|
Keyman.System.DownloadUpdate in 'main\Keyman.System.DownloadUpdate.pas',
|
|
Keyman.System.ExecutionHistory in '..\..\..\..\common\windows\delphi\general\Keyman.System.ExecutionHistory.pas',
|
|
Keyman.Configuration.UI.UfrmStartInstall in 'main\Keyman.Configuration.UI.UfrmStartInstall.pas' {frmStartInstall},
|
|
Keyman.Configuration.Util.NetworkConnection in 'util\Keyman.Configuration.Util.NetworkConnection.pas',
|
|
Keyman.Configuration.System.BaseKeyboard in 'main\Keyman.Configuration.System.BaseKeyboard.pas';
|
|
|
|
{$R VERSION.RES}
|
|
{$R manifest.res}
|
|
|
|
// CEF3 needs to set the LARGEADDRESSAWARE flag which allows 32-bit processes to use up to 3GB of RAM.
|
|
// If you don't add this flag the rederer process will crash when you try to load large images.
|
|
{$SetPEFlags IMAGE_FILE_LARGE_ADDRESS_AWARE}
|
|
|
|
begin
|
|
RunKeymanConfiguration;
|
|
end.
|
|
|