object Label3dEditDlg: TLabel3dEditDlg Left = 171 Top = -5 Width = 610 Height = 404 HelpContext = 10 ActiveControl = OkButton Caption = 'Label 3d Editor' Font.Color = clWindowText Font.Height = -10 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object PreviewBevel: TBevel Left = 8 Top = 8 Width = 481 Height = 121 Shape = bsFrame end object PreviewTextLabel: TLabel Left = 8 Top = 144 Width = 49 Height = 13 Alignment = taRightJustify AutoSize = False Caption = 'Text:' end object FontColorBevel: TBevel Left = 8 Top = 280 Width = 238 Height = 89 Shape = bsFrame end object FontColorLabel: TLabel Left = 16 Top = 274 Width = 54 Height = 13 Caption = ' Font Color ' end object ShadowColorBevel: TBevel Left = 250 Top = 280 Width = 238 Height = 89 Shape = bsFrame end object ShadowBlueValueLabel: TLabel Left = 449 Top = 343 Width = 29 Height = 13 AutoSize = False Caption = '192' end object ShadowGreenValueLabel: TLabel Left = 449 Top = 319 Width = 29 Height = 13 AutoSize = False Caption = '192' end object ShadowRedValueLabel: TLabel Left = 449 Top = 294 Width = 29 Height = 13 AutoSize = False Caption = '192' end object FontRedValueLabel: TLabel Left = 210 Top = 294 Width = 29 Height = 16 Caption = '0' end object FontGreenValueLabel: TLabel Left = 210 Top = 319 Width = 29 Height = 13 AutoSize = False Caption = '0' end object FontBlueValueLabel: TLabel Left = 210 Top = 343 Width = 29 Height = 16 Caption = '0' end object ShadowColorGroupLabel: TLabel Left = 260 Top = 274 Width = 72 Height = 13 Caption = ' Shadow Color ' end object ShadowDepthLabel: TLabel Left = 496 Top = 272 Width = 97 Height = 13 Alignment = taCenter AutoSize = False Caption = 'Shadow Depth' end object FontBevel: TBevel Left = 8 Top = 168 Width = 481 Height = 97 Shape = bsFrame end object FontSizeLabel: TLabel Left = 16 Top = 227 Width = 33 Height = 13 Alignment = taRightJustify Caption = 'Size:' end object FontNameLabel: TLabel Left = 16 Top = 184 Width = 33 Height = 13 Alignment = taRightJustify Caption = 'Name:' end object FontLabel: TLabel Left = 16 Top = 163 Width = 27 Height = 13 Caption = ' Font ' end object Preview: TLabel3d Left = 13 Top = 13 Width = 471 Height = 110 Alignment = taCenter AutoSize = False Caption = 'Preview' Color = clBtnFace Font.Color = 3508451 Font.Height = -64 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False ShadowColor = 5083406 TextStyle = tsRaised end object PreviewLabel: TLabel Left = 16 Top = 3 Width = 44 Height = 13 Caption = ' Preview ' end object TextEdit: TEdit Left = 65 Top = 141 Width = 423 Height = 21 HelpContext = 100 TabOrder = 0 Text = '3d Preview' OnChange = TextEditChange end object FontStyleGroupBox: TGroupBox Left = 495 Top = 162 Width = 98 Height = 103 HelpContext = 200 Caption = ' Font Style ' TabOrder = 10 object BoldCheckBox: TCheckBox Left = 7 Top = 20 Width = 82 Height = 13 HelpContext = 200 Caption = 'Bold' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False State = cbChecked TabOrder = 0 OnClick = BoldCheckBoxClick end object ItalicCheckBox: TCheckBox Left = 7 Top = 39 Width = 82 Height = 15 HelpContext = 200 Caption = 'Italic' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsItalic] ParentFont = False TabOrder = 1 OnClick = ItalicCheckBoxClick end object UnderlineCheckBox: TCheckBox Left = 7 Top = 59 Width = 82 Height = 13 HelpContext = 200 Caption = 'Underline' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False TabOrder = 2 OnClick = UnderlineCheckBoxClick end object StrikeoutCheckBox: TCheckBox Left = 7 Top = 78 Width = 82 Height = 14 HelpContext = 200 Caption = 'Strikeout' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsStrikeOut] ParentFont = False TabOrder = 3 OnClick = StrikeoutCheckBoxClick end end object OkButton: TBitBtn Left = 506 Top = 315 Width = 80 Height = 26 HelpContext = 400 TabOrder = 13 Kind = bkOK Style = bsNew end object CancelButton: TBitBtn Left = 506 Top = 342 Width = 80 Height = 26 HelpContext = 400 TabOrder = 14 Kind = bkCancel Style = bsNew end object TextStyleGroupBox: TRadioGroup Left = 495 Top = 3 Width = 98 Height = 126 HelpContext = 100 Caption = ' Text Style ' ItemIndex = 1 Items.Strings = ( 'Normal' 'Raised' 'Lowered' 'Shadowed') TabOrder = 9 OnClick = TextStyleGroupBoxClick end object FontRedTrackBar: TTrkBar Left = 16 Top = 288 Width = 192 Height = 25 HelpContext = 200 Max = 255 Position = 0 TLTicks = False ThumbSize = tsSize1 ThumbStyle = tsBox TrkColor = clRed OnChange = FontRedTrackBarChange TabOrder = 3 end object FontBlueTrackBar: TTrkBar Left = 16 Top = 338 Width = 192 Height = 25 HelpContext = 200 Max = 255 Position = 0 TLTicks = False ThumbSize = tsSize1 ThumbStyle = tsBox TrkColor = clBlue OnChange = FontBlueTrackBarChange TabOrder = 5 end object ShadowRedTrackBar: TTrkBar Left = 256 Top = 288 Width = 192 Height = 25 HelpContext = 300 Max = 255 Position = 128 TLTicks = False ThumbSize = tsSize1 ThumbStyle = tsBox TrkColor = clRed OnChange = ShadowRedTrackBarChange TabOrder = 6 end object ShadowGreenTrackBar: TTrkBar Left = 256 Top = 313 Width = 192 Height = 25 HelpContext = 300 Max = 255 Position = 128 TLTicks = False ThumbSize = tsSize1 ThumbStyle = tsBox TrkColor = clLime OnChange = ShadowGreenTrackBarChange TabOrder = 7 end object ShadowBlueTrackBar: TTrkBar Left = 256 Top = 338 Width = 192 Height = 25 HelpContext = 300 Max = 255 Position = 128 TLTicks = False ThumbSize = tsSize1 ThumbStyle = tsBox TrkColor = clBlue OnChange = ShadowBlueTrackBarChange TabOrder = 8 end object ShadowDepthSpin: TUpDown Left = 548 Top = 288 Width = 15 Height = 21 Hint = 'UpDown Shadow Depth' HelpContext = 300 Associate = ShadowDepthEdit Min = 0 Max = 10 Position = 2 TabOrder = 12 Wrap = False end object ShadowDepthEdit: TEdit Left = 528 Top = 288 Width = 20 Height = 21 HelpContext = 300 MaxLength = 2 TabOrder = 11 Text = '2' OnChange = ShadowChange end object FontNameCombo: TComboBox Left = 65 Top = 180 Width = 269 Height = 21 HelpContext = 200 Font.Color = clWindowText Font.Height = -9 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 1 Text = 'FontNameCombo' OnChange = ComboFontsChange end object FontSizeTrackBar: TTrkBar Left = 58 Top = 207 Width = 425 Height = 54 HelpContext = 200 Max = 18 Position = 0 TickStyle = tkOwnerDraw TrkColor = clAqua OnChange = FontSizeChange OnDrawTick = FontSizeDrawTick TabOrder = 2 end object FontGreenTrackBar: TTrkBar Left = 16 Top = 313 Width = 192 Height = 25 HelpContext = 200 Max = 255 Position = 0 TLTicks = False ThumbSize = tsSize1 ThumbStyle = tsBox TrkColor = clLime OnChange = FontGreenTrackBarChange TabOrder = 4 end end