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

IDE, MultiPaste dialog: added i18n

Browse Source 
git-svn-id: trunk@53070 -
This commit is contained in:
maxim 2016-10-05 22:26:55 +00:00
parent 861f05a8dd
commit 0167fd9dde
2 changed files with 22 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
ide/lazarusidestrconsts.pas
View File

@ -347,7 +347,7 @@ resourcestring
lisKMSelectPageBottom = 'Select Page Bottom';
lisUseAndClose = 'Use and close';
lisMenuSelect = 'Select';
lisMenuMultiPaste = 'MultiPaste';
lisMenuMultiPaste = 'MultiPaste ...';
lisMenuSelectAll = 'Select All';
lisCheckAll = 'Check All';
lisUncheckAll = 'Uncheck All';
@ -6317,6 +6317,16 @@ resourcestring
synfMatchActionModifiersOfMouseDown = 'Match action modifiers of mouse down';
synfContinueWithNextMouseUpAction = 'Continue with next mouse up action';
lisDuplicateUnitIn = 'Duplicate unit "%s" in "%s"';
lismpMultiPaste = 'MultiPaste';
lismpPasteOptions = 'Paste &options';
lismpTextBeforeEachLine = 'Text &before each line';
lismpTextAfterEachLine = 'Text &after each line';
lismpEscapeQuotes = 'Escape &quotes';
lismpPascalStyle = 'Pascal style: '' => ''''';
lismpCStyle = 'C style: " => \"';
lismpTrimClipboardContents = '&Trim clipboard contents';
lismpPreview = '&Preview';
implementation
end.

12
ide/multipastedlg.pas
View File

@ -40,7 +40,7 @@ interface
uses
SysUtils, Classes, StdCtrls, ButtonPanel, Forms, Clipbrd, SynEdit,
IDEHelpIntf, InputHistory, IDEProcs;
IDEHelpIntf, InputHistory, IDEProcs, LazarusIDEStrConsts;
const
hlFormatPasteTxtBefore = 'FormatPasteTxtBefore';
@ -107,6 +107,16 @@ begin
List.AppendEntry(''');');
TxtAfterLinesComboBox.Items.Assign(List);
TxtAfterLinesComboBox.Text:=List[0];
Caption := lismpMultiPaste;
PasteOptsGroupBox.Caption := lismpPasteOptions;
TxtBeforeLinesLabel.Caption := lismpTextBeforeEachLine;
TxtAfterLinesLabel.Caption := lismpTextAfterEachLine;
EscQuotesCheckBox.Caption := lismpEscapeQuotes;
EscQuotesStyleComboBox.Items[0] := lismpPascalStyle;
EscQuotesStyleComboBox.Items[1] := lismpCStyle;
TrimClipbrdContentsCheckBox.Caption := lismpTrimClipboardContents;
PreviewGroupBox.Caption := lismpPreview;
end;
procedure TMultiPasteDialog.FormDestroy(Sender: TObject);