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

MG: applied localization from Vasily

Browse Source 
git-svn-id: trunk@2785 -
This commit is contained in:
lazarus 2002-08-18 08:54:05 +00:00
parent ba9b7722bd
commit 77e1d3cb1d
4 changed files with 24 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitattributes vendored
View File

@ -702,6 +702,7 @@ lcl/templates/template.pp svneol=native#text/pascal
lcl/toolwin.pp svneol=native#text/pascal
lcl/utrace.pp svneol=native#text/pascal
lcl/vclglobals.pp svneol=native#text/pascal
/localize.sh -text svneol=native#application/x-sh
packager/addfiletoapackagedlg.pas svneol=native#text/pascal
packager/brokendependenciesdlg.pas svneol=native#text/pascal
packager/lazaruspackageintf.pas svneol=native#text/pascal

7
ide/main.pp
View File

@ -3946,9 +3946,9 @@ Begin
end;
end;
if OnlyForms then
DlgCaption:='View project forms'
DlgCaption:=dlgMainViewForms
else
DlgCaption:='View project units';
DlgCaption:=dlgMainViewUnits ;
if ShowViewUnitsDlg(UnitList,true,DlgCaption)=mrOk then begin
AnUnitInfo:=nil;
for i:=0 to UnitList.Count-1 do begin
@ -7183,6 +7183,9 @@ end.
{ =============================================================================
$Log$
Revision 1.390 2002/09/20 07:26:34 lazarus
MG: applied localization from Vasily
Revision 1.389 2002/09/19 14:54:53 lazarus
MG: history jumps now works without double jumps

10
ide/viewunit_dlg.pp
View File

@ -37,7 +37,8 @@ unit ViewUnit_Dlg;
interface
uses
SysUtils, Classes, Controls, Forms, Dialogs, LResources, Buttons, StdCtrls;
SysUtils, Classes, Controls, Forms, Dialogs, LResources, Buttons, StdCtrls,
LazarusIdeStrConsts;
type
TViewUnitsEntry = class
@ -147,7 +148,7 @@ begin
Top := btnOK.Top + btnOK.Height + pad;
Width := 75;
Height := 25;
Caption := 'Cancel';
Caption := dlgCancel;
Visible := True;
Name := 'btnCancel';
OnClick := @btnCancelClick;
@ -173,7 +174,7 @@ begin
Top:=btnCancel.Top+btnCancel.Height+2*pad;
Width:=btnOk.Width;
Height:=25;
Caption:='Multi';
Caption:=dlgMulti;
Checked:=false;
OnClick:=@MultiselectCheckBoxClick;
Visible:=true;
@ -240,6 +241,9 @@ initialization
end.
{
$Log$
Revision 1.12 2002/09/20 07:26:37 lazarus
MG: applied localization from Vasily
Revision 1.11 2002/05/10 06:57:47 lazarus
MG: updated licenses

11
localize.sh Normal file
View File

@ -0,0 +1,11 @@
#!/bin/sh
# This script may be used to compile all language.
# This script is too small and simple to be licensed.
# Let's decide, that it is public property.
# If it can't be public property anywhere (or anywhy), it also can be of GPL 2.
msgfmt languages/lazaruside.de.po -o languages/lazaruside.de.mo
msgfmt languages/lazaruside.ru.po -o languages/lazaruside.ru.mo
msgfmt components/codetools/languages/codetools.ru.po -o components/codetools/languages/codetools.ru.mo
msgfmt lcl/languages/lcl.de.po -o lcl/languages/lcl.de.mo
msgfmt lcl/languages/lcl.ru.po -o lcl/languages/lcl.ru.mo