Examples/bidi: Fix layout issue due to overlapping controls.

git-svn-id: trunk@65315 -
2025-08-12 11:56:45 +02:00 · 2021-06-27 18:13:51 +00:00 · 2021-06-27 18:13:51 +00:00 · d15e04bfa8
commit d15e04bfa8
parent e5315cc4d3
3 changed files with 86 additions and 292 deletions
--- a/examples/bidi/project1.lpi
+++ b/examples/bidi/project1.lpi
@ -1,13 +1,13 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
  <ProjectOptions>
-    <Version Value="10"/>
+    <Version Value="12"/>
    <General>
      <Flags>
        <LRSInOutputDirectory Value="False"/>
+        <CompatibilityMode Value="True"/>
      </Flags>
      <SessionStorage Value="InIDEConfig"/>
-      <MainUnit Value="0"/>
      <ResourceType Value="res"/>
    </General>
    <BuildModes Count="1">
@ -15,14 +15,12 @@
    </BuildModes>
    <PublishOptions>
      <Version Value="2"/>
-      <IgnoreBinaries Value="False"/>
-      <IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>
-      <ExcludeFileFilter Value="*.(bak|ppu|ppw|o|so);*~;backup"/>
    </PublishOptions>
    <RunParams>
-      <local>
-        <FormatVersion Value="1"/>
-      </local>
+      <FormatVersion Value="2"/>
+      <Modes Count="1">
+        <Mode0 Name="default"/>
+      </Modes>
    </RunParams>
    <RequiredPackages Count="1">
      <Item1>
--- a/examples/bidi/project1.lpr
+++ b/examples/bidi/project1.lpr
@ -12,6 +12,7 @@ uses
  { add your units here }, unit1;

 begin
+  Application.Title:='';
  Application.Initialize;
  Application.BidiMode := bdRightToLeft;
  Application.CreateForm(TForm1, Form1);
--- a/examples/bidi/unit1.lfm
+++ b/examples/bidi/unit1.lfm
@ -4,14 +4,14 @@ object Form1: TForm1
  Top = 131
  Width = 687
  Caption = 'Form1'
-  ClientHeight = 350
+  ClientHeight = 353
  ClientWidth = 687
  Menu = MainMenu1
  OnCreate = FormCreate
-  LCLVersion = '1.9.0.0'
+  LCLVersion = '2.3.0.0'
  object PageControl1: TPageControl
    Left = 8
-    Height = 306
+    Height = 309
    Top = 40
    Width = 672
    ActivePage = TabSheet1
@ -20,7 +20,7 @@ object Form1: TForm1
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'Standard'
-      ClientHeight = 274
+      ClientHeight = 281
      ClientWidth = 664
      object Label1: TLabel
        Left = 13
@ -30,7 +30,6 @@ object Form1: TForm1
        AutoSize = False
        Caption = 'For test the RTL you must see the DOT in the left.'
        Color = clSkyBlue
-        ParentColor = False
        Transparent = False
      end
      object SpeedButton1: TSpeedButton
@ -78,17 +77,16 @@ object Form1: TForm1
        OnClick = SpeedButton1Click
      end
      object Label2: TLabel
-        Left = 494
-        Height = 17
+        Left = 528
+        Height = 15
        Top = 5
-        Width = 162
+        Width = 128
        Anchors = [akTop, akRight]
        Caption = 'Label Anchored to Right'
-        ParentColor = False
      end
      object Edit1: TEdit
        Left = 128
-        Height = 27
+        Height = 23
        Top = 161
        Width = 150
        TabOrder = 0
@ -114,15 +112,15 @@ object Form1: TForm1
          'Item2!'
          'Item3?'
        )
-        ItemHeight = 17
+        ItemHeight = 15
        TabOrder = 2
      end
      object ComboBox1: TComboBox
        Left = 284
-        Height = 27
+        Height = 23
        Top = 161
        Width = 167
