From 2b7cb426b69153d5d6925e062c86e474c53c4e23 Mon Sep 17 00:00:00 2001
From: neo85 <neo85@centrum.cz>
Date: Wed, 3 Feb 2021 14:32:25 +0100
Subject: [PATCH] MessageBox as TForm

MessageBox is now a TForm. This way it will stay on top system wide.
---
 mainform1.pas |  12 +-
 msgbox.lfm    | 624 ++++++++++++++++++++++++++++++++++++++++++++++++++
 msgbox.pas    |  59 +++++
 3 files changed, 693 insertions(+), 2 deletions(-)
 create mode 100644 msgbox.lfm
 create mode 100644 msgbox.pas

diff --git a/mainform1.pas b/mainform1.pas
index 7fcd141..443b9b9 100644
--- a/mainform1.pas
+++ b/mainform1.pas
@@ -134,6 +134,8 @@   TMainForm = class(TForm)
 
 implementation
 
+uses msgbox;
+
 { TMainForm }
 
 const
@@ -865,10 +867,16 @@ procedure TMainForm.ShowTrayMessage(Msg: string);
 end;
 
 procedure TMainForm.ShowDoneMessage(Msg: string);
+var MsgboxForm : TMsgBoxForm;
 begin
   // http://msdn.microsoft.com/en-us/library/ms645505(VS.85).aspx
-  Windows.MessageBox(GetHandle(), pChar(msg), 'Done',
-     MB_SYSTEMMODAL or MB_SETFOREGROUND or MB_TOPMOST or MB_ICONINFORMATION);
+  //Windows.MessageBox(GetHandle(), pChar(msg), 'Done',
+  //   MB_SYSTEMMODAL or MB_SETFOREGROUND or MB_TOPMOST or MB_ICONINFORMATION);
+  // Custom MessageBox
+  MsgboxForm := TMsgBoxForm.Create(Self);
+  MsgBoxForm.SetText(Msg);
+  MsgboxForm.ShowModal;
+  MsgboxForm.Release;
   StopAudio();
 end;
 
