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

added resourcestrings for listviewitemspropertyeditor from Olivier

Browse Source 
git-svn-id: trunk@3858 -
This commit is contained in:
mattias 2003-02-19 23:42:35 +00:00
parent 9644a95a4c
commit 26f3b2f876
13 changed files with 214 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
designer/listviewpropedit.pp
View File

@ -27,6 +27,7 @@
History
01/28/2003 OG - Create
18/02/2003 OG - First release
19/02/2003 OG - Add ObjInspStrConsts unit
}
unit ListViewPropEdit;
@ -36,20 +37,14 @@ interface
uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, LResources, ComCtrls,
StdCtrls, Buttons, ExtCtrls,Menus,PropEdits,ComponentEditors,LCLProc,LMessages;
StdCtrls, Buttons, ExtCtrls, Menus, PropEdits, ComponentEditors, LCLProc,
LMessages, ObjInspStrConsts;
Implementation
Const
sccsLvEdtCaption = 'ListView editor';
sccsLvEdtGrpLCaption = ' Items ';
sccsLvEdtGrpRCaption = ' Item property ';
sccsLvEdtlabCaption = 'Label';
sccsLvEdtImgIndexCaption= 'Image index';
sccsLvEdtBtnAdd = 'New';
sccsLvEdtBtnDel = 'Delete';
Type
{TMenuItemsPropertyEditorDlg}
{TMenuItemsPropertyEditorDlg}
TListViewItemsPropertyEditorDlg = Class(TForm)
private
edtLabel : TEdit;
@ -82,11 +77,11 @@ Type
{TListViewItemsPropertyEditor
Property editor for the Items properties of TListView object.
Brings up the dialog for editing items}
TListViewItemsPropertyEditor = Class(TClassPropertyEditor)
public
procedure Edit; override;
function GetAttributes: TPropertyAttributes; override;
end;
TListViewItemsPropertyEditor = Class(TClassPropertyEditor)
public
procedure Edit; override;
function GetAttributes: TPropertyAttributes; override;
end;
//This function find the Designer of aComponent
function GetDesignerOfComponent(aComponent : TComponent): TComponentEditorDesigner;
@ -325,6 +320,7 @@ begin
Parent :=cmp;
Left :=16;
Top :=72;
Width :=90;
Caption:=sccsLvEdtImgIndexCaption;
end;
@ -332,9 +328,9 @@ begin
With EdtLabel do
begin
Parent:=Cmp;
Left :=104;
Left :=134;
Text :='';
Width :=185;
Width :=155;
Top :=24;
OnChange:=@EdtLabelOnChange;
@ -344,9 +340,9 @@ begin
With EdtIndex do
begin
Parent:=Cmp;
Left :=104;
Left :=134;
Text :='';
Width :=73;
Width :=43;
Top :=64;
OnChange:=@EdtIndexOnChange;
@ -454,10 +450,10 @@ begin
end;
initialization
//Initialization of properties Items of TMainMenu and TPopupMenu
//Register TListViewItemsPropertyEditor
RegisterPropertyEditor(ClassTypeInfo(TListItems), TListView,'Items',
TListViewItemsPropertyEditor);
//Register a component editor for with mouse right clic, the popup
//Register a component editor for TListView
RegisterComponentEditor(TListView,TListViewComponentEditor);
end.

8
designer/objinspstrconsts.pas
View File

@ -28,6 +28,14 @@ resourcestring
oisProperties='Properties';
oisEvents='Events';
//ListView items editor
sccsLvEdtCaption = 'ListView editor';
sccsLvEdtGrpLCaption = ' Items ';
sccsLvEdtGrpRCaption = ' Item property ';
sccsLvEdtlabCaption = 'Label';
sccsLvEdtImgIndexCaption= 'Image index';
sccsLvEdtBtnAdd = 'New';
sccsLvEdtBtnDel = 'Delete';
implementation

8
languages/lazaruside.de.po
View File

@ -290,6 +290,10 @@ msgstr ""
msgid "Choose code template file (*.dci)"
msgstr ""
#: lazarusidestrconsts:lischoosedirectory
msgid "Choose directory"
msgstr ""
#: lazarusidestrconsts:dlgcdtclassorder
msgid "Class order"
msgstr ""
@ -1114,6 +1118,10 @@ msgstr "Messages..."
msgid "Method insert policy"
msgstr ""
#: lazarusidestrconsts:dlgminimizeallonminimizemain
msgid "Minimize all on minimize main"
msgstr ""
#: lazarusidestrconsts:fdmmirrorhorizontal
msgid "Mirror horizontal"
msgstr ""

8
languages/lazaruside.es.po
View File

