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

IDE, translations: improved Initial setup dialog localization and moved all its resourcestrings to one place

Browse Source 
git-svn-id: trunk@30212 -
This commit is contained in:
maxim 2011-04-05 23:11:27 +00:00
parent 61fd02d902
commit 80b6d2a191
2 changed files with 41 additions and 37 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/initialsetupdlgs.pas
View File

@ -213,7 +213,7 @@ begin
ADirectory:=TrimFilename(ADirectory);
if not DirPathExistsCached(ADirectory) then
begin
Note:=lisEnvOptDlgDirectoryNotFound;
Note:=lisISDDirectoryNotFound;
exit;
end;
ADirectory:=AppendPathDelim(ADirectory);
@ -379,7 +379,7 @@ begin
AFilename:=TrimFilename(AFilename);
if not FileExistsCached(AFilename) then
begin
Note:=lisFileNotFound;
Note:=lisFileNotFound4;
exit;
end;
if not FileIsExecutableCached(AFilename) then
@ -632,7 +632,7 @@ begin
ADirectory:=TrimFilename(ADirectory);
if not DirPathExistsCached(ADirectory) then
begin
Note:=lisEnvOptDlgDirectoryNotFound;
Note:=lisISDDirectoryNotFound;
exit;
end;
ADirectory:=AppendPathDelim(ADirectory);

72
ide/lazarusidestrconsts.pas
View File

