paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-11 20:18:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazbuild: use console encoding when writing to console

Browse Source 
git-svn-id: trunk@17081 -
This commit is contained in:
paul 2008-10-21 06:22:31 +00:00
parent 0d7739f6e1
commit 6c401f48be
1 changed files with 20 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
ide/lazbuild.lpr
View File

@ -1112,53 +1112,53 @@ begin
writeln('');
writeln('lazbuild [options] <project or package-filename>');
writeln('');
writeln(lisEdtExtToolParameters);
writeln(UTF8ToConsole(lisEdtExtToolParameters));
writeln('');
writeln('--help or -? ', listhisHelpMessage);
writeln('--help or -? ', UTF8ToConsole(listhisHelpMessage));
writeln('');
writeln('-B or --build-all ', lisBuildAllFilesOfProjectPackageIDE);
writeln('-r or --recursive ', lisApplyBuildFlagsBToDependenciesToo);
writeln('-d or --skip-dependencies ', lisDoNotCompileDependencies);
writeln('--build-ide=<options> ', lisBuildIDEWithPackages);
writeln('-v or --version ', lisShowVersionAndExit);
writeln('-B or --build-all ', UTF8ToConsole(lisBuildAllFilesOfProjectPackageIDE));
writeln('-r or --recursive ', UTF8ToConsole(lisApplyBuildFlagsBToDependenciesToo));
writeln('-d or --skip-dependencies ', UTF8ToConsole(lisDoNotCompileDependencies));
writeln('--build-ide=<options> ', UTF8ToConsole(lisBuildIDEWithPackages));
writeln('-v or --version ', UTF8ToConsole(lisShowVersionAndExit));
writeln('');
writeln(PrimaryConfPathOptLong,'<path>');
writeln('or ',PrimaryConfPathOptShort,'<path>');
writeln(BreakString(space+lisprimaryConfigDirectoryWhereLazarusStoresItsConfig,
75, 22), LazConf.GetPrimaryConfigPath);
writeln(UTF8ToConsole(BreakString(space+lisprimaryConfigDirectoryWhereLazarusStoresItsConfig,
75, 22)), LazConf.GetPrimaryConfigPath);
writeln('');
writeln(SecondaryConfPathOptLong,'<path>');
writeln('or ',SecondaryConfPathOptShort,'<path>');
writeln(BreakString(space+lissecondaryConfigDirectoryWhereLazarusSearchesFor,
75, 22), LazConf.GetSecondaryConfigPath);
writeln(UTF8ToConsole(BreakString(space+lissecondaryConfigDirectoryWhereLazarusSearchesFor,
75, 22)), LazConf.GetSecondaryConfigPath);
writeln('');
writeln('--operating-system=<operating-system>');
writeln('or --os=<operating-system>');
writeln(BreakString(Format(
writeln(UTF8ToConsole(BreakString(Format(
lisOverrideTheProjectOperatingSystemEGWin32LinuxDefau, [space,
LazConf.GetDefaultTargetOS]),
75, 22));
75, 22)));
writeln('');
writeln('--widgetset=<widgetset>');
writeln('or --ws=<widgetset>');
writeln(BreakString(Format(
writeln(UTF8ToConsole(BreakString(Format(
lisOverrideTheProjectWidgetsetEGGtkGtk2QtWin32CarbonD, [space,
LCLPlatformDirNames[LazConf.GetDefaultLCLWidgetType]]) ,
75, 22));
75, 22)));
writeln('');
writeln('--cpu=<cpu>');
writeln(BreakString(Format(
writeln(UTF8ToConsole(BreakString(Format(
lisOverrideTheProjectCpuEGI386X86_64PowerpcPowerpc_64, [space,
LazConf.GetDefaultTargetCPU]),
75, 22));
75, 22)));
writeln('');
writeln('--compiler=<ppcXXX>');
writeln(BreakString(Format(
writeln(UTF8ToConsole(BreakString(Format(
lisOverrideTheDefaultCompilerEGPpc386Ppcx64PpcppcEtcD, [space]),
75, 22));
75, 22)));
writeln('');
writeln(LanguageOpt);
writeln(BreakString(space+lisOverrideLanguage,75, 22));
writeln(UTF8ToConsole(BreakString(space+lisOverrideLanguage,75, 22)));
end;
procedure TLazBuildApplication.Error(ErrorCode: Byte; const ErrorMsg: string);