object DlgLiteInfo: TDlgLiteInfo Left = 0 Top = 0 BorderIcons = [biSystemMenu] BorderStyle = bsNone Caption = 'DlgLiteInfo' ClientHeight = 120 ClientWidth = 325 Color = clWhite Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Segoe UI' Font.Style = [] Scaled = False StyleName = 'Windows' OnClose = FormClose OnDeactivate = FormDeactivate OnShow = FormShow DesignSize = ( 325 120) TextHeight = 15 object spMain: TShape Left = 0 Top = 0 Width = 325 Height = 120 Align = alClient OnMouseDown = spMainMouseDown ExplicitLeft = 200 ExplicitTop = 48 ExplicitWidth = 65 ExplicitHeight = 65 end object lbTitle: TLabel Left = 22 Top = 20 Width = 36 Height = 15 Caption = #53440#51060#53952 Font.Charset = DEFAULT_CHARSET Font.Color = 6510163 Font.Height = -12 Font.Name = 'Segoe UI' Font.Style = [fsBold] ParentFont = False OnMouseDown = spMainMouseDown end object mmInfo: TMemo Left = 22 Top = 57 Width = 281 Height = 45 Anchors = [akLeft, akTop, akRight, akBottom] BorderStyle = bsNone Font.Charset = DEFAULT_CHARSET Font.Color = 15965510 Font.Height = -12 Font.Name = 'Segoe UI' Font.Style = [] Lines.Strings = ( '....') ParentFont = False ReadOnly = True TabOrder = 0 OnMouseDown = mmInfoMouseDown end object ApplicationEvents: TApplicationEvents OnIdle = ApplicationEventsIdle Left = 224 Top = 40 end end