@ -290,6 +290,10 @@ msgstr "Verificar:"
msgid "Choose code template file (*.dci)"
msgstr "Escoja archivo plantilla de código (*.dci)"
#: lazarusidestrconsts:lischoosedirectory
msgid "Choose directory"
msgstr ""
#: lazarusidestrconsts:dlgcdtclassorder
msgid "Class order"
msgstr "Orden de la clase"
@ -1114,6 +1118,10 @@ msgstr "Mensajes"
msgid "Method insert policy"
msgstr "Política de insertar Métodos"
#: lazarusidestrconsts:dlgminimizeallonminimizemain
msgid "Minimize all on minimize main"
msgstr ""
#: lazarusidestrconsts:fdmmirrorhorizontal
msgid "Mirror horizontal"
msgstr "Reflejar horizontal"

8
languages/lazaruside.fr.po
View File

@ -300,6 +300,10 @@ msgstr "Controles"
msgid "Choose code template file (*.dci)"
msgstr "Choisir un fichier de modèle de code (*.dci)"
#: lazarusidestrconsts:lischoosedirectory
msgid "Choose directory"
msgstr ""
#: lazarusidestrconsts:dlgcdtclassorder
msgid "Class order"
msgstr "L'odre des objets"
@ -1124,6 +1128,10 @@ msgstr "Messages"
msgid "Method insert policy"
msgstr "Politique d'insertion des méthodes"
#: lazarusidestrconsts:dlgminimizeallonminimizemain
msgid "Minimize all on minimize main"
msgstr ""
#: lazarusidestrconsts:fdmmirrorhorizontal
msgid "Mirror horizontal"
msgstr "Miroir horizontal"

8
languages/lazaruside.po
View File

@ -562,6 +562,10 @@ msgstr ""
msgid "Select Delphi form files (*.dfm)"
msgstr ""
#: lazarusidestrconsts:lischoosedirectory
msgid "Choose directory"
msgstr ""
#: lazarusidestrconsts:lissavechangestoproject
msgid "Save changes to project %s?"
msgstr ""
@ -758,6 +762,10 @@ msgstr ""
msgid "Load desktop settings from file"
msgstr ""
#: lazarusidestrconsts:dlgminimizeallonminimizemain
msgid "Minimize all on minimize main"
msgstr ""
#: lazarusidestrconsts:dlgpalhints
msgid "Hints for component palette"
msgstr ""

8
languages/lazaruside.ru.po
View File

@ -290,6 +290,10 @@ msgstr "
msgid "Choose code template file (*.dci)"
msgstr "÷ÙÂÅÒÉÔÅ ÆÁÊÌ ÛÁÂÌÏÎÏ× ËÏÄÁ (*.dci)"
#: lazarusidestrconsts:lischoosedirectory
msgid "Choose directory"
msgstr ""
#: lazarusidestrconsts:dlgcdtclassorder
msgid "Class order"
msgstr "÷ ÐÏÒÑÄËÅ ËÌÁÓÓÏ×"
@ -1114,6 +1118,10 @@ msgstr "
msgid "Method insert policy"
msgstr "ðÏÌÉÔÉËÁ ×ÓÔÁ×ËÉ ÍÅÔÏÄÏ×"
#: lazarusidestrconsts:dlgminimizeallonminimizemain
msgid "Minimize all on minimize main"
msgstr ""
#: lazarusidestrconsts:fdmmirrorhorizontal
msgid "Mirror horizontal"
msgstr "ïÔÒÁÚÉÔØ ÐÏ ÇÏÒÉÚÏÎÔÁÌÉ"

28
languages/objinspstrconsts.de.po
View File

@ -1,3 +1,11 @@
#: objinspstrconsts:sccslvedtgrprcaption
msgid " Item property "
msgstr ""
#: objinspstrconsts:sccslvedtgrplcaption
msgid " Items "
msgstr ""
#: objinspstrconsts:oisitemsselected
msgid " items selected"
msgstr " selektiert"
@ -10,10 +18,30 @@ msgstr "Hinzufuegen"
msgid "&Delete"
msgstr "Loeschen"
#: objinspstrconsts:sccslvedtbtndel
msgid "Delete"
msgstr ""
#: objinspstrconsts:oisevents
msgid "Events"
msgstr "Events"
#: objinspstrconsts:sccslvedtimgindexcaption
msgid "Image index"
msgstr ""
#: objinspstrconsts:sccslvedtlabcaption
msgid "Label"
msgstr ""
#: objinspstrconsts:sccslvedtcaption
msgid "ListView editor"
msgstr ""
#: objinspstrconsts:sccslvedtbtnadd
msgid "New"
msgstr ""
#: objinspstrconsts:oisobjectinspector
msgid "Object Inspector"
msgstr "Object Inspector"

28
languages/objinspstrconsts.es.po
View File