diff --git a/msgbox.lfm b/msgbox.lfm
new file mode 100644
index 0000000..77f6133
--- /dev/null
+++ b/msgbox.lfm
@@ -0,0 +1,624 @@
+object MsgBoxForm: TMsgBoxForm
+  Left = 819
+  Height = 136
+  Top = 314
+  Width = 162
+  BorderStyle = bsDialog
+  Caption = 'Done'
+  ClientHeight = 136
+  ClientWidth = 162
+  FormStyle = fsSystemStayOnTop
+  Icon.Data = {
+    662500000000010004002020000001001800A80C000046000000101000000100
+    180068030000EE0C00002020000001002000A810000056100000101000000100
+    200068040000FE2000002800000020000000400000000100180000000000000C
+    0000640000006400000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000B1864DB2782BB27019B2
+    7019B4711CB27019B1711DB2782BB1864D000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000B39C7EB1711DB77521C48032CC883CD18D42D1
+    8D42D18D42D18D42D18D42CC883CC48032B77521B1711DB39C7E000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000B1762ABA7724CC883CD59149DC9B4DDD9C4EE2A251E2
+    A251E2A251E2A251E2A251DD9C4EDB9B4DD59149CC883CBA7724B1762A000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000B27019C68436D59149DD9C4EE1A75AE3CEA3E7EEE0E9FFFFE9
+    FFFFE9FFFFE9FFFFE9FFFFE7EEE0E3CEA3E1A75ADD9C4ED59149C68436B27019
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000B4711CD29149D9974EE09E4DE2D3B0E5FFFFE5FFFFE5FFFFE5FFFFE5
+    FFFFE9FFFFE5FFFFE5FFFFE5FFFFE5FFFFE5FFFFE2D3B0E09E4DD9974ED29149
+    B4711C0000000000000000000000000000000000000000000000000000000000
+    00B27019D29149DB9A51DEA155E2F3ECE5FFFFE5FFFFE5FFFFE1FEFEE5FFFFE5
+    FFFF99A2A1E5FFFFE5FFFFE1FEFEE5FFFFE5FFFFE5FFFFE2F3ECDEA155DB9A51
+    D29149B27019000000000000000000000000000000000000000000000000B176
+    2AC9883CDC9D51DEA155E1FEFEE1FEFEE1FEFE949D9CE1FEFEDDFAFCE1FEFEE5
+    FFFF99A2A1E5FFFFE1FEFEDDFAFCE1FEFE949D9CE1FEFEE1FEFEE1FEFEDEA155
+    DC9D51C9883CB2782B000000000000000000000000000000000000BDA587BC7A
+    29DC9C59DD9949DEF1EBDDFDFEDDFDFEDDFDFEE1FEFEE1FEFEDDFAFCDDFAFCE1
+    FEFE949D9CE5FFFFDDFAFCDDFAFBDDFDFEE1FEFEDDFDFEDDFDFEDDFDFEDEF1EB
+    DD9949DC9C59BC7A29BDA587000000000000000000000000000000B1711DD393
+    4DDC9D51DCCFABDDFDFEDDFDFEDDFAFCD9F9FCD9F8FBD9F8FBD9F8FBD9F9FCDD
+    FAFCDDFDFEDDFAFCD9F8FBD9F8FBD9F8FBD9F9FCD9F8FBDDFAFCDDFDFEDAFDFF
+    DCCFABDC9D51D3934DB1711D000000000000000000000000000000B97825E0A1
+    5EDC9D51DAFDFFDAFDFF8E9798DAFDFFD8F7FAD8F7FAD9F8FBD9F8FBD9F8FBD7
+    F8FBD9F8FBD8F7FAD8F7FAD8F7FAD8F7FAD8F7FAD8F7FADAFDFF8E9798DAFDFF
+    DAFDFFDC9D51E0A15EB97825000000000000000000000000B78C53CD8D44DF9E
+    55D8C59CD6FEFFD6F9FDD9F9FCD7F8FBD5F6F9D5F6F9D9F9FCDAFDFFDDFDFEDA
+    FDFFD8F7FAD5F6F9D5F6F9D5F6F9D8F7FAD5F6F9D5F6F9D7F8FBD9F9FCD6F9FD
+    D6FEFFD8C59CDF9E55CD8D44B78C53000000000000000000B2782BD99E5ADD99
+    49D5E4D8D2F9FED5F6F9D5F6F9D5F6F9D2F4F8D5F6F9DAFDFF858D8E828A8BDD
+    FDFED6F9FDD5F6F9D2F4F8D2F4F8D2F4F8D5F6F9D5F6F9D5F6F9D2F4F8D5F6F9
+    D2F9FED5E4D8DD9949D99E5AB2782B000000000000000000B16F18E7AC6FDA94
+    41D0FDFFD2F9FED2F4F8D1F6FCD2F4F8D2F4F8D2F4F8D6FEFF8991904F47457D
+    898ADDFDFED6F9FDD5F6F9D2F4F8D2F4F8D2F4F8D2F4F8D2F4F8D2F4F8D2F4F8
+    D1F6FCD0FDFFDA9441E7AC6FB16F18000000000000000000B16F18E8AE72D991
+    3DCFFCFFCFF5FCD1F6FCD6F9FDD1F6FCD2F4F8CEF3F8D1F6FCD6FEFF858D8E43
+    3D3B748080DAFDFFD1F6FCCEF3F8CEF3F8CEF3F8D2F4F8D1F6FCD2F9FED2F9FE
+    CFF5FCCDFAFEDA9441E8AE72B06D16000000000000000000B06D16E9B076D991
+    3DCDFAFECFF5FC849092859394839091CFF5FCCDF1F6CEF3F8D1F6FCDAFDFF81
+    8D8E3731316E787AD2F9FECEF3F8CDF1F6CDF1F6CDF5FA839091859394839091
+    D1F6FCCAF9FFD9913DE9B076B06D16000000000000000000B06D16EBB279D68D
+    3AD0FDFFCAF4F9CDF5FACFF5FCCDF5FAC9F2F9C8F0F5C9F2F9CDF5FAD6FEFF7A
+    86883C3434707B7DD2F9FEC8F0F5C8F0F5C8F0F5C9F2F9CDF5FACDF5FACDF5FA
+    CAF4F9D0FDFFD68D3AEBB279B06D16000000000000000000B06D16EDB77ED68D
+    3ACFFCFFC6F1F7C8F0F5C8F0F5C8F0F5C8F0F5C8F0F5CAF4F9D0FDFF78848541
+    3838788485D0FDFFCAF4F9C8F0F5C8F0F5C8F0F5C8F0F5C8F0F5C8F0F5C8F0F5
+    C6F1F7CFFCFFD68D3AEDB77EB06D16000000000000000000B5792CE4AB6DDA93
+    44CFFCFFC4EFF8C5EDF4C5EDF4C5EDF4C8F0F5C9F2F9CFFCFF7A8688483F3D7A
+    8688D0FDFFC9F2F9C8F0F5C5EDF4C5EDF4C5EDF4C5EDF4C5EDF4C5EDF4C5EDF4
+    C5F1F8CFFCFFDA9344E4AB6DB5792C000000000000000000C0955CD49954E19E
+    58D2D5C4BEF2FDC4EFF8C3F0F7C4EFF8C5F1F8CAF9FF7D898A4E46437D898ACD
+    FAFEC5F1F8C1EDF5C2ECF3C2ECF3C5EDF4C2ECF3C2ECF3C3F0F7C3F0F7C3F0F7
+    C1F0F9D2D5C4E19E58D49954C0955C000000000000000000000000BC7A29F0B5
+    7ACFB082C4F0FFC3F0F7758385C5F1F8CAF9FF818D8E554C4A818D8ECAF9FFC3
+    F0F7C1EDF5C0EBF2C2ECF3C0EBF2C0EBF2C0EBF2C0EBF2C3F0F7758385C3F0F7
+    C4F0FFCFB082F0B57ABC7A29000000000000000000000000000000B1711DE4AB
+    6DE09B51C4D9D8BFECF9C1F0F9C1F0F98390915C524F849092C5F7FFC3F0F7BE
+    ECF3C1EDF5BEECF3BCEAF1BCEAF1BCEAF1BCEAF1BEECF3BEECF3BEEDF6BFECF9
+    C4D9D8E09B51E4AB6DB1711D000000000000000000000000000000000000C181
+    33F2BA82D19B5AB9E4FABBECF5C1F0F9839091859394C5F7FFBEEDF6BEECF3BF
+    ECF9728386BFECF9BCEAF1BCEAF1BEECF3BEEDF6BEECF3BBECF5BBECF5B9E4FA
+    D19B5AF2BA82C18133000000000000000000000000000000000000000000B579
+    2CD99E5AEAAD6CC6A67AB0DEF5B8E7F4BEF2FD718588BEEDF6BAEAF4B9E8F1BE
+    EDF6718588BEEDF6B8E7F4B7E8F1BAEAF46D7E81BBECF5B6E4F1B0DEF5C6A67A
+    EDB071D99E5AB5792C0000000000000000000000000000000000000000000000
+    00AF6C14EEB880EAAD6CC59E6AACD3E6AEDDF0B7E8F5BAEAF4B7E8F1B7E8F1BB
+    ECF56E8082BBECF5B7E8F1B7E8F1BAEAF4B6E7F4AEDDF0ACD3E6C59E6AEAAD6C
+    EEB880AF6C140000000000000000000000000000000000000000000000000000
+    00000000B4711CF2BA82EDB071CF914CB5B6A7A2D2EEA6D3E9AADAEAAFE0EEB2
+    E4F0B6E4F1B2E4F0AFE0EEAADAEAA6D3E9A2D2EEB5B6A7CF914CF0B57AEEB880
+    B4711C0000000000000000000000000000000000000000000000000000000000
+    00000000000000AF6C14DCA362F9C692E39F57CA8B44B2AE99A4BFC899CDEC9A
+    CCEB9ACCEB9ACCEB99CDECA4BFC8B2AE99CA8B44E39F57F9C692DBA362AF6C13
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000B5792CC38437EEB880FCC996E6A561DA9142D0822CD0
+    822CD0822CD0822CD0822CDA9142E6A561FCC996EEB880C38437B5792C000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000B1711DBE7F2EDEA767F2C18DFFD5A8FF
+    D5A8FFD5A8FFD5A8FFD5A8F2C18DDEA767BE7F2EB1711D000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000C79B61B87C2FAF6B13AF
+    6B13AF6B13AF6B13AF6B13B87C2FC79B61000000000000000000000000000000
+    000000000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFF0
+    07FFFF8000FFFF00007FFE00003FFC00001FF800000FF0000007E0000003E000
+    0003E0000003C0000001C0000001C0000001C0000001C0000001C0000001C000
+    0001C0000001C0000001E0000003E0000003F0000007F0000007F800000FFC00
+    001FFE00003FFF00007FFFC001FFFFF007FF2800000010000000200000000100
+    1800000000000003000064000000640000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000000000A2937E96
+    816596816599856C000000000000000000000000000000000000000000000000
+    000000000000A38660C27F2FD18F42D99749D99749D79547C9883AB47E3D0000
+    00000000000000000000000000000000000000AD7E45D79547E1C595E4EEE0E7
+    FFFFE7FFFFE6FAF7E3DCBEDDA765C88639000000000000000000000000000000
+    A77E4AD9994FE0E4D0CFE6E6E1FCFDE7FFFFBFD0D0E1FCFDCFE6E6E1FCFADEB6
+    7EC9883A000000000000000000000000D19147DCD6B7DCFCFEDCFAFCDBF9FBDC
+    FAFCCBE4E6DCFAFADCFAFCDCFAFCDCFAFADCA868B98443000000000000B88B52
+    DCA868D6FAFDC5E0E3D7F6F9D9F9FCD9F9FCD9F9FCD7F6F9D7F6F9D9F9FCC5E1
+    E4D8D6BBD19147000000000000C88A41D6C398D1F5F8D1F5F8D1F5F8AFC5C789
+    9595D6FAFDD1F5F8D1F5F8D1F5F8D1F5F8D2F4F4DD9D56A7967F000000CC8E45
+    D2C59DBCDCE1ABC4C7CEF3F8D1F5F88995957C8A8ACDF5FACDF1F6BDDBE0ABC4
+    C7CDF8FDE0A059A4927A000000CE9149D2C59DC9F2F8C9F2F8C9F1F6CDF5FA82
+    91927D8C8DC9F2F8C8EFF4C9F1F6C9F2F8CBF7FBE0A059A4927A000000C7904E
+    D7C097C3EDF5C4EDF5C7F2F9859495829192C7F2F9C2ECF3C2ECF3C4EDF5C4ED
+    F5C9EBEDDD9D56000000000000B49976E0AB6EC2E9F2AED5DB89999A87989AC2
+    F1F8BFECF3BEEAF1BEEAF1BFECF3ADD3DBCDC5AACE9149000000000000000000
+    CF934ECEB48EB9E8F68EA6AABEEEF7BCEBF497B8BEBAE8F2A8D0D7BAE8F2BAD4
+    D7E2A869B69B78000000000000000000000000DFA463CBAC83AFD3DEAFE0EEB4
+    E6F1A3CDD6B1E2EEADDDEFB7BDB2E3AE74C7985D000000000000000000000000
+    000000000000D29854E5AA6CC5A881B5A78CB5A78BB9A789D7A975E2A869C095
+    5E000000000000000000000000000000000000000000000000B99E7ACF9B5BD7
+    A05DD7A05DD49D5BCC9E64000000000000000000000000000000FFFF0000FC3F
+    0000F00F0000E00700B2C003D291C0019A51800155E28000E5FF8000FFFF8000
+    FFE18001E5FF8001FFFFC001A1E5E003E5FFF007FEFEF81FFFE5280000002000
+    0000400000000100200000000000001000006400000064000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000001000000070000000E00000013000000160000
+    0016000000160000001600000016000000130000000E00000007000000010000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000002000000090000001500000024000000320000003C000000410000
+    00430000004300000043000000410000003C0000003200000024000000150000
+    0009000000020000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000600000014000000280000003C6741107C996117C3AA6B19EAB2701AFFB270
+    19FFB27019FFB27019FFB2701AFFAA6B19EA996117C36741107C0000003C0000
+    0028000000140000000600000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000001000000070000
+    001C000000377349128AB06F1AF9B77521FFC48032FFCB883BFFD28D43FFD18D
+    42FFD18D42FFD18D42FFD28D43FFCB883BFFC48032FFB77521FFB06F1AF97349
+    128A000000370000001C00000007000000010000000000000000000000000000
+    00000000000000000000000000000000000000000001000000080000001F1910
+    0446AB6C19EDBA7724FFCC883CFFD59048FFDB9B4DFFDD9C4EFFE2A352FFE2A2
+    51FFE2A250FFE2A251FFE2A352FFDD9C4EFFDB9B4DFFD59048FFCC883CFFBA77
+    24FFAB6C19ED191004460000001F000000080000000100000000000000000000
+    000000000000000000000000000000000000000000070000001F3D260956B26F
+    19FFC68436FFD6934BFFDC9B4DFFE1A75AFFE3CEA3FFE7EEE0FFE9FFFFFFE9FF
+    FFFFE9FFFFFFE9FFFFFFE9FFFFFFE7EEE0FFE3CEA3FFE1A75AFFDC9B4DFFD693
+    4BFFC68436FFB26F19FF3D2609560000001F0000000700000000000000000000
+    0000000000000000000000000000000000060000001C3C260953B4711CFFD18F
+    47FFD9974EFFE09E4DFFE2D3B0FFE6FFFFFFE5FFFFFFE4FFFFFFE4FFFFFFE6FF
+    FFFFE7FFFFFFE6FFFFFFE4FFFFFFE4FFFFFFE5FFFFFFE6FFFFFFE2D3B0FFE09E
+    4DFFD9974EFFD18F47FFB4711CFF3C2609530000001C00000006000000000000
+    0000000000000000000000000002000000141E130541B16F18FFD29149FFDB99
+    50FFDFA256FFE2F3ECFFE4FFFFFFE5FFFFFFE3FFFFFFE2FDFEFFE3FDFEFFE6FF
+    FFFF99A1A1FFE6FFFFFFE3FDFEFFE2FDFEFFE3FFFFFFE5FFFFFFE4FFFFFFE2F3
+    ECFFDFA256FFDB9950FFD29149FFB16F18FF1E13054100000014000000020000
+    000000000000000000000000000900000028AC6C19ECC9883CFFDB9B52FFDEA1
+    54FFE0FFFFFFE0FFFFFFE1FFFFFF959D9CFFE1FEFFFFDFFBFCFFE0FCFDFFE4FF
+    FFFF99A3A1FFE4FFFFFFE0FCFDFFDFFBFCFFE1FEFFFF959D9CFFE1FFFFFFE0FF
+    FFFFE0FFFFFFDEA154FFDB9B52FFC9883CFFAC6C19EC00000028000000090000
+    00000000000000000001000000157D4F1381BC7A28FFDC9C59FFDE9A49FFDEF1
+    EBFFDEFFFFFFDEFCFDFFDEFCFDFFDFFDFEFFDEFCFDFFDDFAFBFFDEFBFCFFE1FF
+    FFFF949E9EFFE1FFFFFFDEFBFCFFDDFAFBFFDEFCFDFFDFFDFEFFDEFCFDFFDEFC
+    FDFFDEFFFFFFDEF1EBFFDE9A49FFDC9C59FFBC7A28FF7D4F1381000000150000
+    0001000000000000000700000024B06E19F9D3934DFFDD9C50FFDCCFABFFDBFF
+    FFFFDCFCFFFFDBFAFDFFDAF8FCFFDAF8FCFFDAF8FBFFDAF8FBFFDAF8FBFFDCFA
+    FDFFDDFBFEFFDCFAFDFFDAF8FBFFDAF8FBFFDAF8FBFFDAF8FCFFDAF8FCFFDBFA
+    FDFFDCFCFFFFDBFFFFFFDCCFABFFDD9C50FFD3934DFFB06E19F9000000240000
+    0007000000000000000E774B136BB97825FFE0A15EFFDC9E52FFD8FAFFFFDAFD
+    FFFF8E9798FFDAFAFDFFD8F7FAFFD8F7FAFFD8F7FAFFD9F8FBFFD9F8FBFFD8F8
+    FBFFD8F8FBFFD8F7FAFFD8F7FAFFD8F7FAFFD8F7FAFFD8F7FAFFD8F7FAFFDAFA
+    FDFF8E9798FFDAFDFFFFD8FAFFFFDC9E52FFE0A15EFFB97825FF774B136B0000
+    000E00000000000000139E6417BCCD8D44FFDF9E55FFD8C59CFFD6FDFFFFD7F9
+    FDFFD8F9FCFFD7F8FBFFD6F6F9FFD6F6F9FFD8F9FCFFDBFDFFFFDCFDFFFFD9FA
+    FDFFD7F7FAFFD6F6F9FFD6F6F9FFD6F6F9FFD6F6F9FFD6F6F9FFD6F6F9FFD7F8
+    FBFFD8F9FCFFD7F9FDFFD6FDFFFFD8C59CFFDF9E55FFCD8D44FF9E6417BC0000
+    00130000000000000016AB6B17E8DA9D5AFFDC984AFFD5E4D8FFD3F9FFFFD3F6
+    F9FFD3F5F8FFD3F5F8FFD3F5F8FFD4F6F9FFD8FCFFFF868D8EFF828A8BFFDDFF
+    FFFFD6FAFDFFD3F6F9FFD3F5F8FFD3F5F8FFD3F5F8FFD3F5F8FFD3F5F8FFD3F5
+    F8FFD3F5F8FFD3F6F9FFD3F9FFFFD5E4D8FFDD994BFFDA9D5AFFAB6B17E80000
+    00160000000000000016B16E17FFE7AC6FFFDA9441FFD0FFFFFFD1F7FCFFD2F5
+    F9FFD2F5F9FFD2F5F9FFD1F4F8FFD2F5F9FFD6FBFFFF899190FF4F4745FF7C88
+    88FFDDFFFFFFD5F9FDFFD2F5F9FFD1F4F8FFD1F4F8FFD1F4F8FFD1F4F8FFD2F5
+    F9FFD2F5F9FFD2F5F9FFD1F7FCFFD0FFFFFFDA9341FFE7AC6FFFB16E17FF0000
+    00160000000000000016B06E16FFE8AE72FFD9923EFFCDFBFFFFCFF5FCFFD2F7
+    FCFFD3F8FDFFD2F7FCFFD0F4F9FFCEF3F8FFD1F5FAFFD7FFFFFF848E8EFF433D
+    3BFF748080FFDAFFFFFFD1F6FBFFCEF2F7FFCEF2F7FFCEF2F7FFD0F4F9FFD2F7
+    FCFFD3F8FDFFD2F7FCFFCFF5FCFFCDFBFFFFD9923EFFE8AE72FFB06E16FF0000
+    00160000000000000016B06D16FFE9B076FFD9903DFFCBFAFFFFCFF6FCFF8390
+    91FF859394FF839091FFCFF4FAFFCCF1F7FFCDF2F7FFD0F6FCFFDAFFFFFF818B
+    8DFF373131FF6E787AFFD3FAFFFFCDF2F7FFCCF1F6FFCCF1F6FFCFF4FAFF8390
+    91FF859394FF839091FFCFF6FCFFCBFAFFFFD9903DFFE9B076FFB06D16FF0000
+    00160000000000000016B06D16FFEBB279FFD78E3BFFD0FDFFFFCAF3FAFFCDF5
+    FAFFCEF6FBFFCDF5FAFFCAF2F7FFC9F0F5FFC9F1F6FFCDF6FBFFD7FFFFFF7987
+    89FF3C3434FF707B7DFFCFF9FEFFCAF1F6FFC9F0F5FFC9F0F5FFCAF2F7FFCDF5
+    FAFFCEF6FBFFCDF5FAFFCAF3FAFFD0FDFFFFD78E3BFFEBB279FFB06D16FF0000
+    00160000000000000013B06D16FFEDB77EFFD68D3AFFCFFCFFFFC6F1F7FFC8F0
+    F5FFC8F0F5FFC8F0F5FFC7EFF4FFC8F0F5FFCAF4F9FFD2FDFFFF788485FF4138
+    38FF778385FFD2FEFFFFCAF3F8FFC7EFF4FFC7EFF4FFC7EFF4FFC7EFF4FFC8F0
+    F5FFC8F0F5FFC8F0F5FFC6F1F7FFCFFCFFFFD68D3AFFEDB77EFFB06D16FF0000
+    0013000000000000000EAC6B16E6E3AA6CFFDA9344FFD0FBFFFFC4EFF8FFC5ED
+    F5FFC5EDF5FFC5EDF4FFC6EEF5FFC8F1F9FFCFFBFFFF7B8688FF483F3DFF7A86
+    88FFD0FCFFFFC9F2F9FFC6EEF5FFC5EDF4FFC5EDF4FFC5EDF4FFC5EDF4FFC5ED
+    F4FFC5EDF5FFC5EDF5FFC4EFF8FFD0FBFFFFDA9344FFE3AA6CFFAC6B16E60000
+    000E0000000000000007A66917B3D49954FFE19E58FFD2D5C4FFC1F0FBFFC3EE
+    F6FFC4EFF6FFC4EEF6FFC5F1F8FFCBF9FFFF7E8A8BFF4E4643FF7D898BFFCCFA
+    FFFFC5F1F8FFC2EDF4FFC2ECF3FFC2ECF3FFC2ECF3FFC2ECF3FFC2ECF3FFC3EE
+    F5FFC4EFF6FFC3EEF6FFC1F0FBFFD2D5C4FFE19E58FFD49954FFA66917B30000
+    00070000000000000001945E1656BC7B2AFFF0B67BFFCFB082FFC4F0FFFFC2F0
+    F8FF758385FFC5F1F9FFC8F8FFFF808D8FFF554C4AFF808D8EFFC9F9FFFFC3F0
+    F7FFC1EDF4FFC0EBF2FFC0EBF2FFC0EBF2FFC0EBF2FFC0EBF2FFC0EBF3FFC2EE
+    F5FF758385FFC2F0F8FFC4F0FFFFCFB082FFF0B67BFFBC7B2AFF945E16560000
+    0001000000000000000000000009AF6D16F7E4AB6DFFE09B51FFC4D9D8FFBFEC
+    F9FFBFEFF7FFC2F2FAFF828E8EFF5C524FFF849092FFC6F7FFFFC0EFF6FFBFED
+    F4FFC0EEF5FFBFECF3FFBDEAF1FFBDEAF1FFBDEAF1FFBDEBF1FFBDEBF2FFBEEC
+    F3FFBFEFF6FFBFECF9FFC4D9D8FFE09B51FFE4AB6DFFAF6D16F7000000090000
+    00000000000000000000000000029D621766C18133FFF2BA83FFD19B5AFFB9E4
+    FAFFBBEBF6FFC0F1FAFF838F8FFF869394FFC4F7FFFFBEEDF6FFBCEBF3FFBFEE
+    F7FF728386FFBFEEF7FFBCEAF2FFBBE9F1FFBDEBF3FFBDECF5FFBDEBF3FFBBEB
+    F4FFBBEAF5FFB9E4FAFFD19B5AFFF2BA82FFC18133FF9D621767000000020000
+    000000000000000000000000000000000006AF6D17E7D99F5BFFEAAD6CFFC6A6
+    7AFFB1DEF5FFB8E7F4FFBEF2FDFF718588FFBDEEF7FFB9E8F2FFB9E8F2FFBDED
+    F7FF718487FFBDEDF7FFB9E8F2FFB8E8F1FFBBEBF4FF6D7E81FFBBEDF6FFB6E4
+    F1FFB0DEF5FFC6A67AFFEDB071FFD99F5BFFAF6D17E700000006000000000000
+    0000000000000000000000000000000000018E5A1527AF6C14FFEEB880FFEBAE
+    6DFFC69E6BFFACD3E6FFAFDDF1FFB7E8F5FFB8EBF4FFB7E8F1FFB7E8F1FFBBEC
+    F5FF6E8082FFBBECF5FFB7E8F1FFB7E8F1FFB8EBF4FFB6E7F4FFAEDDF0FFACD3
+    E6FFC59E6AFFEBAE6DFFEEB880FFAF6C14FF6E45111200000000000000000000
+    000000000000000000000000000000000000000000019D621738B4721CFFEFBA
+    83FFEDB172FFCF914CFFB5B6A7FFA2D2EEFFA6D3E9FFAADAEAFFAFE0EEFFB2E4
+    F0FFB3E5F2FFB2E4F0FFAFE0EEFFAADAEAFFA6D3E9FFA2D2EEFFB5B6A7FFCF91
+    4CFFF0B578FFEFBA82FFB4721CFF8F5A15230000000100000000000000000000
+    0000000000000000000000000000000000000000000000000001935C1522AF6C
+    14FFDCA362FFF9C692FFE39F57FFCA8B44FFB2AE99FFA4BFC8FF99CDECFF9ACC
+    EBFF9ACCEBFF9ACCEBFF99CDECFFA4BFC8FFB2AE99FFCA8B44FFE39F57FFF9C6
+    92FFDBA362FFAF6C13FF945D1623000000010000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000007046
+    1110AF6C16E6C38437FFEDB880FFFCC996FFE6A561FFDA9043FFD0822DFFD182
+    2CFFD1822CFFD1822CFFD0822DFFDA9043FFE6A561FFFCC996FFEDB880FFC384
+    37FFAF6C16E67046111000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000002A769175FAF6D15F7BE7F2EFFDEA767FFF2C18DFFFFD5A9FFFFD5
+    A8FFFFD5A8FFFFD5A8FFFFD5A9FFF2C18DFFDEA767FFBE7F2EFFAF6D15F7A769
+    175F000000020000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000001A769184CAC6B16ACAF6C15E2AF6B13FFAF6B
+    13FFAF6B13FFAF6B13FFAF6B13FFAF6C15E2AC6B16ACA769184C000000010000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000FFFFFFFFFFC001FFFF00007FFE00003FF800000FF0000007F0000007E000
+    0003C0000001C000000180000000800000008000000080000000800000008000
+    000080000000800000008000000080000000800000008000000080000000C000
+    0001C0000001E0000003E0000007F0000007F800000FFE00003FFF00007FFFC0
+    01FF280000001000000020000000010020000000000000040000640000006400
+    0000000000000000000000000000000000000000000000000000000000000000
+    0002000000080000000B0000000B0000000A0000000500000000000000000000
+    0000000000000000000000000000000000000000000000000002000000121910
+    043C50330C8759380CA059380CA157360C9A4028096500000020000000070000
+    0000000000000000000000000000000000000000000206040122764B13ABC27F
+    2FFED18F42FFD9974AFFD99749FFD79547FFCA883AFFAA6D23E0311F07620000
+    000C000000000000000000000000000000020F0902259D6521D5D59347FFE1C5
+    95FFE4EEE0FFE7FFFFFFE7FFFFFFE6FAF7FFE3DCBEFFDDA765FFC88639FF4B2F
+    0B720000000A000000000000000000000012915D1CCBD9994FFFE0E4D0FFCFE6
+    E6FFE1FDFEFFE3FDFEFFBFD0D0FFE1FCFDFFCFE6E6FFE1FCFAFFDEB67EFFC988
+    3BFF321F075A00000003000000024B2F0B6DD29147FFDCD6B7FFDCFCFEFFDCFA
+    FCFFDBF9FBFFDDFBFCFFCBE4E6FFDBF9FBFFDCFAFCFFDCFAFCFFDCFAFAFFDCA8
+    67FFAF7228DE0000001000000008A66D24C9DCA868FFD7FBFEFFC5E0E3FFD7F6
+    F9FFD9F9FCFFD9F9FCFFD7F7FAFFD7F6F9FFD7F6F9FFD7F7FAFFC5E1E4FFD8D6
+    BBFFD19147FF452B0A520000000BC7883DF9D6C398FFD2F6FBFFD2F5F8FFD2F5
+    F8FFAFC5C7FF8A9695FFD6FAFCFFD2F4F8FFD2F4F8FFD2F4F8FFD2F5F8FFD2F4
+    F4FFDE9D55FF57360B850000000BCC8E45FFD2C59EFFBCDCE1FFABC4C7FFCEF3
+    F8FFD1F7FBFF889595FF7C8A8AFFCFF5FAFFCDF1F6FFBDDBE0FFABC4C7FFCDF8
+    FDFFE0A058FF58360B8A0000000ACE9048FFD3C59CFFC9F2F8FFCAF2F7FFC8F0
+    F5FFCCF6FAFF829091FF7D8C8DFFCAF3F8FFC8EFF4FFC9F1F6FFCAF2F7FFCBF7
+    FBFFE1A15BFF58360B8A00000005C2853BE6D7C097FFC3EEF7FFC4EDF5FFC7F2
+    F9FF859495FF829293FFC8F3F9FFC3ECF3FFC3ECF3FFC3EDF4FFC4EDF5FFC9EB
+    EDFFDC9D57FF54350B6C000000007F511595E0AB6EFFC2E9F2FFAED5DBFF8999
+    9AFF87989AFFC2F1F8FFC0ECF3FFBEEAF1FFBEEAF1FFBFECF3FFADD3DBFFCDC5
+    AAFFCF924AFD311F0718000000003420071CCE914AF9CEB48EFFB9E8F6FF8EA6
+    AAFFBEEEF7FFBCEBF4FF97B8BEFFBAE8F1FFA8D0D7FFBAE9F3FFBAD4D7FFE2A9
+    6AFF83541895000000000000000000000000764A1058DFA463FFCBAC83FFAFD3
+    DEFFAFE0EEFFB4E6F1FFA3CDD6FFB1E2EEFFADDDEFFFB7BDB2FFE3AE74FFB87C
+    31C83722080500000000000000000000000000000000905A134CD19650F9E5AA
+    6CFFC5A881FFB5A78CFFB5A78BFFB9A789FFD7A975FFE3A868FFAA7027BD4A2E
+    0B0900000000000000000000000000000000000000000000000053340B188555
+    1691CA8F47E3D7A05DFFD7A05DFFD39B57F8BB7E30BE72470E56000000000000
+    00000000000000000000F81F0000E0070000C003000080010000800000000000
+    00000000FFFF0000FFFF0000FFFF0000F1F10000B7B78000959580019393C001
+    9393E0039393F00F9696
+  }
+  Position = poDesktopCenter
+  LCLVersion = '2.0.10.0'
+  object Button1: TButton
+    Left = 40
+    Height = 26
+    Top = 88
+    Width = 88
+    Caption = 'Ok'
+    OnClick = Button1Click
+    TabOrder = 0
+  end
+  object Label1: TLabel
+    Left = 72
+    Height = 15
+    Top = 41
+    Width = 53
+    Caption = 'Time''s Up'
+    ParentColor = False
+  end
+  object Image1: TImage
+    Left = 24
+    Height = 32
+    Top = 33
+    Width = 32
+    Picture.Data = {
+      055449636F6E662300000000010004002020000001000800A808000046000000
+      101000000100080068050000EE0800002020000001002000A8100000560E0000
+      101000000100200068040000FE1E000028000000200000004000000001000800
+      0000000000000000000000000000000000000000000000000000000037313100
+      3C34340041383800433D3B00483F3D004E4643004F474500554C4A005C524F00
+      6E787A00707B7D00AF6B1300AF6C1300AF6C1400B06D1600B16F1800B2701900
+      B1711D00B4711C00B7752100BA772400B9782500B1762A00B2782B00B5792C00
+      BC7A2900B87C2F00BE7F2E00D0822C00C1813300C4803200C3843700C6843600
+      CB883B00C9883C00CC883C00D68D3A00D9913D00B1864D00B78C5300B39C7E00
+      CA8B4400CD8D4400D18D4200D18F4700CF914C00DA914200DA944100DA934400
+      D2914900D5914900D3934D00D9974E00DD994900DB9B4D00DC9B4D00DD9C4E00
+      C0955C00D4995400DB9A5100DC9D5100DF9E5500D19B5A00D99E5A00DC9C5900
+      E09E4D00E09B5100E39F5700E19E5800DEA15500E2A25100E1A75A00E0A15E00
+      C79B6100C59E6A00DBA36200DCA36200DEA76700C6A67A00E6A56100E3AA6C00
+      E4AB6D00E7AC6F00EAAD6C00E8AE7200EDB07100E9B07600EBB27900EDB77E00
+      F0B57A006D7E81006E8082007480800072838600758385007184870078848500
+      718588007A8688007D898A00828A8B00818B8D00818D8E00858D8E0083909100
+      8490920085939400899190008E979800949D9C00BDA58700B2AE990099A2A100
+      B5B6A700CFB08200EEB88000F2BA8200D8C59C00F2C18D00F9C69200FCC99600
+      DCCFAB00E3CEA300FFD5A800E2D3B000A4BFC8009ACCEB0099CDEC00ACD3E600
+      A6D3E900A2D2EE00AADAEA00AEDDF000B0DEF500AFE0EE00B2E4F000B6E4F100
+      B6E7F400B8E7F400B7E8F100B7E8F500B9E8F100BCEAF100BEECF300BAEAF400
+      BBECF500BEEDF600B9E4FA00BFECF900BEF2FD00D2D5C400C4D9D800D5E4D800
+      DEF1EB00C0EBF200C2ECF300C1EDF500C5EDF400C4EFF800C3F0F700C6F1F700
+      C8F0F500CDF1F600C1F0F900C5F1F800C4F0FF00C5F7FF00C9F2F900CEF3F800
+      CAF4F900CDF5FA00CFF5FC00CAF9FF00CDFAFE00CFFCFF00D2F4F800D5F6F900
+      D1F6FC00D8F7FA00D7F8FB00D2F9FE00D6F9FD00D0FDFF00D6FEFF00D9F8FB00
+      DDFAFB00D9F9FC00DDFAFC00DAFDFF00DDFDFE00E7EEE000E2F3EC00E1FEFE00
+      E5FFFF00E9FFFF0090006200B0007800CF008E00F000A400FF11B300FF31BE00
+      FF51C700FF71D100FF91DC00FFB1E500FFD1F000FFFFFF00000000002C002F00
+      4B0050006900700087009000A500B000C400CF00E100F000F011FF00F231FF00
+      F451FF00F671FF00F791FF00F9B1FF00FBD1FF00FFFFFF00000000001B002F00
+      2D0050003F007000520090006300B0007600CF008800F0009911FF00A631FF00
+      B451FF00C271FF00CF91FF00DCB1FF00EBD1FF00FFFFFF000000000008002F00
+      0E005000150070001B0090002100B0002600CF002C00F0003E11FF005831FF00
+      7151FF008C71FF00A691FF00BFB1FF00DAD1FF00FFFFFF000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000027181111131112182700000000000000000000000000000000000000
+      002912141F242C2C2C2C2C241F14122900000000000000000000000000000000
+      1715243338394747474747393733241517000000000000000000000000000011
+      213339487BBFC3C3C3C3C3BF7B48393321110000000000000000000000001332
+      35427DC2C2C2C2C2C3C2C2C2C2C27D423532130000000000000000000011323C
+      46C0C2C2C2C1C2C271C2C2C1C2C2C2C0463C3211000000000000000017233D46
+      C1C1C16EC1BCC1C271C2C1BCC16EC1C1C1463D23180000000000006F1A41369A
+      BEBEBEC1C1BCBCC16EC2BCBABEC1BEBEBE9A36411A6F000000000012343D7ABE
+      BEBCBBB9B9B9BBBCBEBCB9B9B9BBB9BCBEBD7A3D3412000000000016493DBDBD
+      6DBDB3B3B9B9B9B4B9B3B3B3B3B3B3BD6DBDBD3D491600000000282B3E76B8B6
+      BBB4B1B1BBBDBEBDB3B1B1B1B3B1B1B4BBB6B8763E2B2800000018403699B5B1
+      B1B1B0B1BD6865BEB6B1B0B0B0B1B1B1B0B1B599364018000000105330B7B5B0
+      B2B0B0B0B86C0764BEB6B1B0B0B0B0B0B0B0B2B7305310000000105526AFACB2
+      B6B2B0A9B2B868045DBDB2A9A9A9B0B2B5B5ACAE30550F0000000F5726AEAC6A
+      6B69ACA3A9B2BD67010AB5A9A3A3AB696B69B2AD26570F0000000F5825B7AAAB
+      ACABA8A2A8ABB863020BB5A2A2A2A8ABABABAAB725580F0000000F5925AFA1A2
+      A2A2A2A2AAB7610361B7AAA2A2A2A2A2A2A2A1AF25590F000000195231AF9F9E
+      9E9EA2A8AF630563B7A8A29E9E9E9E9E9E9EA5AF3152190000003A3B4597969F
+      A09FA5AD640664AEA59D9C9C9E9C9CA0A0A0A497453B3A000000001A5A73A6A0
+      5FA5AD670867ADA09D9B9C9B9B9B9BA05FA0A6735A1A00000000001252439895
+      A4A469096AA7A0909D908F8F8F8F90909395984352120000000000001E753F94
+      92A4696BA79390955E958F8F9093909292943F751E000000000000001940544F
+      868B966293918E9362938B8C915B9289864F56401900000000000000000E7454
+      4B81858D918C8C925C928C8C918A85814B54740E000000000000000000001375
+      562E728382848788898887848283722E5A74130000000000000000000000000E
+      4D78442A707E807F7F7F807E702A44784C0D0000000000000000000000000000
+      19207479502F1D1D1D1D1D2F5079742019000000000000000000000000000000
+      0000121C4E777C7C7C7C7C774E1C120000000000000000000000000000000000
+      000000004A1B0C0C0C0C0C1B4A0000000000000000000000FFFFFFFFFFFFFFFF
+      FFFFFFFFFFF007FFFF8000FFFF00007FFE00003FFC00001FF800000FF0000007
+      E0000003E0000003E0000003C0000001C0000001C0000001C0000001C0000001
+      C0000001C0000001C0000001C0000001E0000003E0000003F0000007F0000007
+      F800000FFC00001FFE00003FFF00007FFFC001FFFFF007FF2800000010000000
+      2000000001000800000000000000000000000000000000000000000000000000
+      00000000B47E3D00C27F2F00AD7E4500A77E4A00C8863900C9883A00B9844300
+      B88B52009681650099856C00A3866000A4927A00A2937E00A7967F00B4997600
+      B69B7800B99E7A00C88A4100CC8E4500D18F4200C7904E00CE914900CF934E00
+      D1914700D5934700D7954700D9974900D9994F00C0955E00C7985D00CF9B5B00
+      D2985400DD9D5600D49D5B00D7A05D00E0A05900CC9E6400DFA46300DDA76500
+      DCA86700DCA86800D7A97500DEB67E00E2A86900E0AB6E00E5AA6C00E3AE7400
+      7C8A8A007D8C8D0082919200859495008995950087989A0089999A00B5A78B00
+      B5A78C00B9A789008EA6AA0097B8BE00B7BDB200C5A88100CBAC8300CEB48E00
+      D7C09700D6C39800D2C59D00E1C59500CDC5AA00DCD6B700D8D6BB00E3DCBE00
+      ABC4C700AFC5C700A3CDD600A8D0D700ADD3DB00AED5DB00AFD3DE00BFD0D000
+      BAD4D700ADDDEF00BDDBE000BCDCE100AFE0EE00B1E2EE00B4E6F100BAE8F200
+      BEEAF100BFECF300B9E8F600BCEBF400BEEEF700E0E4D000C5E0E300C5E1E400
+      CBE4E600CFE6E600C9EBED00C2E9F200C2ECF300C3EDF500C4EDF500C8EFF400
+      C9F1F600CDF1F600C2F1F800C7F2F900C9F2F800CEF3F800CBF7FB00CDF5FA00
+      CDF8FD00D2F4F400D1F5F800D7F6F900D6FAFD00DBF9FB00DCFAFA00D9F9FC00
+      DCFAFC00DCFCFE00E4EEE000E6FAF700E1FCFA00E1FCFD00E7FFFF00FFFFFF00
+      000000002F26000050410000705B000090740000B08E0000CFA90000F0C30000
+      FFD21100FFD83100FFDD5100FFE47100FFEA9100FFF0B100FFF6D100FFFFFF00
+      000000002F1400005022000070300000903E0000B04D0000CF5B0000F0690000
+      FF791100FF8A3100FF9D5100FFAF7100FFC19100FFD2B100FFE5D100FFFFFF00
+      000000002F030000500400007006000090090000B00A0000CF0C0000F00E0000
+      FF201200FF3E3100FF5C5100FF7A7100FF979100FFB6B100FFD4D100FFFFFF00
+      000000002F000E00500017007000210090002B00B0003600CF004000F0004900
+      FF115A00FF317000FF518600FF719C00FF91B200FFB1C800FFD1DF00FFFFFF00
+      000000002F0020005000360070004C0090006200B0007800CF008E00F000A400
+      FF11B300FF31BE00FF51C700FF71D100FF91DC00FFB1E500FFD1F000FFFFFF00
+      000000002C002F004B0050006900700087009000A500B000C400CF00E100F000
+      F011FF00F231FF00F451FF00F671FF00F791FF00F9B1FF00FBD1FF00FFFFFF00
+      000000001B002F002D0050003F007000520090006300B0007600CF008800F000
+      9911FF00A631FF00B451FF00C271FF00CF91FF00DCB1FF00EBD1FF00FFFFFF00
+      0000000008002F000E005000150070001B0090002100B0002600CF002C00F000
+      3E11FF005831FF007151FF008C71FF00A691FF00BFB1FF00DAD1FF00FFFFFF00
+      000000000000000000000000000000000000000000000D09090A000000000000
+      000000000B02141B1B1A060100000000000000031A437A7E7E7B472705000000
+      0000041C5D617D7E4F7D617C2B06000000001845797875786076787876290700
+      000829745E737777777373775F4618000012417272724934747272727271210E
+      00134253486D7234306F69524870240C0016426C6C686F32316C67686C6E240C
+      00154065666B33326B64646666622100000F2D634D36356A595858594C441600
+      0000173F5A3A5C5B3B574B57502C1000000000263E4E54564A55513C2F1E0000
+      00000000202E3D3837392A2C1D0000000000000000111F232322250000000000
+      FFFF0000FC3F0000F00F0000E0070000C0030000C00100008001000080000000
+      80000000800000008001000080010000C0010000E0030000F0070000F81F0000
+      2800000020000000400000000100200000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000001000000070000000E00000013
+      0000001600000016000000160000001600000016000000130000000E00000007
+      0000000100000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000002000000090000001500000024000000320000003C
+      00000041000000430000004300000043000000410000003C0000003200000024
+      0000001500000009000000020000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000600000014000000280000003C6741107C996117C3AA6B19EA
+      B2701AFFB27019FFB27019FFB27019FFB2701AFFAA6B19EA996117C36741107C
+      0000003C00000028000000140000000600000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000001
+      000000070000001C000000377349128AB06F1AF9B77521FFC48032FFCB883BFF
+      D28D43FFD18D42FFD18D42FFD18D42FFD28D43FFCB883BFFC48032FFB77521FF
+      B06F1AF97349128A000000370000001C00000007000000010000000000000000
+      0000000000000000000000000000000000000000000000000000000100000008
+      0000001F19100446AB6C19EDBA7724FFCC883CFFD59048FFDB9B4DFFDD9C4EFF
+      E2A352FFE2A251FFE2A250FFE2A251FFE2A352FFDD9C4EFFDB9B4DFFD59048FF
+      CC883CFFBA7724FFAB6C19ED191004460000001F000000080000000100000000
+      000000000000000000000000000000000000000000000000000000070000001F
+      3D260956B26F19FFC68436FFD6934BFFDC9B4DFFE1A75AFFE3CEA3FFE7EEE0FF
+      E9FFFFFFE9FFFFFFE9FFFFFFE9FFFFFFE9FFFFFFE7EEE0FFE3CEA3FFE1A75AFF
+      DC9B4DFFD6934BFFC68436FFB26F19FF3D2609560000001F0000000700000000
+      0000000000000000000000000000000000000000000000060000001C3C260953
+      B4711CFFD18F47FFD9974EFFE09E4DFFE2D3B0FFE6FFFFFFE5FFFFFFE4FFFFFF
+      E4FFFFFFE6FFFFFFE7FFFFFFE6FFFFFFE4FFFFFFE4FFFFFFE5FFFFFFE6FFFFFF
+      E2D3B0FFE09E4DFFD9974EFFD18F47FFB4711CFF3C2609530000001C00000006
+      0000000000000000000000000000000000000002000000141E130541B16F18FF
+      D29149FFDB9950FFDFA256FFE2F3ECFFE4FFFFFFE5FFFFFFE3FFFFFFE2FDFEFF
+      E3FDFEFFE6FFFFFF99A1A1FFE6FFFFFFE3FDFEFFE2FDFEFFE3FFFFFFE5FFFFFF
+      E4FFFFFFE2F3ECFFDFA256FFDB9950FFD29149FFB16F18FF1E13054100000014
+      000000020000000000000000000000000000000900000028AC6C19ECC9883CFF
+      DB9B52FFDEA154FFE0FFFFFFE0FFFFFFE1FFFFFF959D9CFFE1FEFFFFDFFBFCFF
+      E0FCFDFFE4FFFFFF99A3A1FFE4FFFFFFE0FCFDFFDFFBFCFFE1FEFFFF959D9CFF
+      E1FFFFFFE0FFFFFFE0FFFFFFDEA154FFDB9B52FFC9883CFFAC6C19EC00000028
+      00000009000000000000000000000001000000157D4F1381BC7A28FFDC9C59FF
+      DE9A49FFDEF1EBFFDEFFFFFFDEFCFDFFDEFCFDFFDFFDFEFFDEFCFDFFDDFAFBFF
+      DEFBFCFFE1FFFFFF949E9EFFE1FFFFFFDEFBFCFFDDFAFBFFDEFCFDFFDFFDFEFF
+      DEFCFDFFDEFCFDFFDEFFFFFFDEF1EBFFDE9A49FFDC9C59FFBC7A28FF7D4F1381
+      0000001500000001000000000000000700000024B06E19F9D3934DFFDD9C50FF
+      DCCFABFFDBFFFFFFDCFCFFFFDBFAFDFFDAF8FCFFDAF8FCFFDAF8FBFFDAF8FBFF
+      DAF8FBFFDCFAFDFFDDFBFEFFDCFAFDFFDAF8FBFFDAF8FBFFDAF8FBFFDAF8FCFF
+      DAF8FCFFDBFAFDFFDCFCFFFFDBFFFFFFDCCFABFFDD9C50FFD3934DFFB06E19F9
+      0000002400000007000000000000000E774B136BB97825FFE0A15EFFDC9E52FF
+      D8FAFFFFDAFDFFFF8E9798FFDAFAFDFFD8F7FAFFD8F7FAFFD8F7FAFFD9F8FBFF
+      D9F8FBFFD8F8FBFFD8F8FBFFD8F7FAFFD8F7FAFFD8F7FAFFD8F7FAFFD8F7FAFF
+      D8F7FAFFDAFAFDFF8E9798FFDAFDFFFFD8FAFFFFDC9E52FFE0A15EFFB97825FF
+      774B136B0000000E00000000000000139E6417BCCD8D44FFDF9E55FFD8C59CFF
+      D6FDFFFFD7F9FDFFD8F9FCFFD7F8FBFFD6F6F9FFD6F6F9FFD8F9FCFFDBFDFFFF
+      DCFDFFFFD9FAFDFFD7F7FAFFD6F6F9FFD6F6F9FFD6F6F9FFD6F6F9FFD6F6F9FF
+      D6F6F9FFD7F8FBFFD8F9FCFFD7F9FDFFD6FDFFFFD8C59CFFDF9E55FFCD8D44FF
+      9E6417BC000000130000000000000016AB6B17E8DA9D5AFFDC984AFFD5E4D8FF
+      D3F9FFFFD3F6F9FFD3F5F8FFD3F5F8FFD3F5F8FFD4F6F9FFD8FCFFFF868D8EFF
+      828A8BFFDDFFFFFFD6FAFDFFD3F6F9FFD3F5F8FFD3F5F8FFD3F5F8FFD3F5F8FF
+      D3F5F8FFD3F5F8FFD3F5F8FFD3F6F9FFD3F9FFFFD5E4D8FFDD994BFFDA9D5AFF
+      AB6B17E8000000160000000000000016B16E17FFE7AC6FFFDA9441FFD0FFFFFF
+      D1F7FCFFD2F5F9FFD2F5F9FFD2F5F9FFD1F4F8FFD2F5F9FFD6FBFFFF899190FF
+      4F4745FF7C8888FFDDFFFFFFD5F9FDFFD2F5F9FFD1F4F8FFD1F4F8FFD1F4F8FF
+      D1F4F8FFD2F5F9FFD2F5F9FFD2F5F9FFD1F7FCFFD0FFFFFFDA9341FFE7AC6FFF
+      B16E17FF000000160000000000000016B06E16FFE8AE72FFD9923EFFCDFBFFFF
+      CFF5FCFFD2F7FCFFD3F8FDFFD2F7FCFFD0F4F9FFCEF3F8FFD1F5FAFFD7FFFFFF
+      848E8EFF433D3BFF748080FFDAFFFFFFD1F6FBFFCEF2F7FFCEF2F7FFCEF2F7FF
+      D0F4F9FFD2F7FCFFD3F8FDFFD2F7FCFFCFF5FCFFCDFBFFFFD9923EFFE8AE72FF
+      B06E16FF000000160000000000000016B06D16FFE9B076FFD9903DFFCBFAFFFF
+      CFF6FCFF839091FF859394FF839091FFCFF4FAFFCCF1F7FFCDF2F7FFD0F6FCFF
+      DAFFFFFF818B8DFF373131FF6E787AFFD3FAFFFFCDF2F7FFCCF1F6FFCCF1F6FF
+      CFF4FAFF839091FF859394FF839091FFCFF6FCFFCBFAFFFFD9903DFFE9B076FF
+      B06D16FF000000160000000000000016B06D16FFEBB279FFD78E3BFFD0FDFFFF
+      CAF3FAFFCDF5FAFFCEF6FBFFCDF5FAFFCAF2F7FFC9F0F5FFC9F1F6FFCDF6FBFF
+      D7FFFFFF798789FF3C3434FF707B7DFFCFF9FEFFCAF1F6FFC9F0F5FFC9F0F5FF
+      CAF2F7FFCDF5FAFFCEF6FBFFCDF5FAFFCAF3FAFFD0FDFFFFD78E3BFFEBB279FF
+      B06D16FF000000160000000000000013B06D16FFEDB77EFFD68D3AFFCFFCFFFF
+      C6F1F7FFC8F0F5FFC8F0F5FFC8F0F5FFC7EFF4FFC8F0F5FFCAF4F9FFD2FDFFFF
+      788485FF413838FF778385FFD2FEFFFFCAF3F8FFC7EFF4FFC7EFF4FFC7EFF4FF
+      C7EFF4FFC8F0F5FFC8F0F5FFC8F0F5FFC6F1F7FFCFFCFFFFD68D3AFFEDB77EFF
+      B06D16FF00000013000000000000000EAC6B16E6E3AA6CFFDA9344FFD0FBFFFF
+      C4EFF8FFC5EDF5FFC5EDF5FFC5EDF4FFC6EEF5FFC8F1F9FFCFFBFFFF7B8688FF
+      483F3DFF7A8688FFD0FCFFFFC9F2F9FFC6EEF5FFC5EDF4FFC5EDF4FFC5EDF4FF
+      C5EDF4FFC5EDF4FFC5EDF5FFC5EDF5FFC4EFF8FFD0FBFFFFDA9344FFE3AA6CFF
+      AC6B16E60000000E0000000000000007A66917B3D49954FFE19E58FFD2D5C4FF
+      C1F0FBFFC3EEF6FFC4EFF6FFC4EEF6FFC5F1F8FFCBF9FFFF7E8A8BFF4E4643FF
+      7D898BFFCCFAFFFFC5F1F8FFC2EDF4FFC2ECF3FFC2ECF3FFC2ECF3FFC2ECF3FF
+      C2ECF3FFC3EEF5FFC4EFF6FFC3EEF6FFC1F0FBFFD2D5C4FFE19E58FFD49954FF
+      A66917B3000000070000000000000001945E1656BC7B2AFFF0B67BFFCFB082FF
+      C4F0FFFFC2F0F8FF758385FFC5F1F9FFC8F8FFFF808D8FFF554C4AFF808D8EFF
+      C9F9FFFFC3F0F7FFC1EDF4FFC0EBF2FFC0EBF2FFC0EBF2FFC0EBF2FFC0EBF2FF
+      C0EBF3FFC2EEF5FF758385FFC2F0F8FFC4F0FFFFCFB082FFF0B67BFFBC7B2AFF
+      945E165600000001000000000000000000000009AF6D16F7E4AB6DFFE09B51FF
+      C4D9D8FFBFECF9FFBFEFF7FFC2F2FAFF828E8EFF5C524FFF849092FFC6F7FFFF
+      C0EFF6FFBFEDF4FFC0EEF5FFBFECF3FFBDEAF1FFBDEAF1FFBDEAF1FFBDEBF1FF
+      BDEBF2FFBEECF3FFBFEFF6FFBFECF9FFC4D9D8FFE09B51FFE4AB6DFFAF6D16F7
+      00000009000000000000000000000000000000029D621766C18133FFF2BA83FF
+      D19B5AFFB9E4FAFFBBEBF6FFC0F1FAFF838F8FFF869394FFC4F7FFFFBEEDF6FF
+      BCEBF3FFBFEEF7FF728386FFBFEEF7FFBCEAF2FFBBE9F1FFBDEBF3FFBDECF5FF
+      BDEBF3FFBBEBF4FFBBEAF5FFB9E4FAFFD19B5AFFF2BA82FFC18133FF9D621767
+      000000020000000000000000000000000000000000000006AF6D17E7D99F5BFF
+      EAAD6CFFC6A67AFFB1DEF5FFB8E7F4FFBEF2FDFF718588FFBDEEF7FFB9E8F2FF
+      B9E8F2FFBDEDF7FF718487FFBDEDF7FFB9E8F2FFB8E8F1FFBBEBF4FF6D7E81FF
+      BBEDF6FFB6E4F1FFB0DEF5FFC6A67AFFEDB071FFD99F5BFFAF6D17E700000006
+      0000000000000000000000000000000000000000000000018E5A1527AF6C14FF
+      EEB880FFEBAE6DFFC69E6BFFACD3E6FFAFDDF1FFB7E8F5FFB8EBF4FFB7E8F1FF
+      B7E8F1FFBBECF5FF6E8082FFBBECF5FFB7E8F1FFB7E8F1FFB8EBF4FFB6E7F4FF
+      AEDDF0FFACD3E6FFC59E6AFFEBAE6DFFEEB880FFAF6C14FF6E45111200000000
+      000000000000000000000000000000000000000000000000000000019D621738
+      B4721CFFEFBA83FFEDB172FFCF914CFFB5B6A7FFA2D2EEFFA6D3E9FFAADAEAFF
+      AFE0EEFFB2E4F0FFB3E5F2FFB2E4F0FFAFE0EEFFAADAEAFFA6D3E9FFA2D2EEFF
+      B5B6A7FFCF914CFFF0B578FFEFBA82FFB4721CFF8F5A15230000000100000000
+      0000000000000000000000000000000000000000000000000000000000000001
+      935C1522AF6C14FFDCA362FFF9C692FFE39F57FFCA8B44FFB2AE99FFA4BFC8FF
+      99CDECFF9ACCEBFF9ACCEBFF9ACCEBFF99CDECFFA4BFC8FFB2AE99FFCA8B44FF
+      E39F57FFF9C692FFDBA362FFAF6C13FF945D1623000000010000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000070461110AF6C16E6C38437FFEDB880FFFCC996FFE6A561FFDA9043FF
+      D0822DFFD1822CFFD1822CFFD1822CFFD0822DFFDA9043FFE6A561FFFCC996FF
+      EDB880FFC38437FFAF6C16E67046111000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000002A769175FAF6D15F7BE7F2EFFDEA767FFF2C18DFF
+      FFD5A9FFFFD5A8FFFFD5A8FFFFD5A8FFFFD5A9FFF2C18DFFDEA767FFBE7F2EFF
+      AF6D15F7A769175F000000020000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000001A769184CAC6B16ACAF6C15E2
+      AF6B13FFAF6B13FFAF6B13FFAF6B13FFAF6B13FFAF6C15E2AC6B16ACA769184C
+      0000000100000000000000000000000000000000000000000000000000000000
+      0000000000000000FFFFFFFFFFC001FFFF00007FFE00003FF800000FF0000007
+      F0000007E0000003C0000001C000000180000000800000008000000080000000
+      8000000080000000800000008000000080000000800000008000000080000000
+      80000000C0000001C0000001E0000003E0000007F0000007F800000FFE00003F
+      FF00007FFFC001FF280000001000000020000000010020000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000002000000080000000B0000000B0000000A0000000500000000
+      0000000000000000000000000000000000000000000000000000000000000002
+      000000121910043C50330C8759380CA059380CA157360C9A4028096500000020
+      0000000700000000000000000000000000000000000000000000000206040122
+      764B13ABC27F2FFED18F42FFD9974AFFD99749FFD79547FFCA883AFFAA6D23E0
+      311F07620000000C000000000000000000000000000000020F0902259D6521D5
+      D59347FFE1C595FFE4EEE0FFE7FFFFFFE7FFFFFFE6FAF7FFE3DCBEFFDDA765FF
+      C88639FF4B2F0B720000000A000000000000000000000012915D1CCBD9994FFF
+      E0E4D0FFCFE6E6FFE1FDFEFFE3FDFEFFBFD0D0FFE1FCFDFFCFE6E6FFE1FCFAFF
+      DEB67EFFC9883BFF321F075A00000003000000024B2F0B6DD29147FFDCD6B7FF
+      DCFCFEFFDCFAFCFFDBF9FBFFDDFBFCFFCBE4E6FFDBF9FBFFDCFAFCFFDCFAFCFF
+      DCFAFAFFDCA867FFAF7228DE0000001000000008A66D24C9DCA868FFD7FBFEFF
+      C5E0E3FFD7F6F9FFD9F9FCFFD9F9FCFFD7F7FAFFD7F6F9FFD7F6F9FFD7F7FAFF
+      C5E1E4FFD8D6BBFFD19147FF452B0A520000000BC7883DF9D6C398FFD2F6FBFF
+      D2F5F8FFD2F5F8FFAFC5C7FF8A9695FFD6FAFCFFD2F4F8FFD2F4F8FFD2F4F8FF
+      D2F5F8FFD2F4F4FFDE9D55FF57360B850000000BCC8E45FFD2C59EFFBCDCE1FF
+      ABC4C7FFCEF3F8FFD1F7FBFF889595FF7C8A8AFFCFF5FAFFCDF1F6FFBDDBE0FF
+      ABC4C7FFCDF8FDFFE0A058FF58360B8A0000000ACE9048FFD3C59CFFC9F2F8FF
+      CAF2F7FFC8F0F5FFCCF6FAFF829091FF7D8C8DFFCAF3F8FFC8EFF4FFC9F1F6FF
+      CAF2F7FFCBF7FBFFE1A15BFF58360B8A00000005C2853BE6D7C097FFC3EEF7FF
+      C4EDF5FFC7F2F9FF859495FF829293FFC8F3F9FFC3ECF3FFC3ECF3FFC3EDF4FF
+      C4EDF5FFC9EBEDFFDC9D57FF54350B6C000000007F511595E0AB6EFFC2E9F2FF
+      AED5DBFF89999AFF87989AFFC2F1F8FFC0ECF3FFBEEAF1FFBEEAF1FFBFECF3FF
+      ADD3DBFFCDC5AAFFCF924AFD311F0718000000003420071CCE914AF9CEB48EFF
+      B9E8F6FF8EA6AAFFBEEEF7FFBCEBF4FF97B8BEFFBAE8F1FFA8D0D7FFBAE9F3FF
+      BAD4D7FFE2A96AFF83541895000000000000000000000000764A1058DFA463FF
+      CBAC83FFAFD3DEFFAFE0EEFFB4E6F1FFA3CDD6FFB1E2EEFFADDDEFFFB7BDB2FF
+      E3AE74FFB87C31C83722080500000000000000000000000000000000905A134C
+      D19650F9E5AA6CFFC5A881FFB5A78CFFB5A78BFFB9A789FFD7A975FFE3A868FF
+      AA7027BD4A2E0B09000000000000000000000000000000000000000000000000
+      53340B1885551691CA8F47E3D7A05DFFD7A05DFFD39B57F8BB7E30BE72470E56
+      00000000000000000000000000000000F81FAC41E007AC41C003AC418001AC41
+      8000AC410000AC410000AC410000AC410000AC410000AC410000AC418000AC41
+      8001AC41C001AC41E003AC41F00FAC41
+    }
+  end
+end
diff --git a/msgbox.pas b/msgbox.pas
new file mode 100644
index 0000000..ab232d7
--- /dev/null
+++ b/msgbox.pas
@@ -0,0 +1,59 @@
+unit msgbox;
+
+{$mode objfpc}
+
+interface
+
+uses
+  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls,
+  ExtCtrls;
+
+type
+
+  { TMsgBoxForm }
+
+  TMsgBoxForm = class(TForm)
+    Button1: TButton;
+    Image1: TImage;
+    Label1: TLabel;
+    procedure Button1Click(Sender: TObject);
+  private
+
+  public
+    procedure SetText(Msg: String);
+  end;
+
+var
+  MsgBoxForm: TMsgBoxForm;
+
+implementation
+
+{ TMsgBoxForm }
+
+procedure TMsgBoxForm.Button1Click(Sender: TObject);
+begin
+  Close;
+end;
+
+procedure TMsgBoxForm.SetText(Msg: String);
+const MinFormSize = 162;
+      TextThresholdWidth = 68;
+      DefButtonLeft = 40;
+var TextW,Delta : Integer;
+begin
+  Label1.Caption:= Msg;
+  TextW:= Label1.Canvas.GetTextWidth(Msg);
+  if TextW > TextThresholdWidth then
+  begin
+    Delta:= TextW - TextThresholdWidth;
+    Width:= MinFormSize + Delta;
+    Button1.Left:= DefButtonLeft + Delta div 2;
+  end;
+end;
+
+initialization
+  //{$I msgbox.lrs}
+  {$R msgbox.lfm}
+
+end.
+