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

* Patches from Maxim Ganetsky to improve localization

Browse Source 
git-svn-id: trunk@21675 -
This commit is contained in:
michael 2009-09-12 21:53:13 +00:00
parent 9ba0fbbc8d
commit db0bcc71ec
13 changed files with 3561 additions and 154 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
.gitattributes vendored
View File

@ -4973,6 +4973,9 @@ tools/lazdatadesktop/frmsqlconnect.pp svneol=native#text/plain
tools/lazdatadesktop/languages/lazdatadeskstr.pb.po svneol=native#text/plain
tools/lazdatadesktop/languages/lazdatadeskstr.po svneol=native#text/plain
tools/lazdatadesktop/languages/lazdatadeskstr.ru.po svneol=native#text/plain
tools/lazdatadesktop/languages/lazdatadesktop.pb.po svneol=native#text/plain
tools/lazdatadesktop/languages/lazdatadesktop.po svneol=native#text/plain
tools/lazdatadesktop/languages/lazdatadesktop.ru.po svneol=native#text/plain
tools/lazdatadesktop/lazdatadeskstr.pas svneol=native#text/plain
tools/lazdatadesktop/lazdatadesktop.lpi svneol=native#text/plain
tools/lazdatadesktop/lazdatadesktop.lpr svneol=native#text/plain

56
tools/lazdatadesktop/frmgeneratesql.lfm
View File

@ -8,7 +8,7 @@ object GenerateSQLForm: TGenerateSQLForm
ClientHeight = 395
ClientWidth = 812
OnCreate = FormCreate
LCLVersion = '0.9.27'
LCLVersion = '0.9.29'
object PCSQL: TPageControl
Left = 0
Height = 359
@ -18,8 +18,6 @@ object GenerateSQLForm: TGenerateSQLForm
Align = alClient
TabIndex = 0
TabOrder = 0
OnChange = PCSQLChange
OnPageChanged = PCSQLChange
object TSFields: TTabSheet
Caption = 'Table and &Fields'
ChildSizing.EnlargeHorizontal = crsScaleChilds
@ -27,17 +25,17 @@ object GenerateSQLForm: TGenerateSQLForm
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.ControlsPerLine = 3
ClientHeight = 329
ClientHeight = 333
ClientWidth = 804
OnResize = TSResize
object POptions: TPanel
Left = 0
Height = 329
Height = 333
Top = 0
Width = 254
Align = alLeft
BevelOuter = bvNone
ClientHeight = 329
ClientHeight = 333
ClientWidth = 254
Constraints.MinWidth = 180
TabOrder = 0
@ -78,11 +76,11 @@ object GenerateSQLForm: TGenerateSQLForm
end
object CBTables: TComboBox
Left = 4
Height = 25
Height = 21
Top = 26
Width = 238
Anchors = [akTop, akLeft, akRight]
ItemHeight = 17
ItemHeight = 13
OnChange = CBTablesChange
Sorted = True
Style = csDropDownList
@ -91,7 +89,7 @@ object GenerateSQLForm: TGenerateSQLForm
object BGenerate: TButton
Left = 4
Height = 25
Top = 300
Top = 304
Width = 238
Anchors = [akLeft, akRight, akBottom]
BorderSpacing.InnerBorder = 4
@ -102,7 +100,7 @@ object GenerateSQLForm: TGenerateSQLForm
end
object SEindent: TTISpinEdit
Left = 204
Height = 27
Height = 21
Top = 202
Width = 34
Anchors = [akTop, akRight]
@ -111,7 +109,7 @@ object GenerateSQLForm: TGenerateSQLForm
end
object SELineLength: TTISpinEdit
Left = 205
Height = 27
Height = 21
Top = 231
Width = 34
Anchors = [akTop, akRight]
@ -137,9 +135,9 @@ object GenerateSQLForm: TGenerateSQLForm
end
object CBIgnoreSelection: TCheckBox
Left = 6
Height = 21
Height = 17
Top = 257
Width = 197
Width = 159
Caption = 'Create full table creation SQL'
TabOrder = 5
end
@ -149,12 +147,12 @@ object GenerateSQLForm: TGenerateSQLForm
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Control = PSelectFields
Left = 254
Height = 329
Height = 333
Top = 0
Width = 262
Align = alClient
BevelOuter = bvNone
ClientHeight = 329
ClientHeight = 333
ClientWidth = 262
TabOrder = 1
object LLBKeyFields: TLabel
@ -171,7 +169,7 @@ object GenerateSQLForm: TGenerateSQLForm
end
object LBKeyFields: TListBox
Left = 2
Height = 284
Height = 288
Top = 34
Width = 256
Anchors = [akTop, akLeft, akRight, akBottom]
@ -183,12 +181,12 @@ object GenerateSQLForm: TGenerateSQLForm
end
object PSelectFields: TPanel
Left = 516
Height = 329
Height = 333
Top = 0
Width = 288
Align = alRight
BevelOuter = bvNone
ClientHeight = 329
ClientHeight = 333
ClientWidth = 288
TabOrder = 2
object Label2: TLabel
@ -205,7 +203,7 @@ object GenerateSQLForm: TGenerateSQLForm
end
object LBFields: TListBox
Left = 12
Height = 284
Height = 288
Top = 34
Width = 266
Anchors = [akTop, akLeft, akRight, akBottom]
@ -218,11 +216,11 @@ object GenerateSQLForm: TGenerateSQLForm
end
object TSSelect: TTabSheet
Caption = '&Select'
ClientHeight = 329
ClientHeight = 333
ClientWidth = 804
object MSelect: TMemo
Left = 8
Height = 313
Height = 317
Top = 8
Width = 788
Align = alClient
@ -235,11 +233,11 @@ object GenerateSQLForm: TGenerateSQLForm
end
object TSInsert: TTabSheet
Caption = '&Insert'
ClientHeight = 329
ClientHeight = 333
ClientWidth = 804
object MInsert: TMemo
Left = 8
Height = 313
Height = 317
Top = 8
Width = 788
Align = alClient
@ -252,11 +250,11 @@ object GenerateSQLForm: TGenerateSQLForm
end
object TSUpdate: TTabSheet
Caption = '&Update'
ClientHeight = 329
ClientHeight = 333
ClientWidth = 804
object MUpdate: TMemo
Left = 8
Height = 313
Height = 317
Top = 8
Width = 788
Align = alClient
@ -269,11 +267,11 @@ object GenerateSQLForm: TGenerateSQLForm
end
object TSDelete: TTabSheet
Caption = '&Delete'
ClientHeight = 329
ClientHeight = 333
ClientWidth = 804
object MDelete: TMemo
Left = 8
Height = 313
Height = 317
Top = 8
Width = 788
Align = alClient
@ -286,11 +284,11 @@ object GenerateSQLForm: TGenerateSQLForm
end
object TSCreate: TTabSheet
Caption = 'Create table'
ClientHeight = 329
ClientHeight = 333
ClientWidth = 804
object MCreate: TMemo
Left = 8
Height = 313
Height = 317
Top = 8
Width = 788
Align = alClient

