Changeset 12 for trunk/Forms/UFormMain.lfm

Timestamp:

Mar 15, 2013, 11:42:38 PM (11 years ago)

Author:

chronos

Message:

• Přidáno: Podpora pro více účtů.

File:

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

trunk/Forms/UFormMain.lfm

@@ -22 +22 @@
   end
   object GroupBox1: TGroupBox
-    Left = 8
+    Left = 16
     Height = 57
-    Top = 8
+    Top = 120
     Width = 498
     Anchors = [akTop, akLeft, akRight]
@@ -42 +42 @@
   end
   object GroupBox2: TGroupBox
-    Left = 8
+    Left = 17
     Height = 72
-    Top = 80
+    Top = 184
     Width = 498
     Anchors = [akTop, akLeft, akRight]
@@ -108 +108 @@
   end
   object GroupBox3: TGroupBox
-    Left = 8
+    Left = 16
     Height = 65
-    Top = 168
+    Top = 280
     Width = 499
     Anchors = [akTop, akLeft, akRight]
@@ -181 +181 @@
     TabOrder = 5
   end
+  object Label5: TLabel
+    Left = 16
+    Height = 17
+    Top = 12
+    Width = 56
+    Caption = 'Account:'
+    ParentColor = False
+  end
+  object ComboBoxAccounts: TComboBox
+    Left = 96
+    Height = 29
+    Top = 8
+    Width = 312
+    Anchors = [akTop, akLeft, akRight]
+    ItemHeight = 0
+    OnChange = ComboBoxAccountsChange
+    Style = csDropDownList
+    TabOrder = 6
+  end
+  object ButtonNew1: TButton
+    Left = 416
+    Height = 25
+    Top = 8
+    Width = 88
+    Anchors = [akTop, akRight]
+    Caption = 'Edit'
+    OnClick = ButtonNew1Click
+    TabOrder = 7
+  end
+  object GroupBox4: TGroupBox
+    Left = 16
+    Height = 65
+    Top = 48
+    Width = 498
+    Anchors = [akTop, akLeft, akRight]
+    Caption = 'Account state'
+    ClientHeight = 46
+    ClientWidth = 494
+    TabOrder = 8
+    object Label6: TLabel
+      Left = 14
+      Height = 17
+      Top = 7
+      Width = 56
+      Caption = 'Balance:'
+      ParentColor = False
+    end
+    object LabelBalance: TLabel
+      Left = 110
+      Height = 17
+      Top = 7
+      Width = 12
+      Caption = '   '
+      ParentColor = False
+    end
+  end
 end