mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-02 13:20:26 +02:00
Converter: improve localization in MissingUnits dialog
git-svn-id: trunk@30850 -
This commit is contained in:
parent
de68f69051
commit
56e2f0964b
@ -122,9 +122,10 @@ begin
|
||||
Result:=mrCancel;
|
||||
// A title text containing filename.
|
||||
if (AMainMissingUnits.Count + AImplMissingUnits.Count) = 1 then
|
||||
UnitsTitle:=lisUnitNotFound+' '+AMainUnitName
|
||||
s:=lisUnitNotFoundInProject
|
||||
else
|
||||
UnitsTitle:=lisUnitsNotFound2+' '+AMainUnitName;
|
||||
s:=lisUnitsNotFoundInProject;
|
||||
UnitsTitle:=Format(s, [AMainUnitName]);
|
||||
|
||||
UNFDialog:=TMissingUnitsDialog.Create(nil);
|
||||
with UNFDialog do begin
|
||||
|
@ -481,8 +481,8 @@ resourcestring
|
||||
lisMissingUnitsInfo1b = '1) Use the units only for Delphi.';
|
||||
lisMissingUnitsInfo2 = '2) Search for units. Found paths are added to project settings.';
|
||||
lisMissingUnitsInfo3 = '3) Abort now, install packages or fix paths and try again.';
|
||||
lisUnitNotFound = 'A unit not found in';
|
||||
lisUnitsNotFound2 = 'Units not found in';
|
||||
lisUnitNotFoundInProject = 'A unit not found in project %s';
|
||||
lisUnitsNotFoundInProject = 'Units not found in project %s';
|
||||
lisUnableToConvertLfmToLrsAndWriteLrsFile = 'Unable to convert lfm to lrs and write lrs file.';
|
||||
lisProjectPath = 'Project Path:';
|
||||
lisProjectPathHint = 'Directory where project''s main file must be';
|
||||
|
Loading…
Reference in New Issue
Block a user