Browse Source

GUI: cosmetic defect with New Operation dialog

Herman Schoenfeld 6 years ago
parent
commit
23c34ae7ce
1 changed files with 7 additions and 1 deletions
  1. 7 1
      src/gui-classic/UFRMOperation.pas

+ 7 - 1
src/gui-classic/UFRMOperation.pas

@@ -1289,7 +1289,10 @@ begin
       lblNewKey.Visible := true;
       lblNewKey.Visible := true;
       ebNewKey.Visible := true;
       ebNewKey.Visible := true;
       lblTimeLock.Visible := true;
       lblTimeLock.Visible := true;
+      lblTimeLock.Enabled := true;
       ebTimeLock.Visible := true;
       ebTimeLock.Visible := true;
+      ebTimeLock.Enabled := true;
+      sbTimeLock.Visible := true;
       sbTimeLock.Enabled := true;
       sbTimeLock.Enabled := true;
       lblHashLock.Visible := true;
       lblHashLock.Visible := true;
       ebHashLock.Visible := true;
       ebHashLock.Visible := true;
@@ -1305,9 +1308,10 @@ begin
         lblNewKey.Enabled := true;
         lblNewKey.Enabled := true;
         ebNewKey.Visible := true;
         ebNewKey.Visible := true;
         ebNewKey.Enabled := true;
         ebNewKey.Enabled := true;
+        lblPrice.Visible := false;
         lblPrice.Enabled := false;
         lblPrice.Enabled := false;
         ebPrice.Enabled := false;
         ebPrice.Enabled := false;
-        ebPrice.Text := 'ALL BALANCE';
+        ebPrice.Visible := false;
       end else if rbListAccountForCoinSwap.Checked then begin
       end else if rbListAccountForCoinSwap.Checked then begin
         lblSeller.Visible := true;
         lblSeller.Visible := true;
         lblSeller.Caption := 'Counterparty Account';
         lblSeller.Caption := 'Counterparty Account';
@@ -1315,8 +1319,10 @@ begin
         sbSearchListerSellerAccount.Visible := true;
         sbSearchListerSellerAccount.Visible := true;
         lblNewKey.Visible := false;
         lblNewKey.Visible := false;
         ebNewKey.Visible := false;
         ebNewKey.Visible := false;
+        lblPrice.Visible := true;
         lblPrice.Caption := 'Swap Amount';
         lblPrice.Caption := 'Swap Amount';
         lblPrice.Enabled := true;
         lblPrice.Enabled := true;
+        ebPrice.Visible := true;
         ebPrice.Enabled := true;
         ebPrice.Enabled := true;
       end;
       end;