object frmPlay: TfrmPlay Left = 252 Top = 135 Width = 633 Height = 567 HorzScrollBar.Range = 295 VertScrollBar.Range = 41 ActiveControl = btnRefresh BorderIcons = [biSystemMenu] Caption = 'Play with the TJvLinkLabel!' Color = clButton Constraints.MinHeight = 250 Constraints.MinWidth = 350 Font.Color = clText Font.Height = 11 Font.Name = 'adobe-helvetica' Font.Pitch = fpVariable Font.Style = [] Font.Weight = 40 ParentFont = False Position = poDesktopCenter Scaled = False OnCreate = FormCreate PixelsPerInch = 113 object LinkLabel: TJvLinkLabel Left = 0 Top = 0 Width = 338 Height = 526 LinkColorHot = clLime LinkStyle = [] HotLinks = True Align = alClient Color = 8454143 Font.Color = clText Font.Height = 13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Font.Weight = 40 ParentColor = False ParentFont = False OnMouseMove = LinkLabelMouseMove end object Splitter1: TSplitter Left = 338 Top = 0 Width = 9 Height = 526 Align = alRight Beveled = True ResizeStyle = rsUpdate end object Panel1: TPanel Left = 347 Top = 0 Width = 286 Height = 526 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 Items.Strings = ( 'Top' 'Center' 'Bottom') Caption = ' Vert Alignment ' 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 = 27 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' 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' TabOrder = 1 Text = '0' Value = 0 OnChange = edMarginHChange end object updnW: TUpDown Left = 62 Top = 28 Width = 15 Height = 21 Associate = edMarginW TabOrder = 2 end object updbH: TUpDown Left = 62 Top = 64 Width = 15 Height = 21 Associate = edMarginH TabOrder = 3 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 = 401 Align = alClient Columns = <> Indent = 19 TabOrder = 1 end end object Panel2: TPanel Left = 0 Top = 526 Width = 633 Height = 41 Align = alBottom BevelOuter = bvNone TabOrder = 1 OnResize = Panel2Resize object Bevel1: TBevel Left = 0 Top = 0 Width = 633 Height = 2 Align = alTop end object Edit: TEdit Left = 8 Top = 8 Width = 613 Height = 21 TabOrder = 0 OnChange = EditChange end end end