174
tools/lazdatadesktop/frmgeneratesql.lrs
View File

@ -1,94 +1,92 @@
{ Este é um arquivo de recurso do Lazarus gerado automaticamente }
LazarusResources.Add('TGenerateSQLForm','FORMDATA',[
'TPF0'#16'TGenerateSQLForm'#15'GenerateSQLForm'#4'Left'#3'l'#1#6'Height'#3#139
+#1#3'Top'#3''''#1#5'Width'#3','#3#13'ActiveControl'#7#5'PCSQL'#7'Caption'#6
+#23'Generate SQL statements'#12'ClientHeight'#3#139#1#11'ClientWidth'#3','#3
+#8'OnCreate'#7#10'FormCreate'#10'LCLVersion'#6#6'0.9.27'#0#12'TPageControl'#5
+#8'OnCreate'#7#10'FormCreate'#10'LCLVersion'#6#6'0.9.29'#0#12'TPageControl'#5
+'PCSQL'#4'Left'#2#0#6'Height'#3'g'#1#3'Top'#2#0#5'Width'#3','#3#10'ActivePag'
+'e'#7#8'TSFields'#5'Align'#7#8'alClient'#8'TabIndex'#2#0#8'TabOrder'#2#0#8'O'
+'nChange'#7#11'PCSQLChange'#13'OnPageChanged'#7#11'PCSQLChange'#0#9'TTabShee'
+'t'#8'TSFields'#7'Caption'#6#17'Table and &Fields'#29'ChildSizing.EnlargeHor'
+'izontal'#7#14'crsScaleChilds'#27'ChildSizing.EnlargeVertical'#7#14'crsScale'
+'Childs'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizin'
+'g.ShrinkVertical'#7#14'crsScaleChilds'#27'ChildSizing.ControlsPerLine'#2#3
+#12'ClientHeight'#3'I'#1#11'ClientWidth'#3'$'#3#8'OnResize'#7#8'TSResize'#0#6
+'TPanel'#8'POptions'#4'Left'#2#0#6'Height'#3'I'#1#3'Top'#2#0#5'Width'#3#254#0
+#5'Align'#7#6'alLeft'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#3'I'#1#11
+'ClientWidth'#3#254#0#20'Constraints.MinWidth'#3#180#0#8'TabOrder'#2#0#0#6'T'
+'Label'#9'LCBTables'#4'Left'#2#4#6'Height'#2#16#3'Top'#2#5#5'Width'#3#238#0#7
+'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#8#7'Caption'#6#6'Ta'
+'&ble'#12'FocusControl'#7#8'CBTables'#11'ParentColor'#8#0#0#6'TLabel'#9'LSEI'
+'ndent'#4'Left'#2'('#6'Height'#2#20#3'Top'#3#205#0#5'Width'#3#150#0#9'Alignm'
+'ent'#7#14'taRightJustify'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'A'
+'utoSize'#8#7'Caption'#6#7'I&ndent'#6'Layout'#7#8'tlCenter'#11'ParentColor'#8
+#0#0#6'TLabel'#13'LSELineLength'#4'Left'#2'$'#6'Height'#2#20#3'Top'#3#234#0#5
+'Width'#3#154#0#9'Alignment'#7#14'taRightJustify'#7'Anchors'#11#5'akTop'#6'a'
+'kLeft'#7'akRight'#0#8'AutoSize'#8#7'Caption'#6#11'Line Length'#6'Layout'#7#8
+'tlCenter'#11'ParentColor'#8#0#0#9'TComboBox'#8'CBTables'#4'Left'#2#4#6'Heig'
+'ht'#2#25#3'Top'#2#26#5'Width'#3#238#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'ak'
+'Right'#0#10'ItemHeight'#2#17#8'OnChange'#7#14'CBTablesChange'#6'Sorted'#9#5
+'Style'#7#14'csDropDownList'#8'TabOrder'#2#0#0#0#7'TButton'#9'BGenerate'#4'L'
+'eft'#2#4#6'Height'#2#25#3'Top'#3','#1#5'Width'#3#238#0#7'Anchors'#11#6'akLe'
+'ft'#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6
+#13'&Generate SQL'#7'Default'#9#7'OnClick'#7#14'BGenerateClick'#8'TabOrder'#2
+#1#0#0#11'TTISpinEdit'#8'SEindent'#4'Left'#3#204#0#6'Height'#2#27#3'Top'#3
+#202#0#5'Width'#2'"'#7'Anchors'#11#5'akTop'#7'akRight'#0#19'Link.TIPropertyN'
+'ame'#6#6'Indent'#8'TabOrder'#2#2#0#0#11'TTISpinEdit'#12'SELineLength'#4'Lef'
+'t'#3#205#0#6'Height'#2#27#3'Top'#3#231#0#5'Width'#2'"'#7'Anchors'#11#5'akTo'
+'p'#7'akRight'#0#19'Link.TIPropertyName'#6#10'LineLength'#8'TabOrder'#2#3#0#0
+#13'TTICheckGroup'#10'CLBOptions'#4'Left'#2#6#6'Height'#3#144#0#3'Top'#2'2'#5
+'Width'#3#234#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7'Caption'#6#7
+'Options'#19'Link.TIPropertyName'#6#7'Options'#23'Link.AliasValuesStrings'#1
+#6'.eoLineFeedAfterField=Linefeed after each field'#6'8eoUseOldInWhereParams'
+'=Use OLD prefix in where parameters'#6'2eoAndTermsInBrackets=Put brackets a'
+'round AND Terms'#6'#eoQuoteFieldNames=Quote field names'#6'/eoLineFeedAfter'
+'AndTerm=Linefeed after AND terms'#6#30'eoAddTerminator=Add terminator'#0#0#0
+#9'TCheckBox'#17'CBIgnoreSelection'#4'Left'#2#6#6'Height'#2#21#3'Top'#3#1#1#5
+'Width'#3#197#0#7'Caption'#6#30'Create full table creation SQL'#8'TabOrder'#2
+#5#0#0#0#6'TPanel'#10'PKeyFields'#22'AnchorSideLeft.Control'#7#8'POptions'#19
+'AnchorSideLeft.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#13'PSelec'
+'tFields'#4'Left'#3#254#0#6'Height'#3'I'#1#3'Top'#2#0#5'Width'#3#6#1#5'Align'
+#7#8'alClient'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#3'I'#1#11'ClientW'
+'idth'#3#6#1#8'TabOrder'#2#1#0#6'TLabel'#12'LLBKeyFields'#4'Left'#2#0#6'Heig'
+'ht'#2#26#3'Top'#2#0#5'Width'#3#6#1#5'Align'#7#5'alTop'#9'Alignment'#7#8'taC'
+'enter'#8'AutoSize'#8#7'Caption'#6#11'&Key fields'#6'Layout'#7#8'tlCenter'#11
+'ParentColor'#8#0#0#8'TListBox'#11'LBKeyFields'#4'Left'#2#2#6'Height'#3#28#1
+#3'Top'#2'"'#5'Width'#3#0#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'ak'
+'Bottom'#0#10'ItemHeight'#2#0#11'MultiSelect'#9#6'Sorted'#9#8'TabOrder'#2#0#0
+#0#0#6'TPanel'#13'PSelectFields'#4'Left'#3#4#2#6'Height'#3'I'#1#3'Top'#2#0#5
+'Width'#3' '#1#5'Align'#7#7'alRight'#10'BevelOuter'#7#6'bvNone'#12'ClientHei'
+'ght'#3'I'#1#11'ClientWidth'#3' '#1#8'TabOrder'#2#2#0#6'TLabel'#6'Label2'#4
+'Left'#2#0#6'Height'#2#26#3'Top'#2#0#5'Width'#3' '#1#5'Align'#7#5'alTop'#9'A'
+'lignment'#7#8'taCenter'#8'AutoSize'#8#7'Caption'#6#27'Select/Update/Insert '
+'fields'#6'Layout'#7#8'tlCenter'#11'ParentColor'#8#0#0#8'TListBox'#8'LBField'
+'s'#4'Left'#2#12#6'Height'#3#28#1#3'Top'#2'"'#5'Width'#3#10#1#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#10'ItemHeight'#2#0#11'MultiSelect'
+#9#6'Sorted'#9#8'TabOrder'#2#0#0#0#0#0#9'TTabSheet'#8'TSSelect'#7'Caption'#6
,#7'&Select'#12'ClientHeight'#3'I'#1#11'ClientWidth'#3'$'#3#0#5'TMemo'#7'MSel'
+'ect'#4'Left'#2#8#6'Height'#3'9'#1#3'Top'#2#8#5'Width'#3#20#3#5'Align'#7#8'a'
+'lClient'#20'BorderSpacing.Around'#2#8#13'Lines.Strings'#1#6#0#0#8'TabOrder'
+#2#0#0#0#0#9'TTabSheet'#8'TSInsert'#7'Caption'#6#7'&Insert'#12'ClientHeight'
+#3'I'#1#11'ClientWidth'#3'$'#3#0#5'TMemo'#7'MInsert'#4'Left'#2#8#6'Height'#3
+'9'#1#3'Top'#2#8#5'Width'#3#20#3#5'Align'#7#8'alClient'#20'BorderSpacing.Aro'
+'und'#2#8#13'Lines.Strings'#1#6#0#0#8'TabOrder'#2#0#0#0#0#9'TTabSheet'#8'TSU'
+'pdate'#7'Caption'#6#7'&Update'#12'ClientHeight'#3'I'#1#11'ClientWidth'#3'$'
+#3#0#5'TMemo'#7'MUpdate'#4'Left'#2#8#6'Height'#3'9'#1#3'Top'#2#8#5'Width'#3
+#20#3#5'Align'#7#8'alClient'#20'BorderSpacing.Around'#2#8#13'Lines.Strings'#1
+#6#0#0#8'TabOrder'#2#0#0#0#0#9'TTabSheet'#8'TSDelete'#7'Caption'#6#7'&Delete'
+#12'ClientHeight'#3'I'#1#11'ClientWidth'#3'$'#3#0#5'TMemo'#7'MDelete'#4'Left'
+#2#8#6'Height'#3'9'#1#3'Top'#2#8#5'Width'#3#20#3#5'Align'#7#8'alClient'#20'B'
+'orderSpacing.Around'#2#8#13'Lines.Strings'#1#6#0#0#8'TabOrder'#2#0#0#0#0#9
+'TTabSheet'#8'TSCreate'#7'Caption'#6#12'Create table'#12'ClientHeight'#3'I'#1
+#11'ClientWidth'#3'$'#3#0#5'TMemo'#7'MCreate'#4'Left'#2#8#6'Height'#3'9'#1#3
+'Top'#2#8#5'Width'#3#20#3#5'Align'#7#8'alClient'#20'BorderSpacing.Around'#2#8
+#13'Lines.Strings'#1#6#0#0#8'TabOrder'#2#0#0#0#0#0#6'TPanel'#8'PButtons'#4'L'
+'eft'#2#0#6'Height'#2'$'#3'Top'#3'g'#1#5'Width'#3','#3#5'Align'#7#8'alBottom'
+#10'BevelOuter'#7#9'bvLowered'#12'ClientHeight'#2'$'#11'ClientWidth'#3','#3#8
+'TabOrder'#2#1#0#7'TButton'#3'BOK'#4'Left'#3#210#2#6'Height'#2#25#3'Top'#2#6
+#5'Width'#2'S'#7'Anchors'#11#5'akTop'#7'akRight'#0#25'BorderSpacing.InnerBor'
+'der'#2#4#7'Caption'#6#3'&Ok'#11'ModalResult'#2#1#8'TabOrder'#2#0#0#0#7'TBut'
+'ton'#7'BCancel'#4'Left'#3'z'#2#6'Height'#2#25#3'Top'#2#6#5'Width'#2'S'#7'An'
+'chors'#11#5'akTop'#7'akRight'#0#25'BorderSpacing.InnerBorder'#2#4#6'Cancel'
+#9#7'Caption'#6#7'&Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#1#0#0#0#0
+'e'#7#8'TSFields'#5'Align'#7#8'alClient'#8'TabIndex'#2#0#8'TabOrder'#2#0#0#9
+'TTabSheet'#8'TSFields'#7'Caption'#6#17'Table and &Fields'#29'ChildSizing.En'
+'largeHorizontal'#7#14'crsScaleChilds'#27'ChildSizing.EnlargeVertical'#7#14
+'crsScaleChilds'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'Ch'
+'ildSizing.ShrinkVertical'#7#14'crsScaleChilds'#27'ChildSizing.ControlsPerLi'
+'ne'#2#3#12'ClientHeight'#3'M'#1#11'ClientWidth'#3'$'#3#8'OnResize'#7#8'TSRe'
+'size'#0#6'TPanel'#8'POptions'#4'Left'#2#0#6'Height'#3'M'#1#3'Top'#2#0#5'Wid'
+'th'#3#254#0#5'Align'#7#6'alLeft'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'
+#3'M'#1#11'ClientWidth'#3#254#0#20'Constraints.MinWidth'#3#180#0#8'TabOrder'
+#2#0#0#6'TLabel'#9'LCBTables'#4'Left'#2#4#6'Height'#2#16#3'Top'#2#5#5'Width'
+#3#238#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#8#7'Capti'
+'on'#6#6'Ta&ble'#12'FocusControl'#7#8'CBTables'#11'ParentColor'#8#0#0#6'TLab'
+'el'#9'LSEIndent'#4'Left'#2'('#6'Height'#2#20#3'Top'#3#205#0#5'Width'#3#150#0
+#9'Alignment'#7#14'taRightJustify'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRigh'
+'t'#0#8'AutoSize'#8#7'Caption'#6#7'I&ndent'#6'Layout'#7#8'tlCenter'#11'Paren'
+'tColor'#8#0#0#6'TLabel'#13'LSELineLength'#4'Left'#2'$'#6'Height'#2#20#3'Top'
+#3#234#0#5'Width'#3#154#0#9'Alignment'#7#14'taRightJustify'#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#8#7'Caption'#6#11'Line Length'#6
+'Layout'#7#8'tlCenter'#11'ParentColor'#8#0#0#9'TComboBox'#8'CBTables'#4'Left'
+#2#4#6'Height'#2#21#3'Top'#2#26#5'Width'#3#238#0#7'Anchors'#11#5'akTop'#6'ak'
+'Left'#7'akRight'#0#10'ItemHeight'#2#13#8'OnChange'#7#14'CBTablesChange'#6'S'
+'orted'#9#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#0#0#0#7'TButton'#9'BGe'
+'nerate'#4'Left'#2#4#6'Height'#2#25#3'Top'#3'0'#1#5'Width'#3#238#0#7'Anchors'
+#11#6'akLeft'#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'C'
+'aption'#6#13'&Generate SQL'#7'Default'#9#7'OnClick'#7#14'BGenerateClick'#8
+'TabOrder'#2#1#0#0#11'TTISpinEdit'#8'SEindent'#4'Left'#3#204#0#6'Height'#2#21
+#3'Top'#3#202#0#5'Width'#2'"'#7'Anchors'#11#5'akTop'#7'akRight'#0#19'Link.TI'
+'PropertyName'#6#6'Indent'#8'TabOrder'#2#2#0#0#11'TTISpinEdit'#12'SELineLeng'
+'th'#4'Left'#3#205#0#6'Height'#2#21#3'Top'#3#231#0#5'Width'#2'"'#7'Anchors'
+#11#5'akTop'#7'akRight'#0#19'Link.TIPropertyName'#6#10'LineLength'#8'TabOrde'
+'r'#2#3#0#0#13'TTICheckGroup'#10'CLBOptions'#4'Left'#2#6#6'Height'#3#144#0#3
+'Top'#2'2'#5'Width'#3#234#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#7
+'Caption'#6#7'Options'#19'Link.TIPropertyName'#6#7'Options'#23'Link.AliasVal'
+'uesStrings'#1#6'.eoLineFeedAfterField=Linefeed after each field'#6'8eoUseOl'
+'dInWhereParams=Use OLD prefix in where parameters'#6'2eoAndTermsInBrackets='
+'Put brackets around AND Terms'#6'#eoQuoteFieldNames=Quote field names'#6'/e'
+'oLineFeedAfterAndTerm=Linefeed after AND terms'#6#30'eoAddTerminator=Add te'
+'rminator'#0#0#0#9'TCheckBox'#17'CBIgnoreSelection'#4'Left'#2#6#6'Height'#2
+#17#3'Top'#3#1#1#5'Width'#3#159#0#7'Caption'#6#30'Create full table creation'
+' SQL'#8'TabOrder'#2#5#0#0#0#6'TPanel'#10'PKeyFields'#22'AnchorSideLeft.Cont'
+'rol'#7#8'POptions'#19'AnchorSideLeft.Side'#7#9'asrBottom'#23'AnchorSideRigh'
+'t.Control'#7#13'PSelectFields'#4'Left'#3#254#0#6'Height'#3'M'#1#3'Top'#2#0#5
+'Width'#3#6#1#5'Align'#7#8'alClient'#10'BevelOuter'#7#6'bvNone'#12'ClientHei'
+'ght'#3'M'#1#11'ClientWidth'#3#6#1#8'TabOrder'#2#1#0#6'TLabel'#12'LLBKeyFiel'
+'ds'#4'Left'#2#0#6'Height'#2#26#3'Top'#2#0#5'Width'#3#6#1#5'Align'#7#5'alTop'
+#9'Alignment'#7#8'taCenter'#8'AutoSize'#8#7'Caption'#6#11'&Key fields'#6'Lay'
+'out'#7#8'tlCenter'#11'ParentColor'#8#0#0#8'TListBox'#11'LBKeyFields'#4'Left'
+#2#2#6'Height'#3' '#1#3'Top'#2'"'#5'Width'#3#0#1#7'Anchors'#11#5'akTop'#6'ak'
+'Left'#7'akRight'#8'akBottom'#0#10'ItemHeight'#2#0#11'MultiSelect'#9#6'Sorte'
+'d'#9#8'TabOrder'#2#0#0#0#0#6'TPanel'#13'PSelectFields'#4'Left'#3#4#2#6'Heig'
+'ht'#3'M'#1#3'Top'#2#0#5'Width'#3' '#1#5'Align'#7#7'alRight'#10'BevelOuter'#7
+#6'bvNone'#12'ClientHeight'#3'M'#1#11'ClientWidth'#3' '#1#8'TabOrder'#2#2#0#6
+'TLabel'#6'Label2'#4'Left'#2#0#6'Height'#2#26#3'Top'#2#0#5'Width'#3' '#1#5'A'
+'lign'#7#5'alTop'#9'Alignment'#7#8'taCenter'#8'AutoSize'#8#7'Caption'#6#27'S'
+'elect/Update/Insert fields'#6'Layout'#7#8'tlCenter'#11'ParentColor'#8#0#0#8
+'TListBox'#8'LBFields'#4'Left'#2#12#6'Height'#3' '#1#3'Top'#2'"'#5'Width'#3
+#10#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#10'ItemHeigh'
+'t'#2#0#11'MultiSelect'#9#6'Sorted'#9#8'TabOrder'#2#0#0#0#0#0#9'TTabSheet'#8
+'TSSelect'#7'Caption'#6#7'&Select'#12'ClientHeight'#3'M'#1#11'ClientWidth'#3
,'$'#3#0#5'TMemo'#7'MSelect'#4'Left'#2#8#6'Height'#3'='#1#3'Top'#2#8#5'Width'
+#3#20#3#5'Align'#7#8'alClient'#20'BorderSpacing.Around'#2#8#13'Lines.Strings'
+#1#6#0#0#8'TabOrder'#2#0#0#0#0#9'TTabSheet'#8'TSInsert'#7'Caption'#6#7'&Inse'
+'rt'#12'ClientHeight'#3'M'#1#11'ClientWidth'#3'$'#3#0#5'TMemo'#7'MInsert'#4
+'Left'#2#8#6'Height'#3'='#1#3'Top'#2#8#5'Width'#3#20#3#5'Align'#7#8'alClient'
+#20'BorderSpacing.Around'#2#8#13'Lines.Strings'#1#6#0#0#8'TabOrder'#2#0#0#0#0
+#9'TTabSheet'#8'TSUpdate'#7'Caption'#6#7'&Update'#12'ClientHeight'#3'M'#1#11
+'ClientWidth'#3'$'#3#0#5'TMemo'#7'MUpdate'#4'Left'#2#8#6'Height'#3'='#1#3'To'
+'p'#2#8#5'Width'#3#20#3#5'Align'#7#8'alClient'#20'BorderSpacing.Around'#2#8
+#13'Lines.Strings'#1#6#0#0#8'TabOrder'#2#0#0#0#0#9'TTabSheet'#8'TSDelete'#7
+'Caption'#6#7'&Delete'#12'ClientHeight'#3'M'#1#11'ClientWidth'#3'$'#3#0#5'TM'
+'emo'#7'MDelete'#4'Left'#2#8#6'Height'#3'='#1#3'Top'#2#8#5'Width'#3#20#3#5'A'
+'lign'#7#8'alClient'#20'BorderSpacing.Around'#2#8#13'Lines.Strings'#1#6#0#0#8
+'TabOrder'#2#0#0#0#0#9'TTabSheet'#8'TSCreate'#7'Caption'#6#12'Create table'
+#12'ClientHeight'#3'M'#1#11'ClientWidth'#3'$'#3#0#5'TMemo'#7'MCreate'#4'Left'
+#2#8#6'Height'#3'='#1#3'Top'#2#8#5'Width'#3#20#3#5'Align'#7#8'alClient'#20'B'
+'orderSpacing.Around'#2#8#13'Lines.Strings'#1#6#0#0#8'TabOrder'#2#0#0#0#0#0#6
+'TPanel'#8'PButtons'#4'Left'#2#0#6'Height'#2'$'#3'Top'#3'g'#1#5'Width'#3','#3
+#5'Align'#7#8'alBottom'#10'BevelOuter'#7#9'bvLowered'#12'ClientHeight'#2'$'
+#11'ClientWidth'#3','#3#8'TabOrder'#2#1#0#7'TButton'#3'BOK'#4'Left'#3#210#2#6
+'Height'#2#25#3'Top'#2#6#5'Width'#2'S'#7'Anchors'#11#5'akTop'#7'akRight'#0#25
+'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#3'&Ok'#11'ModalResult'#2#1#8'Ta'
+'bOrder'#2#0#0#0#7'TButton'#7'BCancel'#4'Left'#3'z'#2#6'Height'#2#25#3'Top'#2
+#6#5'Width'#2'S'#7'Anchors'#11#5'akTop'#7'akRight'#0#25'BorderSpacing.InnerB'
+'order'#2#4#6'Cancel'#9#7'Caption'#6#7'&Cancel'#11'ModalResult'#2#2#8'TabOrd'
+'er'#2#1#0#0#0#0
]);