-        ItemHeight = 17
+        ItemHeight = 15
        Items.Strings = (
          'Item1.'
          'Item2!'
@ -153,25 +151,25 @@ object Form1: TForm1
      end
      object CheckBox1: TCheckBox
        Left = 16
-        Height = 23
+        Height = 19
        Top = 88
-        Width = 88
+        Width = 66
        Caption = 'Check it!'
        TabOrder = 6
      end
      object RadioButton1: TRadioButton
        Left = 16
-        Height = 21
+        Height = 19
        Top = 111
-        Width = 87
+        Width = 69
        Caption = 'This one?'
        TabOrder = 7
      end
      object RadioButton2: TRadioButton
        Left = 16
-        Height = 21
+        Height = 19
        Top = 134
-        Width = 77
+        Width = 60
        Caption = 'Or this?'
        TabOrder = 8
      end
@ -239,14 +237,14 @@ object Form1: TForm1
        Top = 26
        Width = 185
        Caption = 'GroupBox1'
-        ClientHeight = 40
-        ClientWidth = 175
+        ClientHeight = 46
+        ClientWidth = 181
        TabOrder = 11
        object CheckBox2: TCheckBox
          Left = 15
-          Height = 23
+          Height = 19
          Top = 8
-          Width = 88
+          Width = 66
          Caption = 'Check it!'
          TabOrder = 0
        end
@ -262,9 +260,9 @@ object Form1: TForm1
      end
      object RadioGroup1: TRadioGroup
        Left = 460
-        Height = 185
+        Height = 73
        Top = 106
-        Width = 69
+        Width = 185
        AutoFill = True
        Caption = 'RadioGroup1'
        ChildSizing.LeftRightSpacing = 6
@ -275,8 +273,8 @@ object Form1: TForm1
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 2
-        ClientHeight = 163
-        ClientWidth = 59
+        ClientHeight = 53
+        ClientWidth = 181
        Columns = 2
        Items.Strings = (
          'One!'
@ -288,15 +286,14 @@ object Form1: TForm1
    end
    object TabSheet2: TTabSheet
      Caption = 'Owner Draw'
-      ClientHeight = 274
+      ClientHeight = 281
      ClientWidth = 664
      object Label3: TLabel
        Left = 16
-        Height = 17
+        Height = 15
        Top = 10
-        Width = 83
+        Width = 65
        Caption = 'Owner Draw'
-        ParentColor = False
      end
      object ColorListBox1: TColorListBox
        Left = 212
@ -308,7 +305,7 @@ object Form1: TForm1
      end
      object ColorBox1: TColorBox
        Left = 212
-        Height = 27
+        Height = 22
        Top = 9
        Width = 127
        ItemHeight = 16
@ -324,7 +321,7 @@ object Form1: TForm1
          'Check2'
          'Check3'
        )
-        ItemHeight = 23
+        ItemHeight = 17
        TabOrder = 2
        Data = {
          03000000000000
@ -346,7 +343,7 @@ object Form1: TForm1
      end
      object ComboBox2: TComboBox
        Left = 12
-        Height = 27
+        Height = 19
        Top = 77
        Width = 167
        ItemHeight = 13
@ -363,7 +360,7 @@ object Form1: TForm1
    end
    object TabSheet3: TTabSheet
      Caption = 'Grids'
-      ClientHeight = 274
+      ClientHeight = 281
      ClientWidth = 664
      object Shape2: TShape
        Left = 0
@ -449,14 +446,14 @@ object Form1: TForm1
    end
    object TabSheet4: TTabSheet
      Caption = 'Anchored'
-      ClientHeight = 274
+      ClientHeight = 281
      ClientWidth = 664
      object Button7: TButton
        AnchorSideLeft.Control = TabSheet4
        Left = 6
-        Height = 26
+        Height = 25
        Top = 23
-        Width = 194
+        Width = 164
        AutoSize = True
        BorderSpacing.Left = 6
        Caption = 'Left anchored to TabSheet'
@ -467,14 +464,13 @@ object Form1: TForm1
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = Button7
        AnchorSideTop.Side = asrCenter
-        Left = 206
-        Height = 17
+        Left = 176
+        Height = 15
        Top = 28
-        Width = 168
+        Width = 129
        BorderSpacing.Left = 6
        Caption = 'Letf anchored to button '
        Color = clWhite
-        ParentColor = False
        Transparent = False
      end
      object Label5: TLabel
@ -482,14 +478,13 @@ object Form1: TForm1
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = Label4
        AnchorSideTop.Side = asrCenter
-        Left = 380
-        Height = 17
+        Left = 311
+        Height = 15
        Top = 28
-        Width = 154
+        Width = 118
        BorderSpacing.Left = 6
        Caption = 'Left anchored to Label'
        Color = clLime
-        ParentColor = False
        Transparent = False
      end
      object Button9: TButton
@ -497,10 +492,10 @@ object Form1: TForm1
        AnchorSideLeft.Side = asrCenter
        AnchorSideTop.Control = TabSheet4
        AnchorSideTop.Side = asrCenter
-        Left = 226
-        Height = 26
-        Top = 124
-        Width = 213
+        Left = 243
+        Height = 25
+        Top = 128
+        Width = 179
        AutoSize = True
        Caption = 'Center anchored to TabSheet'
        TabOrder = 1
@ -508,10 +503,10 @@ object Form1: TForm1
      object Button8: TButton
        AnchorSideRight.Control = TabSheet4
        AnchorSideRight.Side = asrBottom
-        Left = 457
-        Height = 26
+        Left = 486
+        Height = 25
        Top = 80
-        Width = 201
+        Width = 172
        Anchors = [akTop, akRight]
        AutoSize = True
        BorderSpacing.Right = 6
@ -523,15 +518,14 @@ object Form1: TForm1
        AnchorSideTop.Control = Label6
        AnchorSideTop.Side = asrCenter
        AnchorSideRight.Control = Label6
-        Left = 109
-        Height = 17
+        Left = 211
+        Height = 15
        Top = 85
-        Width = 161
+        Width = 126
        Anchors = [akTop, akRight]
        BorderSpacing.Right = 6
        Caption = 'Right anchored to Label'
        Color = clLime
-        ParentColor = False
        Transparent = False
      end
      object Label6: TLabel
@ -539,15 +533,14 @@ object Form1: TForm1
        AnchorSideTop.Control = Button8
        AnchorSideTop.Side = asrCenter
        AnchorSideRight.Control = Button8
-        Left = 276
-        Height = 17
+        Left = 343
+        Height = 15
        Top = 85
-        Width = 175
+        Width = 137
        Anchors = [akTop, akRight]
        BorderSpacing.Right = 6
        Caption = 'Right anchored to button '
        Color = clWhite
-        ParentColor = False
        Transparent = False
      end
    end
@ -584,24 +577,22 @@ object Form1: TForm1
  end
  object FlipLabel: TLabel
    Left = 624
-    Height = 17
+    Height = 15
    Top = 12
-    Width = 45
+    Width = 34
    Caption = 'Native'
-    ParentColor = False
  end
  object Label8: TLabel
    Left = 536
-    Height = 17
+    Height = 15
    Top = 12
-    Width = 76
+    Width = 57
    Caption = 'Flip Status:'
-    ParentColor = False
  end
  object MainMenu1: TMainMenu
    Images = ImageList1
-    left = 222
-    top = 279
+    Left = 222
+    Top = 279
    object FileMnu: TMenuItem
      Caption = 'File'
      object NewMnu: TMenuItem
@ -621,42 +612,6 @@ object Form1: TForm1
      object MenuItem2: TMenuItem
        Caption = 'Undo'
        Checked = True
-        Bitmap.Data = {
-          36040000424D3604000000000000360000002800000010000000100000000100
-          2000000000000004000064000000640000000000000000000000FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
-          00FF000000FF000000FF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00006563FF9CFFFFFF00CFFFFF00CFFFFF00CFFFFF00CFFFFF009ACEFF00CF
-          FFFF009ACEFF009ACEFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00006563FF9CFFFFFF9CFFFFFF00CFFFFF00CFFFFF00CFFFFF00CFFFFF009A
-          CEFF00CFFFFF009ACEFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00006563FF9CFFFFFF00CFFFFF9CFFFFFF00CFFFFF00CFFFFF00CFFFFF00CF
-          FFFF009ACEFF009ACEFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00006563FF9CFFFFFFFFFFFFFF00CFFFFF9CFFFFFF00CFFFFF00CFFFFF00CF
-          FFFF00CFFFFF009ACEFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00006563FF9CFFFFFF00CFFFFFFFFFFFFF00CFFFFF9CFFFFFF00CFFFFF00CF
-          FFFF00CFFFFF009ACEFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00006563FF9CFFFFFF9CFFFFFF9CFFFFFF9CFFFFFF9CFFFFFF9CFFFFFF9CFF
-          FFFF9CFFFFFF9CFFFFFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00006563FF9CFFFFFF9CFFFFFF9CFFFFFF9CCFCEFF006563FF006563FF0065
-          63FF006563FF006563FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00006563FF006563FF006563FF006563FFFF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-        }
        ImageIndex = 1
      end
      object MenuItem3: TMenuItem
@ -670,42 +625,6 @@ object Form1: TForm1
      end
      object MenuItem6: TMenuItem
        Caption = 'Copy'
-        Bitmap.Data = {
-          36040000424D3604000000000000360000002800000010000000100000000100
-          2000000000000004000064000000640000000000000000000000FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00000000FF000000FF000000FF000000FF0000
-          00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00000000FF3434CBFF3434CBFF3434CBFF3434CBFF3434
-          CBFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00000000FF5C5CD6FF3434CBFF3434CBFF3434CBFF3434CBFF3434
-          CBFF3434CBFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00000000FF5C5CD6FF5C5CD6FF3434CBFF3434CBFF3434CBFF3434
-          CBFF3434CBFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00000000FF7474DCFF5C5CD6FF5C5CD6FF3434CBFF3434CBFF3434
-          CBFF3434CBFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00000000FF7474DCFF7474DCFF5C5CD6FF3434CBFF3434CBFF3434
-          CBFF3434CBFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00000000FF7474DCFF7474DCFF7474DCFF5C5CD6FF3434CBFF3434
-          CBFF3434CBFF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00000000FF7474DCFF7474DCFF7474DCFF5C5CD6FF5C5C
-          D6FF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00000000FF000000FF000000FF000000FF0000
-          00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-        }
        ImageIndex = 2
      end
      object MenuItem7: TMenuItem
@ -725,42 +644,6 @@ object Form1: TForm1
      Caption = 'Help'
      object MenuItem22: TMenuItem
        Caption = 'Contents'
-        Bitmap.Data = {
-          36040000424D3604000000000000360000002800000010000000100000000100
-          2000000000000004000064000000640000000000000000000000FF00F700FF00
-          F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F700000000FF000000FF000000FF000000FF000000FF000000FF0000
-          00FF000000FF000000FF000000FF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFE7E7EFFFE7E7EFFFE7E7EFFFCECF
-          CEFFCECFCEFFCECFCEFFCECFCEFF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFE7E7EFFFFFFFFFFFFFFFFFFFE7E7EFFFFFFF
-          FFFFE7E7EFFFD6D7DEFFCECFCEFF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7
-          EFFFFFFFFFFFE7E7EFFFCECFCEFF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7EFFFFFFFFFFFFFFF
-          FFFFE7E7EFFFFFFFFFFFE7E7EFFF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
-          FFFFFFFFFFFFE7E7EFFFE7E7EFFF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7
-          EFFFFFFFFFFFFFFFFFFFE7E7EFFF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
-          FFFFE7E7EFFFE7E7EFFFD6D7DEFF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
-          00FF000000FF000000FF000000FF000000FFFF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8486
-          8CFFFFFFFFFFFFFFFFFF000000FFFF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8486
-          8CFFFFFFFFFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8486
-          8CFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F70084868CFF84868CFF84868CFF84868CFF84868CFF84868CFF0000
-          00FFFF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-          F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700
-        }
        ImageIndex = 0
      end
      object MenuItem23: TMenuItem
@ -776,111 +659,22 @@ object Form1: TForm1
  end
  object ImageList1: TImageList
    Masked = True
-    left = 425
-    top = 273
+    Left = 425
+    Top = 273
    Bitmap = {
-      4C69030000001000000010000000FF00F700FF00F700FF00F700FF00F700FF00
-      F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-      F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F70084868CFF8486
-      8CFF84868CFF84868CFF84868CFF84868CFF000000FFFF00F700FF00F700FF00
-      F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF84868CFF000000FFFF00F700FF00
-      F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF84868CFFFFFFFFFF000000FFFF00
-      F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF84868CFFFFFFFFFFFFFFFFFF0000
-      00FFFF00F700FF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF000000FF000000FF0000
-      00FF000000FFFF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7EFFFE7E7EFFFD6D7
-      DEFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7EFFFFFFFFFFFFFFFFFFFE7E7
-      EFFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7EFFFE7E7
-      EFFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFE7E7EFFFFFFFFFFFFFFFFFFFE7E7EFFFFFFFFFFFE7E7
-      EFFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7EFFFFFFFFFFFE7E7EFFFCECF
-      CEFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFE7E7EFFFFFFFFFFFFFFFFFFFE7E7EFFFFFFFFFFFE7E7EFFFD6D7DEFFCECF
-      CEFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F70084868CFFFFFF
-      FFFFFFFFFFFFE7E7EFFFE7E7EFFFE7E7EFFFCECFCEFFCECFCEFFCECFCEFFCECF
-      CEFF000000FFFF00F700FF00F700FF00F700FF00F700FF00F700000000FF0000
-      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
-      00FF000000FFFF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-      F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-      F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-      F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00F700FF00
-      F700FF00F700FF00F700FF00F700FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00006563FF0065
-      63FF006563FF006563FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00006563FF9CFFFFFF9CFF
-      FFFF9CFFFFFF9CCFCEFF006563FF006563FF006563FF006563FF006563FFFF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00006563FF9CFFFFFF9CFF
-      FFFF9CFFFFFF9CFFFFFF9CFFFFFF9CFFFFFF9CFFFFFF9CFFFFFF9CFFFFFF0000
-      00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00006563FF9CFFFFFF00CF
-      FFFFFFFFFFFF00CFFFFF9CFFFFFF00CFFFFF00CFFFFF00CFFFFF009ACEFF0000
-      00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00006563FF9CFFFFFFFFFF
-      FFFF00CFFFFF9CFFFFFF00CFFFFF00CFFFFF00CFFFFF00CFFFFF009ACEFF0000
-      00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00006563FF9CFFFFFF00CF
-      FFFF9CFFFFFF00CFFFFF00CFFFFF00CFFFFF00CFFFFF009ACEFF009ACEFF0000
-      00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00006563FF9CFFFFFF9CFF
-      FFFF00CFFFFF00CFFFFF00CFFFFF00CFFFFF009ACEFF00CFFFFF009ACEFF0000
-      00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00006563FF9CFFFFFF00CF
-      FFFF00CFFFFF00CFFFFF00CFFFFF009ACEFF00CFFFFF009ACEFF009ACEFF0000
-      00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000000FF000000FF0000
-      00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
-      00FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00000000FF000000FF000000FF000000FF000000FFFF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
-      00FF7474DCFF7474DCFF7474DCFF5C5CD6FF5C5CD6FF000000FFFF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000000FF7474
-      DCFF7474DCFF7474DCFF5C5CD6FF3434CBFF3434CBFF3434CBFF000000FFFF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000000FF7474
-      DCFF7474DCFF5C5CD6FF3434CBFF3434CBFF3434CBFF3434CBFF000000FFFF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000000FF7474
-      DCFF5C5CD6FF5C5CD6FF3434CBFF3434CBFF3434CBFF3434CBFF000000FFFF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000000FF5C5C
-      D6FF5C5CD6FF3434CBFF3434CBFF3434CBFF3434CBFF3434CBFF000000FFFF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000000FF5C5C
-      D6FF3434CBFF3434CBFF3434CBFF3434CBFF3434CBFF3434CBFF000000FFFF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
-      00FF3434CBFF3434CBFF3434CBFF3434CBFF3434CBFF000000FFFF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00000000FF000000FF000000FF000000FF000000FFFF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
-      FF00FF00FF00FF00FF00FF00FF00
+      4C7A030000001000000010000000E20000000000000078DAEDD4C10E82300C06
+      E03E148FC3CDF8063C82F1E41318DFC864DCF062BC72F4E8B15A94A599EBD68E
+      9DD02D7F02095F0B3480F000AC94DDFE80B100006A7D6C696BA43CAD5C8D9CCF
+      D5903C9930164F6B1CEF5386CBCDECC9F1E392FEFC1EB43EEC5BDA9F5BD7BBAC
+      97FAD2BBD378FEAC734F1EC9C7E62C052B7E77CBB29E0DDB0DF258EDE935771F
+      9A73502F55F3CB0B79CF5EF6D07FFE193DFA739FA3CB7AD12A7DD22ABC680DFD
+      459BF2A66FEFBFD7BC97CC9CAEEDBAAB4FDB0E53343562B669CE3EB91ADC87D6
+      E2E77B2EF192B5F898D5F8B946A9AD31FF5FDB4FCCACAE2C
    }
  end
  object ApplicationProperties1: TApplicationProperties
-    left = 476
-    top = 257
+    Left = 120
+    Top = 279
  end
  object TrayIcon1: TTrayIcon
    Icon.Data = {
@ -923,8 +717,8 @@ object Form1: TForm1
      0000
    }
    Visible = True
-    left = 370
-    top = 253
+    Left = 370
+    Top = 253
  end
  object PopupNotifier1: TPopupNotifier
    Color = 14483455
@ -935,13 +729,14 @@ object Form1: TForm1
    }
    Text = 'Text'
    Title = 'Caption'
+    TitleFont.Style = [fsBold]
    Visible = False
-    left = 274
-    top = 253
+    Left = 274
+    Top = 253
  end
  object PopupMenu1: TPopupMenu
-    left = 323
-    top = 273
+    Left = 323
+    Top = 273
    object MenuItem26: TMenuItem
      Caption = 'File'
    end