Chip: Shareware for Win 95/Chip-Shareware-Win95.bin/ostatni/delphi/ruzne/zcd30120.exe/Demo/Ledtest1.dfm/Ledtest1.txt

Text File | 1996-01-22 | 4KB | 257 lines

object Form1: TForm1
  Left = 285
  Top = 99
  Width = 199
  Height = 262
  Caption = 'Form1'
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PixelsPerInch = 96
  OnCreate = FormCreate
  TextHeight = 13
  object Label1: TLabel
    Left = 45
    Top = 112
    Width = 100
    Height = 49
    Alignment = taCenter
    AutoSize = False
    Caption = 'You can move this window by draging it with the mouse'
    WordWrap = True
  end
  object zAngleLabel1: TzAngleLabel
    Left = 24
    Top = 21
    Width = 144
    Height = 144
    Caption = 'ZieglerSoft'
    Font.Color = clFuchsia
    Font.Height = -27
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object L6: TzLed
    Left = 24
    Top = 165
    LEDColor = lctBlue
  end
  object L7: TzLed
    Left = 40
    Top = 165
    LEDColor = lctCyan
    Enabled = True
  end
  object L8: TzLed
    Left = 56
    Top = 165
    LEDColor = lctGreen
  end
  object L9: TzLed
    Left = 72
    Top = 165
    LEDColor = lctGrey
    Enabled = True
  end
  object L10: TzLed
    Left = 88
    Top = 165
    LEDColor = lctMangenta
  end
  object L11: TzLed
    Left = 104
    Top = 165
    LEDColor = lctRed
    Enabled = True
  end
  object L12: TzLed
    Left = 120
    Top = 165
    LEDColor = lctWhite
  end
  object L13: TzLed
    Left = 136
    Top = 165
    LEDColor = lctyellow
    Enabled = True
  end
  object L14: TzLed
    Left = 152
    Top = 165
    LEDColor = lctRed
  end
  object L15: TzLed
    Left = 168
    Top = 149
    LEDColor = lctBlue
    Enabled = True
  end
  object L16: TzLed
    Left = 168
    Top = 133
    LEDColor = lctCyan
  end
  object L17: TzLed
    Left = 168
    Top = 117
    LEDColor = lctGreen
    Enabled = True
  end
  object L18: TzLed
    Left = 168
    Top = 101
    LEDColor = lctGrey
  end
  object L19: TzLed
    Left = 168
    Top = 85
    LEDColor = lctMangenta
    Enabled = True
  end
  object L20: TzLed
    Left = 168
    Top = 69
    LEDColor = lctRed
  end
  object L21: TzLed
    Left = 168
    Top = 53
    LEDColor = lctWhite
    Enabled = True
  end
  object L22: TzLed
    Left = 168
    Top = 37
    LEDColor = lctyellow
  end
  object L23: TzLed
    Left = 168
    Top = 21
    LEDColor = lctCyan
    Enabled = True
  end
  object L24: TzLed
    Left = 152
    Top = 4
    LEDColor = lctBlue
  end
  object L26: TzLed
    Left = 120
    Top = 4
    LEDColor = lctGreen
  end
  object L25: TzLed
    Left = 136
    Top = 4
    LEDColor = lctCyan
    Enabled = True
  end
  object L27: TzLed
    Left = 104
    Top = 4
    LEDColor = lctGrey
    Enabled = True
  end
  object L28: TzLed
    Left = 88
    Top = 4
    LEDColor = lctMangenta
  end
  object L29: TzLed
    Left = 72
    Top = 4
    LEDColor = lctRed
    Enabled = True
  end
  object L30: TzLed
    Left = 56
    Top = 4
    LEDColor = lctWhite
  end
  object L31: TzLed
    Left = 40
    Top = 4
    LEDColor = lctyellow
    Enabled = True
  end
  object L32: TzLed
    Left = 24
    Top = 4
    LEDColor = lctMangenta
  end
  object L33: TzLed
    Left = 7
    Top = 21
    LEDColor = lctBlue
    Enabled = True
  end
  object L34: TzLed
    Left = 7
    Top = 37
    LEDColor = lctCyan
  end
  object L35: TzLed
    Left = 7
    Top = 53
    LEDColor = lctGreen
    Enabled = True
  end
  object L36: TzLed
    Left = 7
    Top = 69
    LEDColor = lctGrey
  end
  object L1: TzLed
    Left = 7
    Top = 85
    LEDColor = lctMangenta
    Enabled = True
  end
  object L2: TzLed
    Left = 7
    Top = 101
    LEDColor = lctRed
  end
  object L3: TzLed
    Left = 7
    Top = 117
    LEDColor = lctWhite
    Enabled = True
  end
  object L4: TzLed
    Left = 7
    Top = 133
    LEDColor = lctyellow
  end
  object L5: TzLed
    Left = 7
    Top = 149
    LEDColor = lctGreen
    Enabled = True
  end
  object zColorBtn1: TzColorBtn
    Left = 51
    Top = 192
    Caption = 'Stop program'
    Color = clFuchsia
    ParentColor = False
    ShadowColor = clPurple
    TabOrder = 0
    OnClick = zShapeBtn1Click
  end
  object zTitleBar1: TzTitleBar
    TitleBarOnFormShow = False
    Left = 40
    Top = 32
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 50
    OnTimer = zLed1Change
    Left = 69
    Top = 32
  end
end