paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 17:39:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

added resourcestrings for Lazdoc

Browse Source 
git-svn-id: trunk@13878 -
This commit is contained in:
laurent 2008-01-25 16:53:42 +00:00
parent 675e3bee30
commit 13f206454b
2 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
ide/fpdoceditwindow.pas
View File

@ -234,9 +234,9 @@ begin
InsertRemarkButton.Hint := lisCodeHelpHintRemarkTag;
InsertVarTagButton.Hint := lisCodeHelpHintVarTag;
CreateButton.Caption := 'Create help item';
CreateButton.Caption := lisCodeHelpCreateButton;
CreateButton.Enabled:=false;
SaveButton.Caption := 'Save';
SaveButton.Caption := lisCodeHelpSaveButton;
SaveButton.Enabled:=false;
AddLinkButton.Caption := lisCodeHelpAddLinkButton;
@ -390,10 +390,10 @@ begin
if ShortDescr<>'' then begin
// the inherited entry already contains a description.
// ask if it should be really replaced
if QuestionDlg('Confirm replace',
if QuestionDlg(lisCodeHelpConfirmreplace,
GetContextTitle(Element)+' already contains the help:'+#13
+ShortDescr,
mtConfirmation,[mrYes,'Replace',mrCancel],0)<>mrYes then exit;
mtConfirmation,[mrYes,lisCodeHelpReplaceButton,mrCancel],0)<>mrYes then exit;
end;
end;
end else begin
@ -521,13 +521,13 @@ begin
if i<0 then begin
InheritedShortEdit.Text:='';
InheritedShortEdit.Enabled:=false;
InheritedShortLabel.Caption:='no inherited description found';
InheritedShortLabel.Caption:=lisCodeHelpnoinheriteddescriptionfound;
end else begin
Element:=fChain[i];
ShortDescr:=Element.FPDocFile.GetValueFromNode(Element.ElementNode,fpdiShort);
InheritedShortEdit.Text:=ShortDescr;
InheritedShortEdit.Enabled:=true;
InheritedShortLabel.Caption:='Short description of '
InheritedShortLabel.Caption:=lisCodeHelpShortdescriptionof+' '
+GetContextTitle(Element);
end;
MoveToInheritedButton.Enabled:=(fChain<>nil)

6
ide/lazarusidestrconsts.pas
View File

@ -3472,6 +3472,8 @@ resourcestring
lisMenuFPDocEditor = 'FPDoc Editor';
lisCodeHelpMainFormCaption = 'FPDoc editor';
lisCodeHelpNoTagCaption = '<NONE>';
lisCodeHelpnoinheriteddescriptionfound = 'no inherited description found';
lisCodeHelpShortdescriptionof = 'Short description of';
lisCodeHelpNoDocumentation = 'Documentation entry does not exist';
lisCodeHelpInherited = 'Inherited';
lisCodeHelpShortTag = 'Short';
@ -3482,6 +3484,8 @@ resourcestring
lisCodeHelpDeletePathButton = 'Remove path';
lisEONOTEOnlyAbsolutePathsAreSupportedNow = 'NOTE: only absolute paths are '
+'supported now';
lisCodeHelpConfirmreplace = 'Confirm replace';
lisCodeHelpReplaceButton = 'Replace';
lisCodeHelpPathsGroupBox = 'LazDoc settings';
lisCodeHelpHintBoldFormat = 'Insert bold formatting tag';
lisCodeHelpHintItalicFormat = 'Insert italic formatting tag';
@ -3491,6 +3495,8 @@ resourcestring
lisCodeHelpHintVarTag = 'Insert var formatting tag';
lisCodeHelpAddLinkButton = 'Add link';
lisCodeHelpDeleteLinkButton = 'Delete link';
lisCodeHelpCreateButton = 'Create help item';
lisCodeHelpSaveButton = 'Save';
lisCodeHelpExampleTag = 'Example';
lisCodeHelpBrowseExampleButton = 'Browse';
lisLDMoveEntriesToInherited = 'Move entries to inherited';