@ -1,3 +1,11 @@
#: objinspstrconsts:sccslvedtgrprcaption
msgid " Item property "
msgstr ""
#: objinspstrconsts:sccslvedtgrplcaption
msgid " Items "
msgstr ""
#: objinspstrconsts:oisitemsselected
msgid " items selected"
msgstr " elementos seleccionados"
@ -10,10 +18,30 @@ msgstr "&A
msgid "&Delete"
msgstr "&Suprimir"
#: objinspstrconsts:sccslvedtbtndel
msgid "Delete"
msgstr ""
#: objinspstrconsts:oisevents
msgid "Events"
msgstr "Eventos"
#: objinspstrconsts:sccslvedtimgindexcaption
msgid "Image index"
msgstr ""
#: objinspstrconsts:sccslvedtlabcaption
msgid "Label"
msgstr ""
#: objinspstrconsts:sccslvedtcaption
msgid "ListView editor"
msgstr ""
#: objinspstrconsts:sccslvedtbtnadd
msgid "New"
msgstr ""
#: objinspstrconsts:oisobjectinspector
msgid "Object Inspector"
msgstr "Inspector de Objetos"

28
languages/objinspstrconsts.fr.po
View File

@ -1,3 +1,11 @@
#: objinspstrconsts:sccslvedtgrprcaption
msgid " Item property "
msgstr "Propriété de l'élément"
#: objinspstrconsts:sccslvedtgrplcaption
msgid " Items "
msgstr "Eléments"
#: objinspstrconsts:oisitemsselected
msgid " items selected"
msgstr "Sélection"
@ -10,10 +18,30 @@ msgstr "&Ajouter"
msgid "&Delete"
msgstr "&Supprimer"
#: objinspstrconsts:sccslvedtbtndel
msgid "Delete"
msgstr "Supprimer"
#: objinspstrconsts:oisevents
msgid "Events"
msgstr "Evénements"
#: objinspstrconsts:sccslvedtimgindexcaption
msgid "Image index"
msgstr "Index d'image"
#: objinspstrconsts:sccslvedtlabcaption
msgid "Label"
msgstr "Libellé"
#: objinspstrconsts:sccslvedtcaption
msgid "ListView editor"
msgstr "Editeur d'élements"
#: objinspstrconsts:sccslvedtbtnadd
msgid "New"
msgstr "Nouveau"
#: objinspstrconsts:oisobjectinspector
msgid "Object Inspector"
msgstr "Inspecteur d'objet"

28
languages/objinspstrconsts.po
View File

@ -22,3 +22,31 @@ msgstr ""
msgid "Events"
msgstr ""
#: objinspstrconsts:sccslvedtcaption
msgid "ListView editor"
msgstr ""
#: objinspstrconsts:sccslvedtgrplcaption
msgid " Items "
msgstr ""
#: objinspstrconsts:sccslvedtgrprcaption
msgid " Item property "
msgstr ""
#: objinspstrconsts:sccslvedtlabcaption
msgid "Label"
msgstr ""
#: objinspstrconsts:sccslvedtimgindexcaption
msgid "Image index"
msgstr ""
#: objinspstrconsts:sccslvedtbtnadd
msgid "New"
msgstr ""
#: objinspstrconsts:sccslvedtbtndel
msgid "Delete"
msgstr ""

28
languages/objinspstrconsts.ru.po
View File

@ -8,6 +8,14 @@ msgstr ""
"Content-Transfer-Encoding: 8bit\n"
"X-Generator: KBabel 0.9.6\n"
#: objinspstrconsts:sccslvedtgrprcaption
msgid " Item property "
msgstr ""
#: objinspstrconsts:sccslvedtgrplcaption
msgid " Items "
msgstr ""
#: objinspstrconsts:oisitemsselected
msgid " items selected"
msgstr " ÜÌÅÍÅÎÔÏ× ×ÙÂÒÁÎÏ"
@ -20,10 +28,30 @@ msgstr "&
msgid "&Delete"
msgstr "&õÄÁÌÉÔØ"
#: objinspstrconsts:sccslvedtbtndel
msgid "Delete"
msgstr ""
#: objinspstrconsts:oisevents
msgid "Events"
msgstr "óÏÂÙÔÉÑ"
#: objinspstrconsts:sccslvedtimgindexcaption
msgid "Image index"
msgstr ""
#: objinspstrconsts:sccslvedtlabcaption
msgid "Label"
msgstr ""
#: objinspstrconsts:sccslvedtcaption
msgid "ListView editor"
msgstr ""
#: objinspstrconsts:sccslvedtbtnadd
msgid "New"
msgstr ""
#: objinspstrconsts:oisobjectinspector
msgid "Object Inspector"
msgstr "éÎÓÐÅËÔÏÒ ÏÂßÅËÔÏ×"

9
localize.sh
View File

@ -12,7 +12,14 @@
#
set -x
#set -e
set -e
if [ ! -x tools/updatepofiles ]; then
cd tools
make
cd -
fi
set +e
# IDE without objectinspector
rstconv -i lazarusidestrconsts.rst -o languages/lazaruside.po