1object ColorsFrm: TColorsFrm 2 Left = 549 3 Height = 194 4 Top = 321 5 Width = 372 6 BorderIcons = [biSystemMenu] 7 BorderStyle = bsDialog 8 Caption = 'Colors' 9 ClientHeight = 194 10 ClientWidth = 372 11 OnCreate = FormCreate 12 Position = poOwnerFormCenter 13 LCLVersion = '1.9.0.0' 14 object lbName: TLabel 15 AnchorSideLeft.Control = Owner 16 AnchorSideTop.Control = Owner 17 Left = 85 18 Height = 15 19 Top = 25 20 Width = 32 21 BorderSpacing.Left = 85 22 BorderSpacing.Top = 25 23 Caption = 'Name' 24 ParentColor = False 25 end 26 object lbDescription: TLabel 27 AnchorSideLeft.Control = lbName 28 AnchorSideTop.Control = lbName 29 AnchorSideTop.Side = asrBottom 30 Left = 85 31 Height = 15 32 Top = 60 33 Width = 60 34 BorderSpacing.Top = 20 35 Caption = 'Description' 36 ParentColor = False 37 end 38 object lbLicense: TLabel 39 AnchorSideLeft.Control = lbName 40 AnchorSideTop.Control = lbDescription 41 AnchorSideTop.Side = asrBottom 42 Left = 85 43 Height = 15 44 Top = 95 45 Width = 39 46 BorderSpacing.Top = 20 47 Caption = 'License' 48 ParentColor = False 49 end 50 object shName: TShape 51 AnchorSideLeft.Control = lbName 52 AnchorSideLeft.Side = asrBottom 53 AnchorSideTop.Control = lbName 54 AnchorSideTop.Side = asrCenter 55 Left = 167 56 Height = 27 57 Top = 19 58 Width = 76 59 BorderSpacing.Left = 50 60 OnMouseUp = shNameMouseUp 61 end 62 object shDescription: TShape 63 Tag = 1 64 AnchorSideLeft.Control = lbName 65 AnchorSideLeft.Side = asrBottom 66 AnchorSideTop.Control = lbDescription 67 AnchorSideTop.Side = asrCenter 68 Left = 167 69 Height = 27 70 Top = 54 71 Width = 76 72 BorderSpacing.Left = 50 73 OnMouseDown = shNameMouseUp 74 end 75 object shLicense: TShape 76 Tag = 2 77 AnchorSideLeft.Control = lbName 78 AnchorSideLeft.Side = asrBottom 79 AnchorSideTop.Control = lbLicense 80 AnchorSideTop.Side = asrCenter 81 Left = 167 82 Height = 27 83 Top = 89 84 Width = 76 85 BorderSpacing.Left = 50 86 OnMouseDown = shNameMouseUp 87 end 88 object bp: TButtonPanel 89 Left = 6 90 Height = 34 91 Top = 154 92 Width = 360 93 OKButton.Name = 'OKButton' 94 OKButton.DefaultCaption = True 95 HelpButton.Name = 'HelpButton' 96 HelpButton.Caption = '&Restore defaults' 97 HelpButton.DefaultCaption = False 98 HelpButton.OnClick = HelpButtonClick 99 CloseButton.Name = 'CloseButton' 100 CloseButton.DefaultCaption = True 101 CancelButton.Name = 'CancelButton' 102 CancelButton.DefaultCaption = True 103 TabOrder = 0 104 ShowButtons = [pbOK, pbCancel, pbHelp] 105 end 106 object CD: TColorDialog 107 Color = clBlack 108 CustomColors.Strings = ( 109 'ColorA=000000' 110 'ColorB=000080' 111 'ColorC=008000' 112 'ColorD=008080' 113 'ColorE=800000' 114 'ColorF=800080' 115 'ColorG=808000' 116 'ColorH=808080' 117 'ColorI=C0C0C0' 118 'ColorJ=0000FF' 119 'ColorK=00FF00' 120 'ColorL=00FFFF' 121 'ColorM=FF0000' 122 'ColorN=FF00FF' 123 'ColorO=FFFF00' 124 'ColorP=FFFFFF' 125 'ColorQ=C0DCC0' 126 'ColorR=F0CAA6' 127 'ColorS=F0FBFF' 128 'ColorT=A4A0A0' 129 ) 130 left = 8 131 top = 112 132 end 133end 134