Просмотр исходного кода

fixed groupbox alignment issues in wizards.

Ugochukwu Mmaduekwe 7 лет назад
Родитель
Сommit
c0ae46d86c

+ 0 - 1
src/gui/wizards/operations/UWIZChangeKey_Confirmation.lfm

@@ -6,7 +6,6 @@ object WIZChangeKey_Confirmation: TWIZChangeKey_Confirmation
   Caption = 'WIZChangeKey_Confirmation'
   ClientHeight = 320
   ClientWidth = 511
-  LCLVersion = '1.8.2.0'
   Visible = False
   object GroupBox1: TGroupBox
     Left = 10

+ 1 - 0
src/gui/wizards/operations/UWIZChangeKey_EnterKey.lfm

@@ -14,6 +14,7 @@ object WIZChangeKey_EnterKey: TWIZChangeKey_EnterKey
     Height = 232
     Top = 8
     Width = 400
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'New Public Key'
     ClientHeight = 212
     ClientWidth = 396

+ 1 - 0
src/gui/wizards/operations/UWIZChangeKey_SelectKey.lfm

@@ -14,6 +14,7 @@ object WIZChangeKey_SelectKey: TWIZChangeKey_SelectKey
     Height = 232
     Top = 8
     Width = 400
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'New Private Key'
     ClientHeight = 212
     ClientWidth = 396

+ 1 - 0
src/gui/wizards/operations/UWIZChangeKey_SelectOption.lfm

@@ -14,6 +14,7 @@ object WIZChangeKey_SelectOption: TWIZChangeKey_SelectOption
     Height = 245
     Top = 2
     Width = 410
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Change Key Options'
     ClientHeight = 225
     ClientWidth = 406

+ 33 - 17
src/gui/wizards/operations/UWIZEnlistAccountForSale_Confirmation.lfm

@@ -1,28 +1,27 @@
 object WIZEnlistAccountForSale_Confirmation: TWIZEnlistAccountForSale_Confirmation
   Left = 0
-  Height = 253
+  Height = 320
   Top = 0
-  Width = 429
+  Width = 511
   Caption = 'WIZEnlistAccountForSale_Confirmation'
-  ClientHeight = 253
-  ClientWidth = 429
-  LCLVersion = '1.8.2.0'
+  ClientHeight = 320
+  ClientWidth = 511
   Visible = False
   object GroupBox1: TGroupBox
     Left = 10
-    Height = 232
+    Height = 299
     Top = 8
-    Width = 408
+    Width = 490
     Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Confirm Account Sale Transaction'
-    ClientHeight = 212
-    ClientWidth = 404
+    ClientHeight = 279
+    ClientWidth = 486
     TabOrder = 0
     object paGrid: TPanel
       Left = 8
-      Height = 152
+      Height = 123
       Top = 48
-      Width = 382
+      Width = 464
       Anchors = [akTop, akLeft, akRight, akBottom]
       BevelOuter = bvNone
       Caption = 'GRID PANEL'
@@ -31,7 +30,7 @@ object WIZEnlistAccountForSale_Confirmation: TWIZEnlistAccountForSale_Confirmati
     object Label1: TLabel
       Left = 8
       Height = 15
-      Top = 16
+      Top = 2
       Width = 84
       Caption = 'Signer Account:'
       ParentColor = False
@@ -39,26 +38,43 @@ object WIZEnlistAccountForSale_Confirmation: TWIZEnlistAccountForSale_Confirmati
     object lblSgnAcc: TLabel
       Left = 112
       Height = 15
-      Top = 16
+      Top = 2
       Width = 53
       Caption = 'lblSgnAcc'
       ParentColor = False
     end
     object Label2: TLabel
-      Left = 208
+      Left = 8
       Height = 15
-      Top = 16
+      Top = 24
       Width = 79
       Caption = 'Seller Account:'
       ParentColor = False
     end
     object lblSellerAcc: TLabel
-      Left = 304
+      Left = 112
       Height = 15
-      Top = 16
+      Top = 24
       Width = 61
       Caption = 'lblSellerAcc'
       ParentColor = False
     end
+    object lblPayload: TLabel
+      Left = 8
+      Height = 15
+      Top = 172
+      Width = 42
+      Caption = 'Payload'
+      ParentColor = False
+    end
+    object mmoPayload: TMemo
+      Left = 8
+      Height = 82
+      Top = 192
+      Width = 464
+      Enabled = False
+      ScrollBars = ssBoth
+      TabOrder = 1
+    end
   end
 end

+ 3 - 1
src/gui/wizards/operations/UWIZEnlistAccountForSale_Confirmation.pas

@@ -23,8 +23,10 @@ type
     GroupBox1: TGroupBox;
     Label1: TLabel;
     Label2: TLabel;
+    lblPayload: TLabel;
     lblSgnAcc: TLabel;
     lblSellerAcc: TLabel;
+    mmoPayload: TMemo;
     paGrid: TPanel;
   private
     FEnlistAccountsGrid : TVisualGrid;
