Browse Source

Standardize copyright messages

Herman Schoenfeld 7 years ago
parent
commit
7ae94ba6c1
100 changed files with 830 additions and 455 deletions
  1. 7 5
      src/core.utils/UCoreObjects.pas
  2. 9 5
      src/core.utils/UCoreUtils.pas
  3. 13 0
      src/core.utils/UDataSources.pas
  4. 11 9
      src/core/UAES.pas
  5. 11 8
      src/core/UAccounts.pas
  6. 11 8
      src/core/UBaseTypes.pas
  7. 11 8
      src/core/UBlockChain.pas
  8. 11 8
      src/core/UChunk.pas
  9. 11 8
      src/core/UConst.pas
  10. 11 8
      src/core/UCrypto.pas
  11. 11 9
      src/core/UECIES.pas
  12. 11 8
      src/core/UFileStorage.pas
  13. 10 7
      src/core/UGPUMining.pas
  14. 11 8
      src/core/ULog.pas
  15. 11 8
      src/core/UNetProtocol.pas
  16. 13 9
      src/core/UNode.pas
  17. 11 8
      src/core/UOpTransaction.pas
  18. 11 9
      src/core/UOpenSSL.pas
  19. 11 9
      src/core/UOpenSSLdef.pas
  20. 9 6
      src/core/UPoolMinerThreads.pas
  21. 11 8
      src/core/UPoolMining.pas
  22. 11 8
      src/core/URPC.pas
  23. 10 4
      src/core/URandomHash.pas
  24. 13 0
      src/core/UServerApp.pas
  25. 12 6
      src/core/USettings.pas
  26. 12 0
      src/core/USha256.pas
  27. 7 4
      src/core/UTCPIP.pas
  28. 11 8
      src/core/UThread.pas
  29. 11 8
      src/core/UTime.pas
  30. 12 9
      src/core/UTxMultiOperation.pas
  31. 11 8
      src/core/UWallet.pas
  32. 9 6
      src/core/upcdaemon.pas
  33. 2 1
      src/gui-classic/UFRMAbout.lfm
  34. 11 8
      src/gui-classic/UFRMAbout.pas
  35. 1 1
      src/gui-classic/UFRMAccountSelect.lfm
  36. 11 8
      src/gui-classic/UFRMAccountSelect.pas
  37. 1 1
      src/gui-classic/UFRMNewPrivateKeyType.lfm
  38. 11 8
      src/gui-classic/UFRMNewPrivateKeyType.pas
  39. 1 1
      src/gui-classic/UFRMNodesIp.lfm
  40. 16 0
      src/gui-classic/UFRMNodesIp.pas
  41. 1 1
      src/gui-classic/UFRMOperation.lfm
  42. 11 8
      src/gui-classic/UFRMOperation.pas
  43. 1 1
      src/gui-classic/UFRMPascalCoinWalletConfig.lfm
  44. 11 8
      src/gui-classic/UFRMPascalCoinWalletConfig.pas
  45. 2 1
      src/gui-classic/UFRMPayloadDecoder.lfm
  46. 11 8
      src/gui-classic/UFRMPayloadDecoder.pas
  47. 14 13
      src/gui-classic/UFRMWallet.lfm
  48. 11 8
      src/gui-classic/UFRMWallet.pas
  49. 2 1
      src/gui-classic/UFRMWalletKeys.lfm
  50. 11 8
      src/gui-classic/UFRMWalletKeys.pas
  51. 11 8
      src/gui-classic/UGridUtils.pas
  52. 1 0
      src/gui/UCTRLBanner.lfm
  53. 9 5
      src/gui/UCTRLBanner.pas
  54. 1 0
      src/gui/UCTRLNoAccount.lfm
  55. 13 0
      src/gui/UCTRLNoAccount.pas
  56. 1 0
      src/gui/UCTRLSyncronization.lfm
  57. 9 5
      src/gui/UCTRLSyncronization.pas
  58. 1 1
      src/gui/UCTRLWallet.lfm
  59. 10 6
      src/gui/UCTRLWallet.pas
  60. 9 2
      src/gui/UCellRenderers.pas
  61. 1 0
      src/gui/UFRMAbout.lfm
  62. 9 6
      src/gui/UFRMAbout.pas
  63. 9 8
      src/gui/UFRMAccountExplorer.lfm
  64. 10 3
      src/gui/UFRMAccountExplorer.pas
  65. 24 24
      src/gui/UFRMAccountInfo.lfm
  66. 13 0
      src/gui/UFRMAccountInfo.pas
  67. 1 0
      src/gui/UFRMAccountSelect.lfm
  68. 9 6
      src/gui/UFRMAccountSelect.pas
  69. 2 1
      src/gui/UFRMBlockExplorer.lfm
  70. 11 5
      src/gui/UFRMBlockExplorer.pas
  71. 1 1
      src/gui/UFRMExecuteOperations.lfm
  72. 13 5
      src/gui/UFRMExecuteOperations.pas
  73. 2 1
      src/gui/UFRMLogs.lfm
  74. 10 3
      src/gui/UFRMLogs.pas
  75. 5 4
      src/gui/UFRMMainForm.lfm
  76. 10 3
      src/gui/UFRMMainForm.pas
  77. 2 1
      src/gui/UFRMMemoText.lfm
  78. 13 0
      src/gui/UFRMMemoText.pas
  79. 3 2
      src/gui/UFRMMessages.lfm
  80. 10 3
      src/gui/UFRMMessages.pas
  81. 2 1
      src/gui/UFRMNodes.lfm
  82. 10 3
      src/gui/UFRMNodes.pas
  83. 1 1
      src/gui/UFRMNodesIp.lfm
  84. 16 0
      src/gui/UFRMNodesIp.pas
  85. 2 1
      src/gui/UFRMOperation.lfm
  86. 9 6
      src/gui/UFRMOperation.pas
  87. 2 1
      src/gui/UFRMOperationExplorer.lfm
  88. 9 3
      src/gui/UFRMOperationExplorer.pas
  89. 2 1
      src/gui/UFRMPascalCoinWalletConfig.lfm
  90. 9 6
      src/gui/UFRMPascalCoinWalletConfig.pas
  91. 1 1
      src/gui/UFRMPayloadDecoder.lfm
  92. 9 6
      src/gui/UFRMPayloadDecoder.pas
  93. 2 1
      src/gui/UFRMPendingOperations.lfm
  94. 9 3
      src/gui/UFRMPendingOperations.pas
  95. 15 2
      src/gui/UFRMSaleAccounts.pas
  96. 1 1
      src/gui/UFRMWalletKeys.lfm
  97. 10 3
      src/gui/UFRMWalletKeys.pas
  98. 10 3
      src/gui/UUserInterface.pas
  99. 1 1
      src/gui/wizards/operations/UWIZChangeKey_EnterKey.lfm
  100. 13 6
      src/gui/wizards/operations/UWIZChangeKey_EnterKey.pas

