paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 07:21:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

Designer: improved 'Ask Component Name' dialog i18n

Browse Source 
git-svn-id: trunk@58318 -
This commit is contained in:
maxim 2018-06-18 23:22:30 +00:00
parent afb9d4accf
commit 46520f25cc
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
designer/askcompnamedlg.pas
View File

@ -199,7 +199,7 @@ begin
Caption:=lisChooseNameAndText;
NameLabel.Caption:=lisChooseANameForTheComponent;
NameEdit.Hint:=lisTheComponentNameMustBeUniqueInAllComponentsOnTheFo;
TextLabel.Caption:=lisMenuEditorCaption;
TextLabel.Caption:=Format(lisProperty, ['Caption']);
ButtonPanel1.OKButton.Caption:=lisOk;
ButtonPanel1.CancelButton.Caption:=lisCancel;
ButtonPanel1.OKButton.Enabled:=false;
@ -254,7 +254,7 @@ begin
if TextMemo.Enabled then
begin
TextMemo.Text := ReadText;
TextLabel.Caption:=FNewTextPropertyName;
TextLabel.Caption:=Format(lisProperty, [FNewTextPropertyName]);
end else
TextMemo.Text := '';
end;

1
ide/lazarusidestrconsts.pas
View File

@ -5874,6 +5874,7 @@ resourcestring
+'must be unique in all components on the form/datamodule.The name is '
+'compared case insensitive like a normal Pascal identifier.';
lisChooseANameForTheComponent = 'Choose a name for the component';
lisProperty = '%s property';
lisAskForFileNameOnNewFile = 'Ask for file name on new file';
lisSuggestDefaultNameOfNewFileInLowercase = 'Suggest default name of new '
+'file in lowercase';