15
tools/lazdatadesktop/frmgeneratesql.pp
View File

@ -67,7 +67,6 @@ type
procedure BGenerateClick(Sender: TObject);
procedure CBTablesChange(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure PCSQLChange(Sender: TObject);
procedure TSResize(Sender: TObject);
private
FTableDefs : TDDTableDefs;
@ -301,6 +300,14 @@ begin
BGenerate.Caption:= sld_Generatesql;
BCancel.Caption:= sld_Cancel;
BOK.Caption:= sld_Ok;
CLBOptions.Link.AliasValues.Values['eoLineFeedAfterField'] := eoLineFeedAfterField;
CLBOptions.Link.AliasValues.Values['eoUseOldInWhereParams'] := eoUseOldInWhereParams;
CLBOptions.Link.AliasValues.Values['eoAndTermsInBrackets'] := eoAndTermsInBrackets;
CLBOptions.Link.AliasValues.Values['eoQuoteFieldNames'] := eoQuoteFieldNames;
CLBOptions.Link.AliasValues.Values['eoLineFeedAfterAndTerm'] := eoLineFeedAfterAndTerm;
CLBOptions.Link.AliasValues.Values['eoAddTerminator'] := eoAddTerminator;
CLBOptions.Link.AliasValues.Values['eoSkipForeignKeys'] := eoSkipForeignKeys;
//
FGenerator:=TFPDDSQLEngine.Create;
CLBOptions.Link.TIObject:=FGenerator;
@ -311,12 +318,6 @@ begin
{$ENDIF VER2_2}
end;
procedure TGenerateSQLForm.PCSQLChange(Sender: TObject);
begin
end;
procedure TGenerateSQLForm.BGenerateClick(Sender: TObject);
begin
GenerateSQL;

16
tools/lazdatadesktop/frmmain.lfm
View File

@ -5,7 +5,7 @@ object MainForm: TMainForm
Width = 666
ActiveControl = PCDD
Caption = 'Lazarus Database Desktop'
ClientHeight = 455
ClientHeight = 460
ClientWidth = 666
Menu = MainMenu1
OnClose = FormClose
@ -15,7 +15,7 @@ object MainForm: TMainForm
OnShow = FormShow
Position = poScreenCenter
SessionProperties = 'Height;Left;Top;Width;WindowState'
LCLVersion = '0.9.27'
LCLVersion = '0.9.29'
object TBMain: TToolBar
Left = 0
Height = 26
@ -110,7 +110,7 @@ object MainForm: TMainForm
end
object PCDD: TPageControl
Left = 0
Height = 409
Height = 414
Top = 26
Width = 666
ActivePage = TSRecent
@ -119,11 +119,11 @@ object MainForm: TMainForm
TabOrder = 1
object TSRecent: TTabSheet
Caption = 'Dictionaries'
ClientHeight = 379
ClientHeight = 388
ClientWidth = 658
object LVDicts: TListView
Left = 0
Height = 379
Height = 388
Top = 0
Width = 658
Align = alClient
@ -151,11 +151,11 @@ object MainForm: TMainForm
end
object TSConnections: TTabSheet
Caption = 'Connections'
ClientHeight = 379
ClientHeight = 383
ClientWidth = 658
object LVConnections: TListView
Left = 0
Height = 379
Height = 383
Top = 0
Width = 658
Align = alClient
@ -190,7 +190,7 @@ object MainForm: TMainForm
object PStatus: TPanel
Left = 0
Height = 20
Top = 435
Top = 440
Width = 666
Align = alBottom
BevelOuter = bvNone

36
tools/lazdatadesktop/frmmain.lrs
View File

@ -1,11 +1,13 @@
{ Это - файл ресурсов, автоматически созданный lazarus }
LazarusResources.Add('TMainForm','FORMDATA',[
'TPF0'#9'TMainForm'#8'MainForm'#4'Left'#3#194#1#6'Height'#3#224#1#3'Top'#3#226
+#0#5'Width'#3#154#2#13'ActiveControl'#7#4'PCDD'#7'Caption'#6#24'Lazarus Data'
+'base Desktop'#12'ClientHeight'#3#199#1#11'ClientWidth'#3#154#2#4'Menu'#7#9
+'base Desktop'#12'ClientHeight'#3#204#1#11'ClientWidth'#3#154#2#4'Menu'#7#9
+'MainMenu1'#7'OnClose'#7#9'FormClose'#12'OnCloseQuery'#7#14'FormCloseQuery'#8
+'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#6'OnShow'#7#8'For'
+'mShow'#8'Position'#7#14'poScreenCenter'#17'SessionProperties'#6'!Height;Lef'
+'t;Top;Width;WindowState'#10'LCLVersion'#6#6'0.9.27'#0#8'TToolBar'#6'TBMain'
+'t;Top;Width;WindowState'#10'LCLVersion'#6#6'0.9.29'#0#8'TToolBar'#6'TBMain'
+#4'Left'#2#0#6'Height'#2#26#3'Top'#2#0#5'Width'#3#154#2#12'ButtonHeight'#2#24
+#11'ButtonWidth'#2#24#6'Images'#7#6'ILMain'#14'ParentShowHint'#8#8'ShowHint'
+#9#8'TabOrder'#2#0#0#11'TToolButton'#6'TBSave'#4'Left'#2'1'#3'Top'#2#2#6'Act'
@ -27,25 +29,25 @@ LazarusResources.Add('TMainForm','FORMDATA',[
+#3'Top'#2#2#6'Action'#7#12'AAddSequence'#0#0#11'TToolButton'#11'ToolButton4'
+#4'Left'#3#208#0#3'Top'#2#2#6'Action'#7#10'AAddDomain'#0#0#11'TToolButton'#11
+'ToolButton6'#4'Left'#3#136#0#3'Top'#2#2#6'Action'#7#14'AAddForeignKey'#0#0#0
+#12'TPageControl'#4'PCDD'#4'Left'#2#0#6'Height'#3#153#1#3'Top'#2#26#5'Width'
+#12'TPageControl'#4'PCDD'#4'Left'#2#0#6'Height'#3#158#1#3'Top'#2#26#5'Width'
+#3#154#2#10'ActivePage'#7#8'TSRecent'#5'Align'#7#8'alClient'#8'TabIndex'#2#0
+#8'TabOrder'#2#1#0#9'TTabSheet'#8'TSRecent'#7'Caption'#6#12'Dictionaries'#12
+'ClientHeight'#3'{'#1#11'ClientWidth'#3#146#2#0#9'TListView'#7'LVDicts'#4'Le'
+'ft'#2#0#6'Height'#3'{'#1#3'Top'#2#0#5'Width'#3#146#2#5'Align'#7#8'alClient'
+#7'Columns'#14#1#7'Caption'#6#4'Name'#5'Width'#2#10#0#1#7'Caption'#6#8'Filen'
+'ame'#5'Width'#2#10#0#1#7'Caption'#6#12'Last used on'#5'Width'#3#231#1#0#0#9
+'PopupMenu'#7#10'PMDataDict'#8'ReadOnly'#9#9'RowSelect'#9#8'TabOrder'#2#0#9
+'ClientHeight'#3#132#1#11'ClientWidth'#3#146#2#0#9'TListView'#7'LVDicts'#4'L'
+'eft'#2#0#6'Height'#3#132#1#3'Top'#2#0#5'Width'#3#146#2#5'Align'#7#8'alClien'
+'t'#7'Columns'#14#1#7'Caption'#6#4'Name'#5'Width'#2#10#0#1#7'Caption'#6#8'Fi'
+'lename'#5'Width'#2#10#0#1#7'Caption'#6#12'Last used on'#5'Width'#3#231#1#0#0
+#9'PopupMenu'#7#10'PMDataDict'#8'ReadOnly'#9#9'RowSelect'#9#8'TabOrder'#2#0#9
+'ViewStyle'#7#8'vsReport'#10'OnDblClick'#7#18'OpenRecentDatadict'#7'OnKeyUp'
+#7#12'LVDictsKeyUp'#0#0#0#9'TTabSheet'#13'TSConnections'#7'Caption'#6#11'Con'
+'nections'#12'ClientHeight'#3'{'#1#11'ClientWidth'#3#146#2#0#9'TListView'#13
+'LVConnections'#4'Left'#2#0#6'Height'#3'{'#1#3'Top'#2#0#5'Width'#3#146#2#5'A'
+'lign'#7#8'alClient'#7'Columns'#14#1#7'Caption'#6#4'Name'#5'Width'#2'x'#0#1#7
+'Caption'#6#6'Driver'#5'Width'#2'x'#0#1#7'Caption'#6#9'Last used'#5'Width'#3
+#150#0#0#1#7'Caption'#6#11'Description'#5'Width'#3#4#1#0#0#9'PopupMenu'#7#19
+'PMRecentConnections'#8'ReadOnly'#9#9'RowSelect'#9#8'SortType'#7#6'stText'#8
+'TabOrder'#2#0#9'ViewStyle'#7#8'vsReport'#10'OnDblClick'#7#20'OpenRecentConn'
+'ection'#7'OnKeyUp'#7#18'LVConnectionsKeyUp'#0#0#0#0#6'TPanel'#7'PStatus'#4
+'Left'#2#0#6'Height'#2#20#3'Top'#3#179#1#5'Width'#3#154#2#5'Align'#7#8'alBot'
+'nections'#12'ClientHeight'#3#127#1#11'ClientWidth'#3#146#2#0#9'TListView'#13
+'LVConnections'#4'Left'#2#0#6'Height'#3#127#1#3'Top'#2#0#5'Width'#3#146#2#5
+'Align'#7#8'alClient'#7'Columns'#14#1#7'Caption'#6#4'Name'#5'Width'#2'x'#0#1
+#7'Caption'#6#6'Driver'#5'Width'#2'x'#0#1#7'Caption'#6#9'Last used'#5'Width'
+#3#150#0#0#1#7'Caption'#6#11'Description'#5'Width'#3#4#1#0#0#9'PopupMenu'#7
+#19'PMRecentConnections'#8'ReadOnly'#9#9'RowSelect'#9#8'SortType'#7#6'stText'
+#8'TabOrder'#2#0#9'ViewStyle'#7#8'vsReport'#10'OnDblClick'#7#20'OpenRecentCo'
+'nnection'#7'OnKeyUp'#7#18'LVConnectionsKeyUp'#0#0#0#0#6'TPanel'#7'PStatus'#4
+'Left'#2#0#6'Height'#2#20#3'Top'#3#184#1#5'Width'#3#154#2#5'Align'#7#8'alBot'
+'tom'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2#20#11'ClientWidth'#3#154
+#2#8'TabOrder'#2#2#7'Visible'#8#0#12'TProgressBar'#8'PBSTatus'#4'Left'#2#0#6
+'Height'#2#20#3'Top'#2#0#5'Width'#3#128#0#5'Align'#7#6'alLeft'#8'TabOrder'#2

2
tools/lazdatadesktop/frmmain.pp
View File

@ -1602,7 +1602,7 @@ begin
TranslateUnitResourceStrings('lclstrconsts',basedir+
'lcl/languages/lclstrconsts'+ext, LangID1,LangID2);
TranslateUnitResourceStrings('lazdatadeskstr',basedir+
'tools/lazdatadesktop/languages/lazdatadeskstr'+ext, LangID1,LangID2);
'tools/lazdatadesktop/languages/lazdatadesktop'+ext, LangID1,LangID2);
//
SetCurrentDir(olddir);
end;

1150
tools/lazdatadesktop/languages/lazdatadesktop.pb.po Normal file
View File

File diff suppressed because it is too large Load Diff

1118
tools/lazdatadesktop/languages/lazdatadesktop.po Normal file
View File

File diff suppressed because it is too large Load Diff

1130
tools/lazdatadesktop/languages/lazdatadesktop.ru.po Normal file
View File

File diff suppressed because it is too large Load Diff

8
tools/lazdatadesktop/lazdatadeskstr.pas
View File

@ -84,6 +84,14 @@ resourcestring
sld_Generatesql = 'Generate SQL';
sld_Ok = '&OK';
sld_Cancel = '&Cancel';
//
eoLineFeedAfterField = 'Linefeed after each field';
eoUseOldInWhereParams = 'Use OLD prefix in where parameters';
eoAndTermsInBrackets = 'Put brackets around AND Terms';
eoQuoteFieldNames = 'Quote field names';
eoLineFeedAfterAndTerm = 'Linefeed after AND terms';
eoAddTerminator = 'Add terminator';
eoSkipForeignKeys = 'Skip foreign keys';
// Import/Update datadictionary form
sld_Importupdatedatadictionary = 'Import/Update datadictionary';

3
tools/lazdatadesktop/lazdatadesktop.lpi
View File

@ -12,9 +12,10 @@
<AutoCreateForms Value="False"/>
<TargetFileExt Value=".exe"/>
<Title Value="Lazarus Data Desktop"/>
<Icon Value="0"/>
<UseXPManifest Value="True"/>
</General>
<i18n>
<EnableI18N Value="True"/>
<OutDir Value="languages"/>
</i18n>
<PublishOptions>

4
tools/lazdatadesktop/lazdatadesktop.lpr
View File

@ -7,8 +7,7 @@ uses
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms, LResources
{ add your units here }, frmmain, dicteditor, DBFLaz, frmimportdd,
Forms, frmmain, dicteditor, DBFLaz, frmimportdd,
frmgeneratesql, SQLDBLaz, lazdatadict, RunTimeTypeInfoControls, frmSQLConnect,
ddfiles, conneditor, datapanel, querypanel, frmselectconnectiontype,
lazdatadeskstr, lazdbexport;
@ -16,7 +15,6 @@ uses
{$IFDEF WINDOWS}{$R lazdatadesktop.rc}{$ENDIF}
begin
{$I lazdatadesktop.lrs}
Application.Title:='Lazarus Data Desktop';
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);