@@ -106,7 +108,7 @@ begin
    paGrid.AddControlDockCenter(FEnlistAccountsGrid);
    lblSgnAcc.Caption := TAccountComp.AccountNumberToAccountTxtNumber(Model.Signer.SignerAccount.account);
    lblSellerAcc.Caption := TAccountComp.AccountNumberToAccountTxtNumber(Model.EnlistAccountForSale.SellerAccount.account);
-
+   mmoPayload.Lines.Text := Model.Payload.Content;
 end;
 
 procedure TWIZEnlistAccountForSale_Confirmation.OnNext;

+ 2 - 0
src/gui/wizards/operations/UWIZEnlistAccountForSale_EnterLockingBlock.lfm

@@ -7,12 +7,14 @@ object WIZEnlistAccountForSale_EnterLockingBlock: TWIZEnlistAccountForSale_Enter
   Caption = 'WIZEnlistAccountForSale_EnterLockingBlock'
   ClientHeight = 253
   ClientWidth = 429
+  LCLVersion = '1.8.2.0'
   Visible = False
   object gbLockBlock: TGroupBox
     Left = 16
     Height = 232
     Top = 8
     Width = 400
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Enter Locking Block'
     ClientHeight = 212
     ClientWidth = 396

+ 2 - 0
src/gui/wizards/operations/UWIZEnlistAccountForSale_EnterPublicKey.lfm

@@ -7,12 +7,14 @@ object WIZEnlistAccountForSale_EnterPublicKey: TWIZEnlistAccountForSale_EnterPub
   Caption = 'WIZEnlistAccountForSale_EnterPublicKey'
   ClientHeight = 253
   ClientWidth = 429
+  LCLVersion = '1.8.2.0'
   Visible = False
   object gbTransaction: TGroupBox
     Left = 16
     Height = 232
     Top = 8
     Width = 400
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Enter Public Key'
     ClientHeight = 212
     ClientWidth = 396

+ 1 - 0
src/gui/wizards/operations/UWIZEnlistAccountForSale_EnterSaleAmount.lfm

@@ -13,6 +13,7 @@ object WIZEnlistAccountForSale_EnterSaleAmount: TWIZEnlistAccountForSale_EnterSa
     Height = 232
     Top = 8
     Width = 400
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Sale Amount'
     ClientHeight = 212
     ClientWidth = 396

+ 1 - 0
src/gui/wizards/operations/UWIZEnlistAccountForSale_EnterSeller.lfm

@@ -13,6 +13,7 @@ object WIZEnlistAccountForSale_EnterSeller: TWIZEnlistAccountForSale_EnterSeller
     Height = 232
     Top = 8
     Width = 398
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Seller Account'
     ClientHeight = 212
     ClientWidth = 394

+ 1 - 1
src/gui/wizards/operations/UWIZOperationFee_Custom.lfm

@@ -7,13 +7,13 @@ object WIZOperationFee_Custom: TWIZOperationFee_Custom
   Caption = 'WIZOperationFee_Custom'
   ClientHeight = 253
   ClientWidth = 429
-  LCLVersion = '1.8.2.0'
   Visible = False
   object gbTransactionFee: TGroupBox
     Left = 14
     Height = 232
     Top = 8
     Width = 400
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Operation Fee'
     ClientHeight = 212
     ClientWidth = 396

+ 1 - 0
src/gui/wizards/operations/UWIZOperationSigner_Select.lfm

@@ -13,6 +13,7 @@ object WIZOperationSigner_Select: TWIZOperationSigner_Select
     Height = 232
     Top = 8
     Width = 400
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Fee Payer'
     ClientHeight = 212
     ClientWidth = 396

+ 0 - 1
src/gui/wizards/operations/UWIZSendPASC_Confirmation.lfm

@@ -6,7 +6,6 @@ object WIZSendPASC_Confirmation: TWIZSendPASC_Confirmation
   Caption = 'WIZSendPASC_Confirmation'
   ClientHeight = 320
   ClientWidth = 511
-  LCLVersion = '1.8.2.0'
   Visible = False
   object GroupBox1: TGroupBox
     Left = 10

+ 1 - 0
src/gui/wizards/operations/UWIZSendPASC_EnterQuantity.lfm

@@ -14,6 +14,7 @@ object WIZSendPASC_EnterQuantity: TWIZSendPASC_EnterQuantity
     Height = 232
     Top = 8
     Width = 400
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Transaction Quantity'
     ClientHeight = 212
     ClientWidth = 396

+ 1 - 0
src/gui/wizards/operations/UWIZSendPASC_EnterRecipient.lfm

@@ -14,6 +14,7 @@ object WIZSendPASC_EnterRecipient: TWIZSendPASC_EnterRecipient
     Height = 232
     Top = 8
     Width = 398
+    Anchors = [akTop, akLeft, akRight, akBottom]
     Caption = 'Destination Account'
     ClientHeight = 212
     ClientWidth = 394