@ -1222,9 +1222,6 @@ resourcestring
lisEnvOptDlgInvalidDebuggerFilenameMsg =
'The debugger file "%s" is not an executable.';
lisEnvOptDlgDirectoryNotFound = 'Directory not found';
lisFoundVersionExpected = 'Found version %s, expected %s';
lisInvalidVersionIn = 'invalid version in %s';
lisWrongVersionIn = 'wrong version in %s: %s';
lisDirectoryNotFound = 'Directory %s%s%s not found.';
lisRemoveFromSearchPath = 'Remove from search path';
lisTheDirectoryWasNotFound = 'The directory %s was not found.';
@ -1879,7 +1876,6 @@ resourcestring
dlgCOLibraries = 'Libraries (-Fl):';
dlgCODebugPath = 'Debugger path addition (none):';
lisCompiler = 'Compiler';
lisFPCSources = 'FPC sources';
lisToFPCPath = 'Path:';
lisCOSkipCallingCompiler = 'Skip calling Compiler';
lisCOAmbiguousAdditionalCompilerConfigFile = 'Ambiguous additional compiler '
@ -1997,7 +1993,6 @@ resourcestring
+'abstract methods of the current class, because';
lisCCOUnableToGetFileDate = 'Unable to get file date of %s.';
lisCCOWarningCaption = 'Warning';
lisConfigureLazarusIDE = 'Configure Lazarus IDE';
lisTheContainsANotExistingDirectory = 'The %s contains a not existing '
+'directory:%s%s';
lisTheProjectDoesNotUseTheLCLUnitInterfacesButItSeems = 'The project does '
@ -3263,25 +3258,6 @@ resourcestring
lisPathEditMovePathDown = 'Move path down';
lisPathEditMovePathUp = 'Move path up';
lisPathEditBrowse = 'Browse';
lisTheSourcesOfTheFreePascalPackagesAreRequiredForBro = 'The sources of the '
+'Free Pascal packages are required for browsing and code completion. For '
+'example it has the file "%s".';
lisSelectPathOf = 'Select path of %s';
lisSelectFPCSourceDirectory = 'Select FPC source directory';
lisSelectLazarusSourceDirectory = 'Select Lazarus source directory';
lisWithoutAProperLazarusDirectoryYouWillGetALotOfWarn = 'Without a proper '
+'Lazarus directory you will get a lot of warnings.';
lisWithoutAProperCompilerTheCodeBrowsingAndCompilingW = 'Without a proper '
+'compiler the code browsing and compiling will be disappointing.';
lisWithoutTheProperFPCSourcesCodeBrowsingAndCompletio = 'Without the proper '
+'FPC sources code browsing and completion will be very limited.';
lisTheLazarusDirectoryContainsTheSourcesOfTheIDEAndTh = 'The Lazarus '
+'directory contains the sources of the IDE and the package files of LCL '
+'and many standard packages. For example it contains the file "ide%'
+'slazarus.lpi". The translation files are located there too.';
lisTheFreePascalCompilerExecutableTypicallyHasTheName = 'The Free Pascal '
+'compiler executable typically has the name "%s". You can also use the '
+'target specific compiler like "%s". Please give the full file path.';
lisPathEditPathTemplates = 'Path templates';
// new dialog
@ -3415,12 +3391,6 @@ resourcestring
lisExecutionPausedAdress = 'Execution paused%s Address: $%s%s Procedure: %'
+'s%s File: %s%s(Some day an assembler window might popup here :)%s';
lisFileNotFound = 'File not found';
lisFileIsNotAnExecutable = 'File is not an executable';
lisFpcCfgIsMissing = 'fpc.cfg is missing.';
lisSystemPpuNotFoundCheckYourFpcCfg = 'system.ppu not found. Check your fpc.'
+'cfg.';
lisClassesPpuNotFoundCheckYourFpcCfg = 'classes.ppu not found. Check your '
+'fpc.cfg.';
lisCleanUpUnitPath = 'Clean up unit path?';
lisTheDirectoryIsNoLongerNeededInTheUnitPathRemoveIt = 'The directory %s%s%'
+'s is no longer needed in the unit path.%sRemove it?';
@ -4787,10 +4757,7 @@ resourcestring
lisTheProjectInformationFileHasChangedOnDisk = 'The project information '
+'file %s%s%s%shas changed on disk.';
lisReopenProject = 'Reopen project';
rsOk = 'ok';
lisWelcomeToLazarusIDE = 'Welcome to Lazarus IDE %s';
lisStartIDE = 'Start IDE';
lisUnableToLoadFile2 = 'unable to load file %s: %s';
rsOk = 'OK';
rsScanners = 'Scanners';
rsAvailableScanners = 'Available scanners';
rsSelectAnInheritedEntry = 'Select an inherited entry';
@ -5245,8 +5212,45 @@ resourcestring
lisShowSetupDialogForMostImportantSettings = 'Show setup dialog for most '
+'important settings';
lisShowPositionOfSourceEditor = 'Show position of source editor';
//Initial setup dialog
lisTheSourcesOfTheFreePascalPackagesAreRequiredForBro = 'The sources of the '
+'Free Pascal packages are required for browsing and code completion. For '
+'example it has the file "%s".';
lisSelectPathOf = 'Select path of %s';
lisSelectFPCSourceDirectory = 'Select FPC source directory';
lisSelectLazarusSourceDirectory = 'Select Lazarus source directory';
lisWithoutAProperLazarusDirectoryYouWillGetALotOfWarn = 'Without a proper '
+'Lazarus directory you will get a lot of warnings.';
lisWithoutAProperCompilerTheCodeBrowsingAndCompilingW = 'Without a proper '
+'compiler the code browsing and compiling will be disappointing.';
lisWithoutTheProperFPCSourcesCodeBrowsingAndCompletio = 'Without the proper '
+'FPC sources code browsing and completion will be very limited.';
lisTheLazarusDirectoryContainsTheSourcesOfTheIDEAndTh = 'The Lazarus '
+'directory contains the sources of the IDE and the package files of LCL '
+'and many standard packages. For example it contains the file "ide%'
+'slazarus.lpi". The translation files are located there too.';
lisTheFreePascalCompilerExecutableTypicallyHasTheName = 'The Free Pascal '
+'compiler executable typically has the name "%s". You can also use the '
+'target specific compiler like "%s". Please give the full file path.';
lisFoundVersionExpected = 'Found version %s, expected %s';
lisInvalidVersionIn = 'invalid version in %s';
lisWrongVersionIn = 'wrong version in %s: %s';
lisFPCSources = 'FPC sources';
lisConfigureLazarusIDE = 'Configure Lazarus IDE';
lisFileIsNotAnExecutable = 'File is not an executable';
lisFpcCfgIsMissing = 'fpc.cfg is missing.';
lisSystemPpuNotFoundCheckYourFpcCfg = 'system.ppu not found. Check your fpc.'
+'cfg.';
lisClassesPpuNotFoundCheckYourFpcCfg = 'classes.ppu not found. Check your '
+'fpc.cfg.';
lisWelcomeToLazarusIDE = 'Welcome to Lazarus IDE %s';
lisStartIDE = 'Start IDE';
lisUnableToLoadFile2 = 'unable to load file %s: %s';
lisDirectoryNotFound2 = 'directory %s not found';
lisFileNotFound3 = 'file %s not found';
lisFileNotFound4 = 'file not found';
lisISDDirectoryNotFound = 'directory not found';
implementation