demoform.dfm

Component to show a lcd screen. in full color and max. performens

object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Demo'
  ClientHeight = 186
  ClientWidth = 339
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object LCDLine1: TLCDLine
    Left = 48
    Top = 8
    Width = 225
    Height = 65
    CellSize = 3
    CellSpace = 1
    FrameSize = 8
    FrameColor = clBtnFace
    BoardColor = clBlack
    CellColorOn = clLime
    CellColorOff = 23296
    CharSpace = True
    FrameStyle = Raised
  end
  object LCDLine2: TLCDLine
    Left = 16
    Top = 86
    Width = 305
    Height = 47
    CellSize = 3
    CellSpace = 1
    FrameSize = 0
    FrameColor = clBtnFace
    BoardColor = 8454016
    CellColorOn = clBlack
    CellColorOff = 65408
  end
  object BitBtn1: TBitBtn
    Left = 128
    Top = 149
    Width = 75
    Height = 25
    TabOrder = 0
    Kind = bkClose
  end
  object Timer1: TTimer
    Interval = 100
    OnTimer = Timer1Timer
    Left = 288
    Top = 144
  end
end