object frmPlay: TfrmPlay Left = 252 Top = 135 Width = 633 Height = 567 BorderIcons = [biSystemMenu] Caption = 'Play with the TJvLinkLabel!' Color = clBtnFace Constraints.MinHeight = 250 Constraints.MinWidth = 350 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Shell Dlg 2' Font.Style = [] OldCreateOrder = False Position = poDesktopCenter Scaled = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object LinkLabel: TJvLinkLabel Left = 0 Top = 0 Width = 330 Height = 496 Transparent = False Layout = tlTop LinkColor = clBlue LinkColorClicked = clRed LinkColorHot = clLime LinkStyle = [] HotLinks = True AutoHeight = True MarginWidth = 0 MarginHeight = 0 OnLinkClick = LinkLabelLinkClick Align = alClient Color = 8454143 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False OnMouseMove = LinkLabelMouseMove end object Splitter1: TSplitter Left = 330 Top = 0 Width = 9 Height = 496 Cursor = crHSplit Align = alRight Beveled = True ResizeStyle = rsUpdate end object Panel1: TPanel Left = 339 Top = 0 Width = 286 Height = 496 Align = alRight BevelOuter = bvNone TabOrder = 0 object Panel3: TPanel Left = 0 Top = 0 Width = 286 Height = 125 Align = alTop BevelOuter = bvNone TabOrder = 0 object btnRefresh: TButton Left = 4 Top = 100 Width = 277 Height = 21 Caption = 'Refresh' TabOrder = 0 OnClick = btnRefreshClick end object rgTextLayout: TRadioGroup Left = 4 Top = 4 Width = 93 Height = 93 Caption = ' Vert Alignment ' Items.Strings = ( 'Top' 'Center' 'Bottom') TabOrder = 1 OnClick = rgTextLayoutClick end object gbMargin: TGroupBox Left = 100 Top = 4 Width = 89 Height = 93 Caption = ' Margin ' TabOrder = 2 object Label1: TLabel Left = 12 Top = 16 Width = 28 Height = 13 Caption = 'Width' end object Label2: TLabel Left = 12 Top = 52 Width = 31 Height = 13 Caption = 'Height' end object edMarginW: TJvValidateEdit Left = 12 Top = 28 Width = 49 Height = 21 CheckChars = '01234567890' CriticalPoints.CheckPoints = cpNone CriticalPoints.ColorAbove = clBlue CriticalPoints.ColorBelow = clRed EditText = '0' PasswordChar = #0 TabOrder = 0 Text = '0' Value = 0 OnChange = edMarginWChange end object edMarginH: TJvValidateEdit Left = 12 Top = 64 Width = 49 Height = 21 CheckChars = '01234567890' CriticalPoints.CheckPoints = cpNone CriticalPoints.ColorAbove = clBlue CriticalPoints.ColorBelow = clRed EditText = '0' PasswordChar = #0 TabOrder = 1 Text = '0' Value = 0 OnChange = edMarginHChange end object updnW: TUpDown Left = 61 Top = 28 Width = 15 Height = 21 Associate = edMarginW Min = 0 Position = 0 TabOrder = 2 Wrap = False end object updbH: TUpDown Left = 61 Top = 64 Width = 15 Height = 21 Associate = edMarginH Min = 0 Position = 0 TabOrder = 3 Wrap = False end end object gbMousePos: TGroupBox Left = 192 Top = 4 Width = 89 Height = 93 Caption = ' Mouse Pos ' TabOrder = 3 object Label4: TLabel Left = 5 Top = 16 Width = 76 Height = 13 Alignment = taCenter Caption = 'TLinkLabel (X,Y)' end object LnkLblMousePos: TLabel Left = 5 Top = 32 Width = 80 Height = 14 Alignment = taCenter AutoSize = False Caption = 'Memo (X,Y)' end end end object TreeView: TTreeView Left = 0 Top = 125 Width = 286 Height = 371 Align = alClient Indent = 19 TabOrder = 1 end end object Panel2: TPanel Left = 0 Top = 496 Width = 625 Height = 41 Align = alBottom BevelOuter = bvNone TabOrder = 1 OnResize = Panel2Resize object Bevel1: TBevel Left = 0 Top = 0 Width = 625 Height = 2 Align = alTop end object Edit: TEdit Left = 8 Top = 8 Width = 613 Height = 21 TabOrder = 0 OnChange = EditChange end end end