+ 7 - 5
src/core.utils/UCoreObjects.pas

@@ -1,14 +1,16 @@
 unit UCoreObjects;
 unit UCoreObjects;
 
 
-{ Copyright (c) 2018 by PascalCoin Project
-
-  Contains common types for Core module.
+{ Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  Acknowledgements:
-    Herman Schoenfeld <[email protected]>: unit creator
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
 {$mode delphi}
 {$mode delphi}

+ 9 - 5
src/core.utils/UCoreUtils.pas

@@ -1,15 +1,19 @@
 unit UCoreUtils;
 unit UCoreUtils;
 
 
-{ Copyright (c) 2018 by PascalCoin Project
-
-  Contains common types for Core module.
+{ Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-    Herman Schoenfeld <[email protected]>: unit creator
-    Ugochukwu Mmaduekwe - added TOperationsManager class
+  - Ugochukwu Mmaduekwe - added TOperationsManager class
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
 {$mode delphi}
 {$mode delphi}

+ 13 - 0
src/core.utils/UDataSources.pas

@@ -1,5 +1,18 @@
 unit UDataSources;
 unit UDataSources;
 
 
+{ Copyright (c) 2018 by Herman Schoenfeld
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
 {$mode delphi}
 {$mode delphi}
 {$modeswitch nestedprocvars}
 {$modeswitch nestedprocvars}
 
 

+ 11 - 9
src/core/UAES.pas

@@ -1,21 +1,20 @@
 unit UAES;
 unit UAES;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
 
 
 { This unit is used to encrypt/decrypt using AES256
 { This unit is used to encrypt/decrypt using AES256
   Basic source code found at internet:
   Basic source code found at internet:
@@ -23,8 +22,11 @@ unit UAES;
 
 
   Original source code probably copyright of Marco Ferrante ([email protected]) and "shunty" user:
   Original source code probably copyright of Marco Ferrante ([email protected]) and "shunty" user:
   http://stackoverflow.com/users/197962/shunty
   http://stackoverflow.com/users/197962/shunty
+}
 
 
-  }
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 {$I config.inc}
 {$I config.inc}
 interface
 interface

+ 11 - 8
src/core/UAccounts.pas

@@ -1,21 +1,24 @@
 unit UAccounts;
 unit UAccounts;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UBaseTypes.pas

@@ -1,21 +1,24 @@
 unit UBaseTypes;
 unit UBaseTypes;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2017 by Albert Molina
 { Copyright (c) 2017 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UBlockChain.pas

@@ -1,21 +1,24 @@
 unit UBlockChain;
 unit UBlockChain;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UChunk.pas

@@ -1,21 +1,24 @@
 unit UChunk;
 unit UChunk;
 
 
-{$IFDEF FPC}
-  {$mode delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$mode delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UConst.pas

@@ -1,21 +1,24 @@
 unit UConst;
 unit UConst;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UCrypto.pas

@@ -1,21 +1,24 @@
 unit UCrypto;
 unit UCrypto;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 {$I config.inc}
 {$I config.inc}
 
 

+ 11 - 9
src/core/UECIES.pas

@@ -1,21 +1,20 @@
 unit UECIES;
 unit UECIES;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
 
 
 { Pascal implementation of ECIES functions to encrypt/decrypt data using AES
 { Pascal implementation of ECIES functions to encrypt/decrypt data using AES
   and EC keys.
   and EC keys.
@@ -34,8 +33,11 @@ unit UECIES;
   to use strong anti-corruption in encrypted data because I will include it
   to use strong anti-corruption in encrypted data because I will include it
   in a blockchain, so corruption is not possible. (for now ;-). Using MD5 safe space
   in a blockchain, so corruption is not possible. (for now ;-). Using MD5 safe space
   for me.
   for me.
+}
 
 
-  }
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 {$I config.inc}
 {$I config.inc}
 
 

+ 11 - 8
src/core/UFileStorage.pas

@@ -1,21 +1,24 @@
 unit UFileStorage;
 unit UFileStorage;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 10 - 7
src/core/UGPUMining.pas

@@ -1,19 +1,22 @@
 unit UGPUMining;
 unit UGPUMining;
 
 
-{$mode delphi}
-
-{ Copyright (c) 2017 by Albert Molina
+{ Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode delphi}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/ULog.pas

@@ -1,21 +1,24 @@
 unit ULog;
 unit ULog;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UNetProtocol.pas

@@ -1,21 +1,24 @@
 unit UNetProtocol;
 unit UNetProtocol;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 13 - 9
src/core/UNode.pas

@@ -1,21 +1,20 @@
 unit UNode;
 unit UNode;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
 
 
 { UNode contains the basic structure to operate
 { UNode contains the basic structure to operate
   - An app can only contains 1 node.
   - An app can only contains 1 node.
@@ -25,7 +24,12 @@ unit UNode;
     - 1 Operations (Operations has actual BlockChain with Operations and SafeBankTransaction to operate with the Bank)
     - 1 Operations (Operations has actual BlockChain with Operations and SafeBankTransaction to operate with the Bank)
     - 0..x NetClients
     - 0..x NetClients
     - 0..x Miners
     - 0..x Miners
-    }
+ }
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
+
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UOpTransaction.pas

@@ -1,21 +1,24 @@
 unit UOpTransaction;
 unit UOpTransaction;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 9
src/core/UOpenSSL.pas

@@ -5,18 +5,20 @@ unit UOpenSSL;
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
-  16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
+  Acknowledgements
+  - Portions of this unit contains code from
+    https://github.com/Arvur/OpenSSL-Delphi (unspecified license, public code)
 
 
-  ********************
-  Note:
-  Part of this unit contains some code of https://github.com/Arvur/OpenSSL-Delphi
-  Unknown license but public
+  If you like it, consider a donation using Bitcoin:
+  16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
 
 
 interface
 interface
 
 

+ 11 - 9
src/core/UOpenSSLdef.pas

@@ -5,18 +5,20 @@ unit UOpenSSLdef;
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
-  16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
+  Acknowledgements
+  - Portions of this unit contains code from
+    https://github.com/Arvur/OpenSSL-Delphi (unspecified license, public code)
 
 
-  ********************
-  Note:
-  This unit contains code obtained from https://github.com/Arvur/OpenSSL-Delphi
-  Unknown license but public
+  If you like it, consider a donation using Bitcoin:
+  16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
 
 
 interface
 interface
 
 

+ 9 - 6
src/core/UPoolMinerThreads.pas

@@ -1,19 +1,22 @@
 unit UPoolMinerThreads;
 unit UPoolMinerThreads;
 
 
-{$mode delphi}
-
 { Copyright (c) 2017 by Albert Molina
 { Copyright (c) 2017 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode delphi}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UPoolMining.pas

@@ -1,21 +1,24 @@
 unit UPoolMining;
 unit UPoolMining;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/URPC.pas

@@ -1,21 +1,24 @@
 unit URPC;
 unit URPC;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 10 - 4
src/core/URandomHash.pas

@@ -1,13 +1,19 @@
-{
-  Copyright (c) Herman Schoenfeld 2018
+unit URandomHash;
+
+{ Copyright (c) 2018 by Herman Schoenfeld
 
 
   RandomHash reference implementation (PIP-0009).
   RandomHash reference implementation (PIP-0009).
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
-}
 
 
-unit URandomHash;
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
 
 
 {%region Compiler Directives}
 {%region Compiler Directives}
 {$IFDEF FPC}
 {$IFDEF FPC}

+ 13 - 0
src/core/UServerApp.pas

@@ -1,5 +1,18 @@
 unit UServerApp;
 unit UServerApp;
 
 
+{ Copyright (c) 2016 by PacalCoin Developers
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
 {$IFDEF FPC}
 {$IFDEF FPC}
   {$MODE Delphi}
   {$MODE Delphi}
 {$ENDIF}
 {$ENDIF}

+ 12 - 6
src/core/USettings.pas

@@ -1,19 +1,25 @@
 unit USettings;
 unit USettings;
 
 
-{$IFDEF FPC}
-  {$mode delphi}
-{$ENDIF}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements
   Acknowledgements
-      Herman Schoenfeld ([email protected]) - main author
-      Albert Molina - original
+  - Albert Molina: this unit just wraps PascalCoin settings designed by Albert
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$IFDEF FPC}
+  {$mode delphi}
+{$ENDIF}
+
 {$I config.inc}
 {$I config.inc}
 
 
 interface
 interface

+ 12 - 0
src/core/USha256.pas

@@ -1,5 +1,17 @@
 unit USha256;
 unit USha256;
 
 
+{ Copyright (c) 2016 by PacalCoin Developers
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
 
 
 {$IFDEF FPC}
 {$IFDEF FPC}
   {$MODE delphi}
   {$MODE delphi}

+ 7 - 4
src/core/UTCPIP.pas

@@ -5,13 +5,16 @@ unit UTCPIP;
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UThread.pas

@@ -1,21 +1,24 @@
 unit UThread;
 unit UThread;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UTime.pas

@@ -1,21 +1,24 @@
 unit UTime;
 unit UTime;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 12 - 9
src/core/UTxMultiOperation.pas

@@ -1,21 +1,24 @@
 unit UTxMultiOperation;
 unit UTxMultiOperation;
 
 
-{$IFDEF FPC}
-  {$mode delphi}
-{$ENDIF}
-
-{ Copyright (c) 2018 by Albert Molina - PascalCoin developers
+{ Copyright (c) 2018 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$mode delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/core/UWallet.pas

@@ -1,21 +1,24 @@
 unit UWallet;
 unit UWallet;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 9 - 6
src/core/upcdaemon.pas

@@ -1,19 +1,22 @@
 unit upcdaemon;
 unit upcdaemon;
 
 
-{$mode objfpc}{$H+}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode objfpc}{$H+}
 
 
 interface
 interface
 
 

+ 2 - 1
src/gui-classic/UFRMAbout.lfm

@@ -15,7 +15,8 @@ object FRMAbout: TFRMAbout
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object Image1: TImage
   object Image1: TImage
     Left = 15
     Left = 15
     Height = 60
     Height = 60

+ 11 - 8
src/gui-classic/UFRMAbout.pas

@@ -1,21 +1,24 @@
 unit UFRMAbout;
 unit UFRMAbout;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 1 - 1
src/gui-classic/UFRMAccountSelect.lfm

@@ -14,7 +14,7 @@ object FRMAccountSelect: TFRMAccountSelect
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object pnlAccountsTop: TPanel
   object pnlAccountsTop: TPanel
     Left = 395
     Left = 395

+ 11 - 8
src/gui-classic/UFRMAccountSelect.pas

@@ -1,21 +1,24 @@
 unit UFRMAccountSelect;
 unit UFRMAccountSelect;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 1 - 1
src/gui-classic/UFRMNewPrivateKeyType.lfm

@@ -15,7 +15,7 @@ object FRMNewPrivateKeyType: TFRMNewPrivateKeyType
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object Label1: TLabel
   object Label1: TLabel
     Left = 30
     Left = 30

+ 11 - 8
src/gui-classic/UFRMNewPrivateKeyType.pas

@@ -1,21 +1,24 @@
 unit UFRMNewPrivateKeyType;
 unit UFRMNewPrivateKeyType;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 1 - 1
src/gui-classic/UFRMNodesIp.lfm

@@ -14,7 +14,7 @@ object FRMNodesIp: TFRMNodesIp
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object Label1: TLabel
   object Label1: TLabel
     Left = 30
     Left = 30

+ 16 - 0
src/gui-classic/UFRMNodesIp.pas

@@ -1,5 +1,21 @@
 unit UFRMNodesIp;
 unit UFRMNodesIp;
 
 
+{ Copyright (c) 2016 by Albert Molina
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  If you like it, consider a donation using Bitcoin:
+  16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
 {$IFDEF FPC}
 {$IFDEF FPC}
   {$MODE Delphi}
   {$MODE Delphi}
 {$ENDIF}
 {$ENDIF}

+ 1 - 1
src/gui-classic/UFRMOperation.lfm

@@ -15,7 +15,7 @@ object FRMOperation: TFRMOperation
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object lblAccountCaption: TLabel
   object lblAccountCaption: TLabel
     Left = 25
     Left = 25

+ 11 - 8
src/gui-classic/UFRMOperation.pas

@@ -1,21 +1,24 @@
 unit UFRMOperation;
 unit UFRMOperation;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 1 - 1
src/gui-classic/UFRMPascalCoinWalletConfig.lfm

@@ -14,7 +14,7 @@ object FRMPascalCoinWalletConfig: TFRMPascalCoinWalletConfig
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object Label1: TLabel
   object Label1: TLabel
     Left = 30
     Left = 30

+ 11 - 8
src/gui-classic/UFRMPascalCoinWalletConfig.pas

@@ -1,21 +1,24 @@
 unit UFRMPascalCoinWalletConfig;
 unit UFRMPascalCoinWalletConfig;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 2 - 1
src/gui-classic/UFRMPayloadDecoder.lfm

@@ -15,7 +15,8 @@ object FRMPayloadDecoder: TFRMPayloadDecoder
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object Label1: TLabel
   object Label1: TLabel
     Left = 20
     Left = 20
     Height = 13
     Height = 13

+ 11 - 8
src/gui-classic/UFRMPayloadDecoder.pas

@@ -1,21 +1,24 @@
 unit UFRMPayloadDecoder;
 unit UFRMPayloadDecoder;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 14 - 13
src/gui-classic/UFRMWallet.lfm

@@ -1,6 +1,6 @@
 object FRMWallet: TFRMWallet
 object FRMWallet: TFRMWallet
   Left = 389
   Left = 389
-  Height = 600
+  Height = 580
   Top = 201
   Top = 201
   Width = 865
   Width = 865
   Caption = 'Pascal Coin Wallet, JSON-RPC Miner & Explorer'
   Caption = 'Pascal Coin Wallet, JSON-RPC Miner & Explorer'
@@ -16,7 +16,8 @@ object FRMWallet: TFRMWallet
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object pnlTop: TPanel
   object pnlTop: TPanel
     Left = 0
     Left = 0
     Height = 91
     Height = 91
@@ -365,7 +366,7 @@ object FRMWallet: TFRMWallet
   object StatusBar: TStatusBar
   object StatusBar: TStatusBar
     Left = 0
     Left = 0
     Height = 23
     Height = 23
-    Top = 557
+    Top = 537
     Width = 865
     Width = 865
     Panels = <    
     Panels = <    
       item
       item
@@ -385,7 +386,7 @@ object FRMWallet: TFRMWallet
   end
   end
   object PageControl: TPageControl
   object PageControl: TPageControl
     Left = 0
     Left = 0
-    Height = 466
+    Height = 446
     Top = 91
     Top = 91
     Width = 865
     Width = 865
     ActivePage = tsMyAccounts
     ActivePage = tsMyAccounts
@@ -395,11 +396,11 @@ object FRMWallet: TFRMWallet
     OnChange = PageControlChange
     OnChange = PageControlChange
     object tsMyAccounts: TTabSheet
     object tsMyAccounts: TTabSheet
       Caption = 'Account Explorer'
       Caption = 'Account Explorer'
-      ClientHeight = 440
+      ClientHeight = 420
       ClientWidth = 857
       ClientWidth = 857
       object Splitter1: TSplitter
       object Splitter1: TSplitter
         Left = 400
         Left = 400
-        Height = 374
+        Height = 354
         Top = 66
         Top = 66
         Width = 5
         Width = 5
       end
       end
@@ -525,17 +526,17 @@ object FRMWallet: TFRMWallet
       end
       end
       object pnlAccounts: TPanel
       object pnlAccounts: TPanel
         Left = 0
         Left = 0
-        Height = 374
+        Height = 354
         Top = 66
         Top = 66
         Width = 400
         Width = 400
         Align = alLeft
         Align = alLeft
         BevelOuter = bvNone
         BevelOuter = bvNone
-        ClientHeight = 374
+        ClientHeight = 354
         ClientWidth = 400
         ClientWidth = 400
         TabOrder = 1
         TabOrder = 1
         object dgAccounts: TDrawGrid
         object dgAccounts: TDrawGrid
           Left = 0
           Left = 0
-          Height = 340
+          Height = 320
           Top = 0
           Top = 0
           Width = 400
           Width = 400
           Align = alClient
           Align = alClient
@@ -549,7 +550,7 @@ object FRMWallet: TFRMWallet
         object pnlAccountsInfo: TPanel
         object pnlAccountsInfo: TPanel
           Left = 0
           Left = 0
           Height = 34
           Height = 34
-          Top = 340
+          Top = 320
           Width = 400
           Width = 400
           Align = alBottom
           Align = alBottom
           BevelOuter = bvNone
           BevelOuter = bvNone
@@ -630,7 +631,7 @@ object FRMWallet: TFRMWallet
       end
       end
       object pcAccountsOptions: TPageControl
       object pcAccountsOptions: TPageControl
         Left = 405
         Left = 405
-        Height = 374
+        Height = 354
         Top = 66
         Top = 66
         Width = 452
         Width = 452
         ActivePage = tsAccountOperations
         ActivePage = tsAccountOperations
@@ -639,11 +640,11 @@ object FRMWallet: TFRMWallet
         TabOrder = 2
         TabOrder = 2
         object tsAccountOperations: TTabSheet
         object tsAccountOperations: TTabSheet
           Caption = 'Operations of selected Account'
           Caption = 'Operations of selected Account'
-          ClientHeight = 348
+          ClientHeight = 328
           ClientWidth = 444
           ClientWidth = 444
           object dgAccountOperations: TDrawGrid
           object dgAccountOperations: TDrawGrid
             Left = 0
             Left = 0
-            Height = 348
+            Height = 328
             Top = 0
             Top = 0
             Width = 444
             Width = 444
             Align = alClient
             Align = alClient

+ 11 - 8
src/gui-classic/UFRMWallet.pas

@@ -1,21 +1,24 @@
 unit UFRMWallet;
 unit UFRMWallet;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 2 - 1
src/gui-classic/UFRMWalletKeys.lfm

@@ -14,7 +14,8 @@ object FRMWalletKeys: TFRMWalletKeys
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object lblEncryptionTypeCaption: TLabel
   object lblEncryptionTypeCaption: TLabel
     Left = 30
     Left = 30
     Height = 13
     Height = 13

+ 11 - 8
src/gui-classic/UFRMWalletKeys.pas

@@ -1,21 +1,24 @@
 unit UFRMWalletKeys;
 unit UFRMWalletKeys;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 11 - 8
src/gui-classic/UGridUtils.pas

@@ -1,21 +1,24 @@
 unit UGridUtils;
 unit UGridUtils;
 
 
-{$IFDEF FPC}
-  {$MODE Delphi}
-{$ENDIF}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
 
 
 interface
 interface
 
 

+ 1 - 0
src/gui/UCTRLBanner.lfm

@@ -12,6 +12,7 @@ object CTRLBanner: TCTRLBanner
   Constraints.MinHeight = 80
   Constraints.MinHeight = 80
   Constraints.MinWidth = 512
   Constraints.MinWidth = 512
   OnCreate = FormCreate
   OnCreate = FormCreate
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object imBackground: TImage
   object imBackground: TImage
     Left = 0
     Left = 0

+ 9 - 5
src/gui/UCTRLBanner.pas

@@ -1,16 +1,20 @@
 unit UCTRLBanner;
 unit UCTRLBanner;
 
 
-{$mode delphi}
-
-{ Copyright (c) 2018 Sphere 10 Software
+{ Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  Acknowledgements:
-  - Herman Schoenfeld: unit creator, implementation
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 1 - 0
src/gui/UCTRLNoAccount.lfm

@@ -8,6 +8,7 @@ object CTRLNoAccounts: TCTRLNoAccounts
   Caption = 'CTRLNoAccounts'
   Caption = 'CTRLNoAccounts'
   ClientHeight = 257
   ClientHeight = 257
   ClientWidth = 349
   ClientWidth = 349
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object lblGetFirstAccount: TLabel
   object lblGetFirstAccount: TLabel
     Left = 16
     Left = 16

+ 13 - 0
src/gui/UCTRLNoAccount.pas

@@ -1,5 +1,18 @@
 unit UCTRLNoAccount;
 unit UCTRLNoAccount;
 
 
+{ Copyright (c) 2018 by Herman Schoenfeld
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
 {$mode delphi}
 {$mode delphi}
 
 
 interface
 interface

+ 1 - 0
src/gui/UCTRLSyncronization.lfm

@@ -8,6 +8,7 @@ object CTRLSyncronization: TCTRLSyncronization
   Caption = 'Synchronization'
   Caption = 'Synchronization'
   ClientHeight = 428
   ClientHeight = 428
   ClientWidth = 728
   ClientWidth = 728
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object paSplash: TPanel
   object paSplash: TPanel
     Left = 0
     Left = 0

+ 9 - 5
src/gui/UCTRLSyncronization.pas

@@ -1,16 +1,20 @@
 unit UCTRLSyncronization;
 unit UCTRLSyncronization;
 
 
-{$mode delphi}
-
-{ Copyright (c) 2018 Sphere 10 Software
+{ Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  Acknowledgements:
-  - Herman Schoenfeld: unit creator, implementation
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 1 - 1
src/gui/UCTRLWallet.lfm

@@ -10,9 +10,9 @@ object CTRLWallet: TCTRLWallet
   ClientWidth = 1151
   ClientWidth = 1151
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnResize = FormResize
   OnResize = FormResize
-  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object PairSplitter1: TPairSplitter
   object PairSplitter1: TPairSplitter
+    Cursor = crDefault
     Left = 0
     Left = 0
     Height = 571
     Height = 571
     Top = 0
     Top = 0

+ 10 - 6
src/gui/UCTRLWallet.pas

@@ -1,17 +1,21 @@
 unit UCTRLWallet;
 unit UCTRLWallet;
 
 
-{$mode delphi}
-{$modeswitch nestedprocvars}
-
-{ Copyright (c) 2018 Sphere 10 Software
+{ Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  Acknowledgements:
-  - Herman Schoenfeld: unit creator, implementation
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+{$modeswitch nestedprocvars}
+
 interface
 interface
 
 
 uses
 uses

+ 9 - 2
src/gui/UCellRenderers.pas

@@ -1,13 +1,20 @@
 unit UCellRenderers;
 unit UCellRenderers;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 uses
 uses

+ 1 - 0
src/gui/UFRMAbout.lfm

@@ -15,6 +15,7 @@ object FRMAbout: TFRMAbout
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object Image1: TImage
   object Image1: TImage
     Left = 15
     Left = 15

+ 9 - 6
src/gui/UFRMAbout.pas

@@ -1,19 +1,22 @@
 unit UFRMAbout;
 unit UFRMAbout;
 
 
-{$mode delphi}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode delphi}
 
 
 interface
 interface
 
 

+ 9 - 8
src/gui/UFRMAccountExplorer.lfm

@@ -11,10 +11,11 @@ object FRMAccountExplorer: TFRMAccountExplorer
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object Splitter1: TSplitter
   object Splitter1: TSplitter
     Left = 380
     Left = 380
-    Height = 385
+    Height = 365
     Top = 66
     Top = 66
     Width = 5
     Width = 5
   end
   end
@@ -140,17 +141,17 @@ object FRMAccountExplorer: TFRMAccountExplorer
   end
   end
   object pnlAccounts: TPanel
   object pnlAccounts: TPanel
     Left = 0
     Left = 0
-    Height = 385
+    Height = 365
     Top = 66
     Top = 66
     Width = 380
     Width = 380
     Align = alLeft
     Align = alLeft
     BevelOuter = bvNone
     BevelOuter = bvNone
-    ClientHeight = 385
+    ClientHeight = 365
     ClientWidth = 380
     ClientWidth = 380
     TabOrder = 1
     TabOrder = 1
     object dgAccounts: TDrawGrid
     object dgAccounts: TDrawGrid
       Left = 0
       Left = 0
-      Height = 351
+      Height = 331
       Top = 0
       Top = 0
       Width = 380
       Width = 380
       Align = alClient
       Align = alClient
@@ -164,7 +165,7 @@ object FRMAccountExplorer: TFRMAccountExplorer
     object pnlAccountsInfo: TPanel
     object pnlAccountsInfo: TPanel
       Left = 0
       Left = 0
       Height = 34
       Height = 34
-      Top = 351
+      Top = 331
       Width = 380
       Width = 380
       Align = alBottom
       Align = alBottom
       BevelOuter = bvNone
       BevelOuter = bvNone
@@ -245,7 +246,7 @@ object FRMAccountExplorer: TFRMAccountExplorer
   end
   end
   object pcAccountsOptions: TPageControl
   object pcAccountsOptions: TPageControl
     Left = 385
     Left = 385
-    Height = 385
+    Height = 365
     Top = 66
     Top = 66
     Width = 483
     Width = 483
     ActivePage = tsAccountOperations
     ActivePage = tsAccountOperations
@@ -254,11 +255,11 @@ object FRMAccountExplorer: TFRMAccountExplorer
     TabOrder = 2
     TabOrder = 2
     object tsAccountOperations: TTabSheet
     object tsAccountOperations: TTabSheet
       Caption = 'Operations of selected Account'
       Caption = 'Operations of selected Account'
-      ClientHeight = 357
+      ClientHeight = 337
       ClientWidth = 475
       ClientWidth = 475
       object dgAccountOperations: TDrawGrid
       object dgAccountOperations: TDrawGrid
         Left = 0
         Left = 0
-        Height = 357
+        Height = 337
         Top = 0
         Top = 0
         Width = 475
         Width = 475
         Align = alClient
         Align = alClient

+ 10 - 3
src/gui/UFRMAccountExplorer.pas

@@ -1,16 +1,23 @@
 unit UFRMAccountExplorer;
 unit UFRMAccountExplorer;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/master/Units/Forms/UFRMWallet.pas
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 24 - 24
src/gui/UFRMAccountInfo.lfm

@@ -1,100 +1,100 @@
 object FRMAccountInfo: TFRMAccountInfo
 object FRMAccountInfo: TFRMAccountInfo
   Left = 0
   Left = 0
+  Height = 300
   Top = 0
   Top = 0
+  Width = 635
   BorderIcons = [biSystemMenu]
   BorderIcons = [biSystemMenu]
   Caption = 'Account Information'
   Caption = 'Account Information'
   ClientHeight = 300
   ClientHeight = 300
   ClientWidth = 635
   ClientWidth = 635
   Color = clBtnFace
   Color = clBtnFace
-  Font.Charset = DEFAULT_CHARSET
   Font.Color = clWindowText
   Font.Color = clWindowText
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
-  Font.Style = []
-  OldCreateOrder = False
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  PixelsPerInch = 96
-  TextHeight = 13
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object Label1: TLabel
   object Label1: TLabel
     Left = 25
     Left = 25
+    Height = 19
     Top = 26
     Top = 26
-    Width = 39
-    Height = 13
+    Width = 57
     Caption = 'Account'
     Caption = 'Account'
+    ParentColor = False
   end
   end
   object lblAccount: TLabel
   object lblAccount: TLabel
     Left = 77
     Left = 77
+    Height = 19
     Top = 21
     Top = 21
     Width = 97
     Width = 97
-    Height = 19
     Caption = '0000000-00'
     Caption = '0000000-00'
-    Font.Charset = DEFAULT_CHARSET
     Font.Color = clBlack
     Font.Color = clBlack
     Font.Height = -16
     Font.Height = -16
     Font.Name = 'Tahoma'
     Font.Name = 'Tahoma'
     Font.Style = [fsBold]
     Font.Style = [fsBold]
+    ParentColor = False
     ParentFont = False
     ParentFont = False
   end
   end
   object Label6: TLabel
   object Label6: TLabel
     Left = 24
     Left = 24
+    Height = 19
     Top = 56
     Top = 56
-    Width = 47
-    Height = 13
+    Width = 71
     Caption = 'Public key'
     Caption = 'Public key'
+    ParentColor = False
   end
   end
   object lblBalance: TLabel
   object lblBalance: TLabel
     Left = 252
     Left = 252
+    Height = 19
     Top = 21
     Top = 21
     Width = 97
     Width = 97
-    Height = 19
     Caption = '0000000-00'
     Caption = '0000000-00'
-    Font.Charset = DEFAULT_CHARSET
     Font.Color = clBlack
     Font.Color = clBlack
     Font.Height = -16
     Font.Height = -16
     Font.Name = 'Tahoma'
     Font.Name = 'Tahoma'
     Font.Style = [fsBold]
     Font.Style = [fsBold]
+    ParentColor = False
     ParentFont = False
     ParentFont = False
   end
   end
   object Label3: TLabel
   object Label3: TLabel
     Left = 200
     Left = 200
+    Height = 19
     Top = 26
     Top = 26
-    Width = 37
-    Height = 13
+    Width = 53
     Caption = 'Balance'
     Caption = 'Balance'
+    ParentColor = False
   end
   end
   object Label2: TLabel
   object Label2: TLabel
     Left = 25
     Left = 25
+    Height = 19
     Top = 91
     Top = 91
-    Width = 26
-    Height = 13
+    Width = 35
     Caption = 'State'
     Caption = 'State'
+    ParentColor = False
   end
   end
   object Label4: TLabel
   object Label4: TLabel
     Left = 77
     Left = 77
+    Height = 19
     Top = 86
     Top = 86
     Width = 200
     Width = 200
-    Height = 19
     Caption = 'Normal/For sale/Private'
     Caption = 'Normal/For sale/Private'
-    Font.Charset = DEFAULT_CHARSET
     Font.Color = clBlack
     Font.Color = clBlack
     Font.Height = -16
     Font.Height = -16
     Font.Name = 'Tahoma'
     Font.Name = 'Tahoma'
     Font.Style = [fsBold]
     Font.Style = [fsBold]
+    ParentColor = False
     ParentFont = False
     ParentFont = False
   end
   end
   object ebPublicKey: TEdit
   object ebPublicKey: TEdit
     Left = 77
     Left = 77
+    Height = 27
     Top = 51
     Top = 51
     Width = 533
     Width = 533
-    Height = 25
-    Ctl3D = False
-    Font.Charset = DEFAULT_CHARSET
     Font.Color = clBlack
     Font.Color = clBlack
     Font.Height = -16
     Font.Height = -16
     Font.Name = 'Tahoma'
     Font.Name = 'Tahoma'
     Font.Style = [fsBold]
     Font.Style = [fsBold]
-    ParentCtl3D = False
     ParentFont = False
     ParentFont = False
     TabOrder = 0
     TabOrder = 0
     Text = 'ebPublicKey'
     Text = 'ebPublicKey'
   end
   end
-end
+end

+ 13 - 0
src/gui/UFRMAccountInfo.pas

@@ -1,5 +1,18 @@
 unit UFRMAccountInfo;
 unit UFRMAccountInfo;
 
 
+{ Copyright (c) 2016 by PacalCoin Developers
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 1 - 0
src/gui/UFRMAccountSelect.lfm

@@ -15,6 +15,7 @@ object FRMAccountSelect: TFRMAccountSelect
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object pnlAccountsTop: TPanel
   object pnlAccountsTop: TPanel
     Left = 395
     Left = 395

+ 9 - 6
src/gui/UFRMAccountSelect.pas

@@ -1,19 +1,22 @@
 unit UFRMAccountSelect;
 unit UFRMAccountSelect;
 
 
-{$MODE Delphi}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$MODE Delphi}
 
 
 interface
 interface
 
 

+ 2 - 1
src/gui/UFRMBlockExplorer.lfm

@@ -11,6 +11,7 @@ object FRMBlockExplorer: TFRMBlockExplorer
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object Panel2: TPanel
   object Panel2: TPanel
     Left = 0
     Left = 0
@@ -42,7 +43,7 @@ object FRMBlockExplorer: TFRMBlockExplorer
   end
   end
   object dgBlockChainExplorer: TDrawGrid
   object dgBlockChainExplorer: TDrawGrid
     Left = 0
     Left = 0
-    Height = 383
+    Height = 363
     Top = 41
     Top = 41
     Width = 864
     Width = 864
     Align = alClient
     Align = alClient

+ 11 - 5
src/gui/UFRMBlockExplorer.pas

@@ -1,18 +1,24 @@
 unit UFRMBlockExplorer;
 unit UFRMBlockExplorer;
 
 
-{$mode delphi}
-
-interface
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/master/Units/Forms/UFRMWallet.pas
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
+interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}
 
 

+ 1 - 1
src/gui/UFRMExecuteOperations.lfm

@@ -8,7 +8,7 @@ object ExecuteOperations: TExecuteOperations
   ClientHeight = 307
   ClientHeight = 307
   ClientWidth = 545
   ClientWidth = 545
   OnCreate = FormCreate
   OnCreate = FormCreate
-  LCLVersion = '1.8.2.0'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object GroupBox1: TGroupBox
   object GroupBox1: TGroupBox
     Left = 0
     Left = 0

+ 13 - 5
src/gui/UFRMExecuteOperations.pas

@@ -1,15 +1,23 @@
 unit UFRMExecuteOperations;
 unit UFRMExecuteOperations;
 
 
-{$mode delphi}
-
-{ Copyright (c) 2018 Sphere 10 Software (http://www.sphere10.com/)
+{ Copyright (c) 2018 by Sphere 10 Software <http://www.sphere10.com/>
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  Ugochukwu Mmaduekwe - main developer
-  Herman Schoenfeld - designer }
+  - Ugochukwu Mmaduekwe - main developer
+  - Herman Schoenfeld - designer
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode delphi}
 
 
 interface
 interface
 
 

+ 2 - 1
src/gui/UFRMLogs.lfm

@@ -9,7 +9,8 @@ object FRMLogs: TFRMLogs
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.6.4.0'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object pnlTopLogs: TPanel
   object pnlTopLogs: TPanel
     Left = 0
     Left = 0
     Height = 41
     Height = 41

+ 10 - 3
src/gui/UFRMLogs.pas

@@ -1,16 +1,23 @@
 unit UFRMLogs;
 unit UFRMLogs;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  Portions of methods were copied from original UFRMWallet.pas, Copyright (c) Albert Molina 2016.
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 5 - 4
src/gui/UFRMMainForm.lfm

@@ -22,6 +22,7 @@ object FRMMainForm: TFRMMainForm
   OnResize = FormResize
   OnResize = FormResize
   Position = poScreenCenter
   Position = poScreenCenter
   ShowHint = True
   ShowHint = True
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object paLogoPanel: TPanel
   object paLogoPanel: TPanel
     Left = 0
     Left = 0
@@ -44,7 +45,7 @@ object FRMMainForm: TFRMMainForm
   end
   end
   object paSyncPanel: TPanel
   object paSyncPanel: TPanel
     Left = 0
     Left = 0
-    Height = 536
+    Height = 477
     Top = 80
     Top = 80
     Width = 870
     Width = 870
     Align = alClient
     Align = alClient
@@ -61,7 +62,7 @@ object FRMMainForm: TFRMMainForm
   end
   end
   object paWalletPanel: TPanel
   object paWalletPanel: TPanel
     Left = 0
     Left = 0
-    Height = 536
+    Height = 477
     Top = 80
     Top = 80
     Width = 870
     Width = 870
     Align = alClient
     Align = alClient
@@ -78,7 +79,7 @@ object FRMMainForm: TFRMMainForm
   object sbStatusBar: TStatusBar
   object sbStatusBar: TStatusBar
     Left = 0
     Left = 0
     Height = 23
     Height = 23
-    Top = 616
+    Top = 557
     Width = 870
     Width = 870
     Panels = <    
     Panels = <    
       item
       item
@@ -107,7 +108,7 @@ object FRMMainForm: TFRMMainForm
     AnchorSideBottom.Side = asrBottom
     AnchorSideBottom.Side = asrBottom
     Left = 783
     Left = 783
     Height = 15
     Height = 15
-    Top = 620
+    Top = 561
     Width = 70
     Width = 70
     Align = alNone
     Align = alNone
     Anchors = [akTop, akRight]
     Anchors = [akTop, akRight]

+ 10 - 3
src/gui/UFRMMainForm.pas

@@ -1,16 +1,23 @@
 unit UFRMMainForm;
 unit UFRMMainForm;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/master/Units/Forms/UFRMWallet.pas
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 2 - 1
src/gui/UFRMMemoText.lfm

@@ -13,7 +13,8 @@ object FRMMemoText: TFRMMemoText
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.6.4.0'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object pnlBottom: TPanel
   object pnlBottom: TPanel
     Left = 0
     Left = 0
     Height = 55
     Height = 55

+ 13 - 0
src/gui/UFRMMemoText.pas

@@ -1,5 +1,18 @@
 unit UFRMMemoText;
 unit UFRMMemoText;
 
 
+{ Copyright (c) 2016 by PacalCoin Developers
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 3 - 2
src/gui/UFRMMessages.lfm

@@ -7,8 +7,9 @@ object FRMMessages: TFRMMessages
   ClientHeight = 441
   ClientHeight = 441
   ClientWidth = 874
   ClientWidth = 874
   OnActivate = FormActivate
   OnActivate = FormActivate
-  Position = poOwnerFormCenter    
-  LCLVersion = '1.6.4.0'
+  Position = poOwnerFormCenter
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object Label11: TLabel
   object Label11: TLabel
     Left = 15
     Left = 15
     Height = 15
     Height = 15

+ 10 - 3
src/gui/UFRMMessages.pas

@@ -1,16 +1,23 @@
 unit UFRMMessages;
 unit UFRMMessages;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/master/Units/Forms/UFRMWallet.pas
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 2 - 1
src/gui/UFRMNodes.lfm

@@ -8,7 +8,8 @@ object FRMNodes: TFRMNodes
   ClientWidth = 861
   ClientWidth = 861
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object Label3: TLabel
   object Label3: TLabel
     Left = 15
     Left = 15
     Height = 15
     Height = 15

+ 10 - 3
src/gui/UFRMNodes.pas

@@ -1,16 +1,23 @@
 unit UFRMNodes;
 unit UFRMNodes;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  Portions of methods were copied from original UFRMWallet.pas, Copyright (c) Albert Molina 2016.
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

+ 1 - 1
src/gui/UFRMNodesIp.lfm

@@ -13,7 +13,7 @@ object FRMNodesIp: TFRMNodesIp
   Font.Height = -11
   Font.Height = -11
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object Label1: TLabel
   object Label1: TLabel
     Left = 30
     Left = 30

+ 16 - 0
src/gui/UFRMNodesIp.pas

@@ -1,5 +1,21 @@
 unit UFRMNodesIp;
 unit UFRMNodesIp;
 
 
+{ Copyright (c) 2016 by Albert Molina
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  If you like it, consider a donation using Bitcoin:
+  16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
 {$MODE Delphi}
 {$MODE Delphi}
 
 
 interface
 interface

+ 2 - 1
src/gui/UFRMOperation.lfm

@@ -16,7 +16,8 @@ object FRMOperation: TFRMOperation
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.0.6'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object lblAccountCaption: TLabel
   object lblAccountCaption: TLabel
     Left = 25
     Left = 25
     Height = 13
     Height = 13

+ 9 - 6
src/gui/UFRMOperation.pas

@@ -1,19 +1,22 @@
 unit UFRMOperation;
 unit UFRMOperation;
 
 
-{$mode delphi}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode delphi}
 
 
 interface
 interface
 
 

+ 2 - 1
src/gui/UFRMOperationExplorer.lfm

@@ -11,10 +11,11 @@ object FRMOperationExplorer: TFRMOperationExplorer
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object dgOperationsExplorer: TDrawGrid
   object dgOperationsExplorer: TDrawGrid
     Left = 0
     Left = 0
-    Height = 383
+    Height = 363
     Top = 41
     Top = 41
     Width = 864
     Width = 864
     Align = alClient
     Align = alClient

+ 9 - 3
src/gui/UFRMOperationExplorer.pas

@@ -1,16 +1,22 @@
 unit UFRMOperationExplorer;
 unit UFRMOperationExplorer;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/master/Units/Forms/UFRMWallet.pas
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
 
 
 interface
 interface
 
 

+ 2 - 1
src/gui/UFRMPascalCoinWalletConfig.lfm

@@ -15,7 +15,8 @@ object FRMPascalCoinWalletConfig: TFRMPascalCoinWalletConfig
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.6.4.0'
+  LCLVersion = '1.8.4.0'
+  Visible = False
   object Label1: TLabel
   object Label1: TLabel
     Left = 30
     Left = 30
     Height = 13
     Height = 13

+ 9 - 6
src/gui/UFRMPascalCoinWalletConfig.pas

@@ -1,19 +1,22 @@
 unit UFRMPascalCoinWalletConfig;
 unit UFRMPascalCoinWalletConfig;
 
 
-{$mode delphi}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode delphi}
 
 
 interface
 interface
 
 

+ 1 - 1
src/gui/UFRMPayloadDecoder.lfm

@@ -15,7 +15,7 @@ object FRMPayloadDecoder: TFRMPayloadDecoder
   Font.Name = 'Tahoma'
   Font.Name = 'Tahoma'
   OnCreate = FormCreate
   OnCreate = FormCreate
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.2.0'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object Label1: TLabel
   object Label1: TLabel
     Left = 20
     Left = 20

+ 9 - 6
src/gui/UFRMPayloadDecoder.pas

@@ -1,19 +1,22 @@
 unit UFRMPayloadDecoder;
 unit UFRMPayloadDecoder;
 
 
-{$mode Delphi}
-
 { Copyright (c) 2016 by Albert Molina
 { Copyright (c) 2016 by Albert Molina
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
-  This unit is a part of Pascal Coin, a P2P crypto currency without need of
-  historical operations.
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
 
 
-  If you like it, consider a donation using BitCoin:
+  If you like it, consider a donation using Bitcoin:
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
   16K3HCZRhFUtM8GdWRcfKeaa6KsuyxZaYk
 
 
-  }
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode Delphi}
 
 
 interface
 interface
 
 

+ 2 - 1
src/gui/UFRMPendingOperations.lfm

@@ -11,6 +11,7 @@ object FRMPendingOperations: TFRMPendingOperations
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object pnlPendingOperations: TPanel
   object pnlPendingOperations: TPanel
     Left = 0
     Left = 0
@@ -41,7 +42,7 @@ object FRMPendingOperations: TFRMPendingOperations
   end
   end
   object dgPendingOperations: TDrawGrid
   object dgPendingOperations: TDrawGrid
     Left = 0
     Left = 0
-    Height = 251
+    Height = 231
     Top = 86
     Top = 86
     Width = 860
     Width = 860
     Align = alClient
     Align = alClient

+ 9 - 3
src/gui/UFRMPendingOperations.pas

@@ -1,16 +1,22 @@
 unit UFRMPendingOperations;
 unit UFRMPendingOperations;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/master/Units/Forms/UFRMWallet.pas
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
 
 
 interface
 interface
 
 

+ 15 - 2
src/gui/UFRMSaleAccounts.pas

@@ -1,7 +1,20 @@
-{$mode delphi}
-
 unit UFRMSaleAccounts;
 unit UFRMSaleAccounts;
 
 
+{ Copyright (c) 2016 by PacalCoin Developers
+
+  Distributed under the MIT software license, see the accompanying file LICENSE
+  or visit http://www.opensource.org/licenses/mit-license.php.
+
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
+}
+
+{$mode delphi}
+
 {$I ..\config.inc}
 {$I ..\config.inc}
 
 
 interface
 interface

+ 1 - 1
src/gui/UFRMWalletKeys.lfm

@@ -9,7 +9,7 @@ object FRMWalletKeys: TFRMWalletKeys
   OnCreate = FormCreate
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   OnDestroy = FormDestroy
   Position = poOwnerFormCenter
   Position = poOwnerFormCenter
-  LCLVersion = '1.8.2.0'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object lbWalletKeys: TListBox
   object lbWalletKeys: TListBox
     Left = 24
     Left = 24

+ 10 - 3
src/gui/UFRMWalletKeys.pas

@@ -1,16 +1,23 @@
 unit UFRMWalletKeys;
 unit UFRMWalletKeys;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/master/Units/Forms/UFRMWallet.pas
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 uses
 uses

+ 10 - 3
src/gui/UUserInterface.pas

@@ -1,16 +1,23 @@
 unit UUserInterface;
 unit UUserInterface;
 
 
-{$mode delphi}
-
 { Copyright (c) 2018 by Herman Schoenfeld
 { Copyright (c) 2018 by Herman Schoenfeld
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/master/Units/Forms/UFRMWallet.pas
+  - Albert Molina: portions of code copied from https://github.com/PascalCoin/PascalCoin/blob/Releases/2.1.6/Units/Forms/UFRMWallet.pas
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+
 interface
 interface
 
 
 {$I ..\config.inc}
 {$I ..\config.inc}

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

@@ -7,7 +7,7 @@ object WIZChangeKey_EnterKey: TWIZChangeKey_EnterKey
   Caption = 'ChangeKey_EnterKey'
   Caption = 'ChangeKey_EnterKey'
   ClientHeight = 291
   ClientHeight = 291
   ClientWidth = 510
   ClientWidth = 510
-  LCLVersion = '1.8.2.0'
+  LCLVersion = '1.8.4.0'
   Visible = False
   Visible = False
   object gbNewPublicKey: TGroupBox
   object gbNewPublicKey: TGroupBox
     Left = 4
     Left = 4

+ 13 - 6
src/gui/wizards/operations/UWIZChangeKey_EnterKey.pas

@@ -1,18 +1,25 @@
 unit UWIZChangeKey_EnterKey;
 unit UWIZChangeKey_EnterKey;
 
 
-{$mode delphi}
-{$modeswitch nestedprocvars}
-
-{ Copyright (c) 2018 Sphere 10 Software (http://www.sphere10.com/)
+{ Copyright (c) 2018 by Sphere 10 Software <http://www.sphere10.com/>
 
 
   Distributed under the MIT software license, see the accompanying file LICENSE
   Distributed under the MIT software license, see the accompanying file LICENSE
   or visit http://www.opensource.org/licenses/mit-license.php.
   or visit http://www.opensource.org/licenses/mit-license.php.
 
 
+  This unit is a part of the PascalCoin Project, an infinitely scalable
+  cryptocurrency. Find us here:
+  Web: https://pascalcoin.org
+  Source: https://github.com/PascalCoin/PascalCoin
+
   Acknowledgements:
   Acknowledgements:
-  Ugochukwu Mmaduekwe - main developer
-  Herman Schoenfeld - designer
+  - Ugochukwu Mmaduekwe - main developer
+  - Herman Schoenfeld - designer
+
+  THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 }
 
 
+{$mode delphi}
+{$modeswitch nestedprocvars}
+
 interface
 interface
 
 
 uses
 uses

Some files were not shown because too many files changed in this diff