Changeset 22 for trunk/Forms/UFormMain.lfm

Timestamp:

Mar 25, 2013, 11:47:38 PM (11 years ago)

Author:

chronos

Message:

• Upraveno: Příprava pro zobrazování seznamu operací.

File:

• trunk/Forms/UFormMain.lfm (modified) (19 diffs)

trunk/Forms/UFormMain.lfm

@@ -28 +28 @@
     Anchors = [akLeft, akRight, akBottom]
     Caption = 'New transaction from last check'
-    ClientHeight = 38
+    ClientHeight = 39
     ClientWidth = 577
     TabOrder = 1
@@ -42 +42 @@
     object Label7: TLabel
       Left = 6
-      Height = 17
-      Top = 12
-      Width = 47
+      Height = 13
+      Top = 12
+      Width = 35
       Caption = 'Last id:'
       ParentColor = False
@@ -50 +50 @@
     object SpinEditLastId: TSpinEdit
       Left = 70
-      Height = 27
+      Height = 21
       Top = 7
       Width = 96
@@ -64 +64 @@
     Anchors = [akLeft, akRight, akBottom]
     Caption = 'Transactions from defined time interval'
-    ClientHeight = 53
+    ClientHeight = 54
     ClientWidth = 577
     TabOrder = 2
@@ -78 +78 @@
     object DateEditStart: TDateEdit
       Left = 54
-      Height = 27
+      Height = 21
       Top = 7
       Width = 80
@@ -94 +94 @@
     object DateEditTo: TDateEdit
       Left = 238
-      Height = 27
+      Height = 21
       Top = 7
       Width = 80
@@ -110 +110 @@
     object Label1: TLabel
       Left = 6
-      Height = 17
-      Top = 12
-      Width = 36
+      Height = 13
+      Top = 12
+      Width = 28
       Caption = 'From:'
       ParentColor = False
@@ -118 +118 @@
     object Label4: TLabel
       Left = 174
-      Height = 17
-      Top = 12
-      Width = 18
+      Height = 13
+      Top = 12
+      Width = 16
       Caption = 'To:'
       ParentColor = False
@@ -132 +132 @@
     Anchors = [akLeft, akRight, akBottom]
     Caption = 'Selected mothly report'
-    ClientHeight = 46
+    ClientHeight = 47
     ClientWidth = 578
     TabOrder = 3
@@ -146 +146 @@
     object SpinEditYear: TSpinEdit
       Left = 54
-      Height = 27
+      Height = 21
       Top = 7
       Width = 96
@@ -156 +156 @@
     object SpinEditId: TSpinEdit
       Left = 238
-      Height = 27
+      Height = 21
       Top = 7
       Width = 96
@@ -166 +166 @@
     object Label2: TLabel
       Left = 6
-      Height = 17
-      Top = 12
-      Width = 31
+      Height = 13
+      Top = 12
+      Width = 26
       Caption = 'Year:'
       ParentColor = False
@@ -174 +174 @@
     object Label3: TLabel
       Left = 174
-      Height = 17
-      Top = 12
-      Width = 56
+      Height = 13
+      Top = 12
+      Width = 41
       Caption = 'Number:'
       ParentColor = False
@@ -201 +201 @@
   object Label5: TLabel
     Left = 16
-    Height = 17
+    Height = 13
     Top = 12
-    Width = 56
+    Width = 43
     Caption = 'Account:'
     ParentColor = False
@@ -209 +209 @@
   object ComboBoxAccounts: TComboBox
     Left = 96
-    Height = 29
+    Height = 21
     Top = 8
     Width = 395
     Anchors = [akTop, akLeft, akRight]
-    ItemHeight = 0
+    ItemHeight = 13
     OnChange = ComboBoxAccountsChange
     Style = csDropDownList
@@ -235 +235 @@
     Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Account state'
-    ClientHeight = 178
+    ClientHeight = 179
     ClientWidth = 577
     TabOrder = 8
     object Label6: TLabel
       Left = 14
-      Height = 17
-      Top = 7
-      Width = 56
+      Height = 13
+      Top = 7
+      Width = 41
       Caption = 'Balance:'
       ParentColor = False
@@ -248 +248 @@
     object LabelBalance: TLabel
       Left = 110
-      Height = 17
-      Top = 7
-      Width = 12
+      Height = 13
+      Top = 7
+      Width = 9
       Caption = '   '
       ParentColor = False
@@ -263 +263 @@
       TabOrder = 0
     end
-    object ListView1: TListView
+    object ListViewOperation: TListView
       Left = 6
-      Height = 144
-      Top = 31
+      Height = 145
+      Top = 32
       Width = 561
       Anchors = [akTop, akLeft, akRight, akBottom]
@@ -296 +296 @@
           Width = 134
         end>
+      OwnerData = True
+      ReadOnly = True
+      RowSelect = True
       TabOrder = 1
       ViewStyle = vsReport
+      OnData = ListViewOperationData
     end
   end