mirror of
https://github.com/keymanapp/keyman.git
synced 2026-08-11 19:35:32 +00:00
116 lines
8.3 KiB
ObjectPascal
116 lines
8.3 KiB
ObjectPascal
program kmconvert;
|
|
|
|
{$APPTYPE CONSOLE}
|
|
|
|
uses
|
|
System.SysUtils,
|
|
Keyman.Developer.System.KeymanConvertMain in 'Keyman.Developer.System.KeymanConvertMain.pas',
|
|
Keyman.Developer.System.ImportWindowsKeyboard in 'Keyman.Developer.System.ImportWindowsKeyboard.pas',
|
|
RegistryKeys in '..\..\..\common\windows\delphi\general\RegistryKeys.pas',
|
|
KeymanVersion in '..\..\..\common\windows\delphi\general\KeymanVersion.pas',
|
|
utilexecute in '..\..\..\common\windows\delphi\general\utilexecute.pas',
|
|
Keyman.Developer.System.KeyboardProjectTemplate in 'Keyman.Developer.System.KeyboardProjectTemplate.pas',
|
|
UKeymanTargets in '..\common\delphi\general\UKeymanTargets.pas',
|
|
utilstr in '..\..\..\common\windows\delphi\general\utilstr.pas',
|
|
Unicode in '..\..\..\common\windows\delphi\general\Unicode.pas',
|
|
StockFileNames in '..\..\..\common\windows\delphi\general\StockFileNames.pas',
|
|
utilfiletypes in '..\..\..\common\windows\delphi\general\utilfiletypes.pas',
|
|
KeyboardParser in '..\TIKE\main\KeyboardParser.pas',
|
|
kmxfile in '..\..\..\common\windows\delphi\keyboards\kmxfile.pas',
|
|
kmxfileconsts in '..\..\..\common\windows\delphi\keyboards\kmxfileconsts.pas',
|
|
ExtShiftState in '..\..\..\common\windows\delphi\visualkeyboard\ExtShiftState.pas',
|
|
utilsystem in '..\..\..\common\windows\delphi\general\utilsystem.pas',
|
|
VKeys in '..\..\..\common\windows\delphi\general\VKeys.pas',
|
|
WindowsLanguages in '..\common\delphi\general\WindowsLanguages.pas',
|
|
GetOsVersion in '..\..\..\common\windows\delphi\general\GetOsVersion.pas',
|
|
CRC32 in '..\..\..\common\windows\delphi\general\CRC32.pas',
|
|
KeyNames in '..\..\..\common\windows\delphi\general\KeyNames.pas',
|
|
utildir in '..\..\..\common\windows\delphi\general\utildir.pas',
|
|
TextFileFormat in '..\common\delphi\general\TextFileFormat.pas',
|
|
kpsfile in '..\common\delphi\packages\kpsfile.pas',
|
|
PackageInfo in '..\..\..\common\windows\delphi\packages\PackageInfo.pas',
|
|
JsonUtil in '..\..\..\common\windows\delphi\general\JsonUtil.pas',
|
|
VersionInfo in '..\..\..\common\windows\delphi\general\VersionInfo.pas',
|
|
PackageFileFormats in '..\..\..\common\windows\delphi\packages\PackageFileFormats.pas',
|
|
Keyman.Developer.System.Project.ProjectLog in '..\TIKE\project\Keyman.Developer.System.Project.ProjectLog.pas',
|
|
BCP47Tag in '..\..\..\common\windows\delphi\general\BCP47Tag.pas',
|
|
Keyman.System.CanonicalLanguageCodeUtils in '..\..\..\common\windows\delphi\general\Keyman.System.CanonicalLanguageCodeUtils.pas',
|
|
Keyman.System.LanguageCodeUtils in '..\..\..\common\windows\delphi\general\Keyman.System.LanguageCodeUtils.pas',
|
|
Keyman.System.KeyboardJSInfo in '..\common\delphi\keyboards\Keyman.System.KeyboardJSInfo.pas',
|
|
Keyman.System.KeyboardUtils in '..\common\delphi\keyboards\Keyman.System.KeyboardUtils.pas',
|
|
Keyman.System.KMXFileLanguages in '..\common\delphi\keyboards\Keyman.System.KMXFileLanguages.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.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.RegExGroupHelperRSP19902 in '..\..\..\common\windows\delphi\vcl\Keyman.System.RegExGroupHelperRSP19902.pas',
|
|
Keyman.System.PackageInfoRefreshKeyboards in '..\common\delphi\packages\Keyman.System.PackageInfoRefreshKeyboards.pas',
|
|
Keyman.Developer.System.Project.ProjectFile in '..\TIKE\project\Keyman.Developer.System.Project.ProjectFile.pas',
|
|
Keyman.Developer.System.Project.ProjectFiles in '..\TIKE\project\Keyman.Developer.System.Project.ProjectFiles.pas',
|
|
Keyman.Developer.System.Project.ProjectSaver in '..\TIKE\project\Keyman.Developer.System.Project.ProjectSaver.pas',
|
|
Keyman.Developer.System.Project.ProjectFileType in '..\TIKE\project\Keyman.Developer.System.Project.ProjectFileType.pas',
|
|
mrulist in '..\TIKE\main\mrulist.pas',
|
|
ErrorControlledRegistry in '..\..\..\common\windows\delphi\vcl\ErrorControlledRegistry.pas',
|
|
TempFileManager in '..\..\..\common\windows\delphi\general\TempFileManager.pas',
|
|
klog in '..\..\..\common\windows\delphi\general\klog.pas',
|
|
RedistFiles in '..\TIKE\main\RedistFiles.pas',
|
|
DebugPaths in '..\..\..\common\windows\delphi\general\DebugPaths.pas',
|
|
Upload_Settings in '..\..\..\common\windows\delphi\general\Upload_Settings.pas',
|
|
Keyman.Developer.System.Project.Project in '..\TIKE\project\Keyman.Developer.System.Project.Project.pas',
|
|
Keyman.Developer.System.Project.ProjectLoader in '..\TIKE\project\Keyman.Developer.System.Project.ProjectLoader.pas',
|
|
Keyman.Developer.System.Project.kmnProjectFile in '..\TIKE\project\Keyman.Developer.System.Project.kmnProjectFile.pas',
|
|
Keyman.Developer.System.Project.kpsProjectFile in '..\TIKE\project\Keyman.Developer.System.Project.kpsProjectFile.pas',
|
|
VisualKeyboard in '..\..\..\common\windows\delphi\visualkeyboard\VisualKeyboard.pas',
|
|
VKeyChars in '..\..\..\common\windows\delphi\general\VKeyChars.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',
|
|
Keyman.Developer.System.KMConvertParameters in 'Keyman.Developer.System.KMConvertParameters.pas',
|
|
Keyman.Developer.System.ImportKeyboardDLL in 'Keyman.Developer.System.ImportKeyboardDLL.pas',
|
|
ScanCodeMap in '..\..\..\common\windows\delphi\general\ScanCodeMap.pas',
|
|
Keyman.Developer.System.TouchLayoutToVisualKeyboardConverter in 'Keyman.Developer.System.TouchLayoutToVisualKeyboardConverter.pas',
|
|
OnScreenKeyboardData in '..\..\..\common\windows\delphi\visualkeyboard\OnScreenKeyboardData.pas',
|
|
TouchLayout in '..\TIKE\oskbuilder\TouchLayout.pas',
|
|
TouchLayoutDefinitions in '..\TIKE\oskbuilder\TouchLayoutDefinitions.pas',
|
|
TouchLayoutUtils in '..\TIKE\oskbuilder\TouchLayoutUtils.pas',
|
|
KeyboardFonts in '..\common\delphi\general\KeyboardFonts.pas',
|
|
Keyman.System.Util.RenderLanguageIcon in '..\..\..\common\windows\delphi\ui\Keyman.System.Util.RenderLanguageIcon.pas',
|
|
utilicon in '..\..\..\common\windows\delphi\general\utilicon.pas',
|
|
CompileErrorCodes in '..\common\delphi\compiler\CompileErrorCodes.pas',
|
|
Keyman.Developer.System.ModelProjectTemplate in 'Keyman.Developer.System.ModelProjectTemplate.pas',
|
|
Keyman.Developer.System.Project.modelTsProjectFile in '..\TIKE\project\Keyman.Developer.System.Project.modelTsProjectFile.pas',
|
|
Keyman.Developer.System.Project.wordlistTsvProjectFile in '..\TIKE\project\Keyman.Developer.System.Project.wordlistTsvProjectFile.pas',
|
|
Sentry.Client in '..\..\..\common\windows\delphi\ext\sentry\Sentry.Client.pas',
|
|
Sentry.Client.Console in '..\..\..\common\windows\delphi\ext\sentry\Sentry.Client.Console.pas',
|
|
sentry in '..\..\..\common\windows\delphi\ext\sentry\sentry.pas',
|
|
Keyman.System.KeymanSentryClient in '..\..\..\common\windows\delphi\general\Keyman.System.KeymanSentryClient.pas',
|
|
KeymanPaths in '..\..\..\common\windows\delphi\general\KeymanPaths.pas',
|
|
Keyman.System.Standards.LangTagsRegistry in '..\..\..\common\windows\delphi\standards\Keyman.System.Standards.LangTagsRegistry.pas',
|
|
Keyman.Developer.System.Project.UrlRenderer in '..\TIKE\project\Keyman.Developer.System.Project.UrlRenderer.pas',
|
|
Keyman.System.LexicalModelUtils in '..\common\delphi\lexicalmodels\Keyman.System.LexicalModelUtils.pas';
|
|
|
|
{$R icons.RES}
|
|
{$R version.res}
|
|
{$R manifest.res}
|
|
|
|
const
|
|
LOGGER_DEVELOPER_TOOLS_KMCONVERT = TKeymanSentryClient.LOGGER_DEVELOPER_TOOLS + '.kmconvert';
|
|
begin
|
|
TKeymanSentryClient.Start(TSentryClientConsole, kscpDeveloper, LOGGER_DEVELOPER_TOOLS_KMCONVERT);
|
|
try
|
|
try
|
|
TKeymanSentryClient.Validate;
|
|
Run;
|
|
except
|
|
on E: Exception do
|
|
if not SentryHandleException(E) then
|
|
begin
|
|
writeln(E.Message);
|
|
ExitCode := 99;
|
|
end;
|
|
end;
|
|
finally
|
|
TKeymanSentryClient.Stop;
|
|
end;
|
|
end.
|