diff --git a/components/jujiboutils/examples/example1/main.lfm b/components/jujiboutils/examples/example1/main.lfm index b2c3c8cdb..209111f1e 100644 --- a/components/jujiboutils/examples/example1/main.lfm +++ b/components/jujiboutils/examples/example1/main.lfm @@ -1,18 +1,18 @@ object Form1: TForm1 - Left = 576 - Height = 332 - Top = 272 - Width = 366 + Left = 379 + Height = 340 + Top = 214 + Width = 411 Caption = 'Form1' - ClientHeight = 332 - ClientWidth = 366 + ClientHeight = 340 + ClientWidth = 411 OnCreate = FormCreate - LCLVersion = '0.9.31' + LCLVersion = '1.1' object Label1: TLabel Left = 13 - Height = 18 + Height = 17 Top = 16 - Width = 150 + Width = 149 Caption = 'Testing jujibo db controls' ParentColor = False end @@ -35,9 +35,9 @@ object Form1: TForm1 TabOrder = 4 end object BitBtn1: TBitBtn - Left = 273 + Left = 318 Height = 30 - Top = 289 + Top = 297 Width = 77 Anchors = [akRight, akBottom] Caption = '&Cerrar' @@ -46,7 +46,7 @@ object Form1: TForm1 TabOrder = 5 end object JDBLabeledCurrencyEdit1: TJDBLabeledCurrencyEdit - Left = 272 + Left = 300 Height = 27 Top = 173 Width = 80 @@ -59,9 +59,9 @@ object Form1: TForm1 EditLabel.AnchorSideRight.Control = JDBLabeledCurrencyEdit1 EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideBottom.Control = JDBLabeledCurrencyEdit1 - EditLabel.Left = 272 - EditLabel.Height = 18 - EditLabel.Top = 152 + EditLabel.Left = 300 + EditLabel.Height = 17 + EditLabel.Top = 153 EditLabel.Width = 80 EditLabel.Caption = 'Total' EditLabel.ParentColor = False @@ -80,8 +80,8 @@ object Form1: TForm1 EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideBottom.Control = JDBLabeledIntegerEdit1 EditLabel.Left = 21 - EditLabel.Height = 18 - EditLabel.Top = 153 + EditLabel.Height = 17 + EditLabel.Top = 154 EditLabel.Width = 80 EditLabel.Caption = 'Id' EditLabel.ParentColor = False @@ -94,20 +94,21 @@ object Form1: TForm1 Width = 80 DataField = 'DATE' DataSource = Datasource1 + ButtonWidth = 23 EditLabel.AnchorSideLeft.Control = JDBLabeledDateEdit1 EditLabel.AnchorSideRight.Control = JDBLabeledDateEdit1 EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideBottom.Control = JDBLabeledDateEdit1 EditLabel.Left = 106 - EditLabel.Height = 18 - EditLabel.Top = 152 + EditLabel.Height = 17 + EditLabel.Top = 153 EditLabel.Width = 80 EditLabel.Caption = 'Date' EditLabel.ParentColor = False TabOrder = 1 end object JDBLabeledIntegerEdit2: TJDBLabeledIntegerEdit - Left = 188 + Left = 216 Height = 27 Top = 173 Width = 80 @@ -118,9 +119,9 @@ object Form1: TForm1 EditLabel.AnchorSideRight.Control = JDBLabeledIntegerEdit2 EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideBottom.Control = JDBLabeledIntegerEdit2 - EditLabel.Left = 188 - EditLabel.Height = 18 - EditLabel.Top = 152 + EditLabel.Left = 216 + EditLabel.Height = 17 + EditLabel.Top = 153 EditLabel.Width = 80 EditLabel.Caption = 'Id2' EditLabel.ParentColor = False diff --git a/components/jujiboutils/examples/example1/project1.lpi b/components/jujiboutils/examples/example1/project1.lpi index c987c9d32..02b3d5952 100644 --- a/components/jujiboutils/examples/example1/project1.lpi +++ b/components/jujiboutils/examples/example1/project1.lpi @@ -1,4 +1,4 @@ - + @@ -25,7 +25,6 @@ - @@ -52,13 +51,14 @@ + - + @@ -67,10 +67,6 @@ - - - - diff --git a/components/jujiboutils/examples/examplenodb/main.lfm b/components/jujiboutils/examples/examplenodb/main.lfm index 07293e85b..3fc106118 100644 --- a/components/jujiboutils/examples/examplenodb/main.lfm +++ b/components/jujiboutils/examples/examplenodb/main.lfm @@ -1,17 +1,18 @@ object Form1: TForm1 Left = 365 - Height = 185 - Top = 260 - Width = 419 + Height = 184 + Top = 261 + Width = 444 Caption = 'Example' - ClientHeight = 185 - ClientWidth = 419 - LCLVersion = '0.9.31' + ClientHeight = 184 + ClientWidth = 444 + OnCreate = FormCreate + LCLVersion = '1.1' object Label1: TLabel Left = 8 - Height = 18 + Height = 17 Top = 8 - Width = 253 + Width = 252 Caption = 'Testing non DB-Aware Input Controls' Font.Height = 14 Font.Style = [fsBold] @@ -22,10 +23,10 @@ object Form1: TForm1 Left = 24 Height = 82 Top = 40 - Width = 375 + Width = 400 Caption = 'Labeled controls' ClientHeight = 63 - ClientWidth = 371 + ClientWidth = 396 TabOrder = 0 object JLabeledIntegerEdit1: TJLabeledIntegerEdit Left = 14 @@ -39,8 +40,8 @@ object Form1: TForm1 EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideBottom.Control = JLabeledIntegerEdit1 EditLabel.Left = 14 - EditLabel.Height = 18 - EditLabel.Top = 2 + EditLabel.Height = 17 + EditLabel.Top = 3 EditLabel.Width = 80 EditLabel.Caption = 'Integer' EditLabel.ParentColor = False @@ -59,8 +60,8 @@ object Form1: TForm1 EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideBottom.Control = JLabeledCurrencyEdit1 EditLabel.Left = 102 - EditLabel.Height = 18 - EditLabel.Top = 2 + EditLabel.Height = 17 + EditLabel.Top = 3 EditLabel.Width = 80 EditLabel.Caption = 'Currency' EditLabel.ParentColor = False @@ -73,22 +74,23 @@ object Form1: TForm1 Width = 80 DisplayFormat = 'dd/mm/yy' Value = 0 + ButtonWidth = 23 EditLabel.AnchorSideLeft.Control = JLabeledDateEdit1 EditLabel.AnchorSideRight.Control = JLabeledDateEdit1 EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideBottom.Control = JLabeledDateEdit1 EditLabel.Left = 190 - EditLabel.Height = 18 - EditLabel.Top = 1 + EditLabel.Height = 17 + EditLabel.Top = 2 EditLabel.Width = 80 EditLabel.Caption = 'Date' EditLabel.ParentColor = False TabOrder = 2 end object JLabeledFloatEdit1: TJLabeledFloatEdit - Left = 280 + Left = 302 Height = 27 - Top = 23 + Top = 22 Width = 80 DisplayFormat = '#,0.00' Decimals = 2 @@ -97,8 +99,8 @@ object Form1: TForm1 EditLabel.AnchorSideRight.Control = JLabeledFloatEdit1 EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideBottom.Control = JLabeledFloatEdit1 - EditLabel.Left = 280 - EditLabel.Height = 18 + EditLabel.Left = 302 + EditLabel.Height = 17 EditLabel.Top = 2 EditLabel.Width = 80 EditLabel.Caption = 'Float' @@ -107,9 +109,9 @@ object Form1: TForm1 end end object BitBtn1: TBitBtn - Left = 308 + Left = 333 Height = 30 - Top = 139 + Top = 138 Width = 91 Anchors = [akRight, akBottom] Caption = '&Cerrar' diff --git a/components/jujiboutils/examples/examplenodb/main.pas b/components/jujiboutils/examples/examplenodb/main.pas index ad98b7073..714d1bbcb 100644 --- a/components/jujiboutils/examples/examplenodb/main.pas +++ b/components/jujiboutils/examples/examplenodb/main.pas @@ -22,6 +22,7 @@ type JLabeledIntegerEdit1: TJLabeledIntegerEdit; JLabeledIntegerEdit2: TJLabeledIntegerEdit; Label1: TLabel; + procedure FormCreate(Sender: TObject); private { private declarations } public @@ -35,5 +36,12 @@ implementation {$R *.lfm} +{ TForm1 } + +procedure TForm1.FormCreate(Sender: TObject); +begin + +end; + end. diff --git a/components/jujiboutils/examples/examplenodb/testnodb.lpi b/components/jujiboutils/examples/examplenodb/testnodb.lpi index fbeefee3a..c4a4cc136 100644 --- a/components/jujiboutils/examples/examplenodb/testnodb.lpi +++ b/components/jujiboutils/examples/examplenodb/testnodb.lpi @@ -1,4 +1,4 @@ - + @@ -18,13 +18,13 @@ + - @@ -45,13 +45,14 @@ + - + @@ -60,10 +61,6 @@ - - - -