Examples updated. Show new calendar component.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2779 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2013-08-29 11:52:06 +00:00
parent a136018e37
commit dfd35e882c
5 changed files with 63 additions and 59 deletions
--- 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
--- a/components/jujiboutils/examples/example1/project1.lpi
+++ b/components/jujiboutils/examples/example1/project1.lpi
@ -1,4 +1,4 @@
-<?xml version="1.0"?>
+<?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
  <ProjectOptions>
    <Version Value="9"/>
@ -25,7 +25,6 @@
    <RunParams>
      <local>
        <FormatVersion Value="1"/>
-        <LaunchingApplication PathPlusParams="/usr/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
      </local>
    </RunParams>
    <RequiredPackages Count="4">
@ -52,13 +51,14 @@
        <Filename Value="main.pas"/>
        <IsPartOfProject Value="True"/>
        <ComponentName Value="Form1"/>
+        <HasResources Value="True"/>
        <ResourceBaseClass Value="Form"/>
        <UnitName Value="main"/>
      </Unit1>
    </Units>
  </ProjectOptions>
  <CompilerOptions>
-    <Version Value="10"/>
+    <Version Value="11"/>
    <Target>
      <Filename Value="project1"/>
    </Target>
@ -67,10 +67,6 @@
      <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
    </SearchPaths>
    <Linking>
-      <Debugging>
-        <GenerateDebugInfo Value="True"/>
-        <DebugInfoType Value="dsAuto"/>
-      </Debugging>
      <Options>
        <Win32>
          <GraphicApplication Value="True"/>
--- 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'
--- 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.

--- a/components/jujiboutils/examples/examplenodb/testnodb.lpi
+++ b/components/jujiboutils/examples/examplenodb/testnodb.lpi
@ -1,4 +1,4 @@
-<?xml version="1.0"?>
+<?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
  <ProjectOptions>
    <Version Value="9"/>
@ -18,13 +18,13 @@
    </BuildModes>
    <PublishOptions>
      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)/testnodb/"/>
      <IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>
      <ExcludeFileFilter Value="*.(bak|ppu|o|so);*~;backup"/>
    </PublishOptions>
    <RunParams>
      <local>
        <FormatVersion Value="1"/>
-        <LaunchingApplication PathPlusParams="/usr/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
      </local>
    </RunParams>
    <RequiredPackages Count="2">
@ -45,13 +45,14 @@
        <Filename Value="main.pas"/>
        <IsPartOfProject Value="True"/>
        <ComponentName Value="Form1"/>
+        <HasResources Value="True"/>
        <ResourceBaseClass Value="Form"/>
        <UnitName Value="main"/>
      </Unit1>
    </Units>
  </ProjectOptions>
  <CompilerOptions>
-    <Version Value="10"/>
+    <Version Value="11"/>
    <Target>
      <Filename Value="testnodb"/>
    </Target>
@ -60,10 +61,6 @@
      <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
    </SearchPaths>
    <Linking>
-      <Debugging>
-        <GenerateDebugInfo Value="True"/>
-        <DebugInfoType Value="dsAuto"/>
-      </Debugging>
      <Options>
        <Win32>
          <GraphicApplication Value="True"/>