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

Text File | 1997-06-02 | 3KB | 161 lines

object Form1: TForm1
  Left = 358
  Top = 110
  Width = 220
  Height = 276
  Caption = 'Test TzShapeBtn'
  Font.Color = clBlack
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PixelsPerInch = 96
  Scaled = False
  OnCreate = FormCreate
  TextHeight = 16
  object zShapeBtn13: TzShapeBtn
    Left = 154
    Top = 195
    Width = 49
    Height = 49
    Shape = sbCircle
    ParentColor = False
    OnClick = zShapeBtn13Click
  end
  object Label1: TLabel
    Left = 18
    Top = 176
    Width = 174
    Height = 16
    Alignment = taCenter
    AutoSize = False
  end
  object zShapeBtn1: TzShapeBtn
    Left = 44
    Top = 8
    Width = 125
    Height = 121
    ParentColor = False
    OnClick = zShapeBtn1Click
  end
  object zShapeBtn2: TzShapeBtn
    Left = 68
    Top = 32
    Width = 81
    Height = 81
    Cursor = crSizeNWSE
    Shape = sbOwnerDraw
    ParentColor = False
    OnClick = zShapeBtn2Click
  end
  object zShapeBtn3: TzShapeBtn
    Left = 50
    Top = 14
    Width = 22
    Height = 22
    Cursor = crUpArrow
    Shape = sbCircle
    ParentColor = False
    OnClick = zShapeBtn3Click
  end
  object zShapeBtn4: TzShapeBtn
    Left = 8
    Top = 8
    Shape = sbBRTriangle
    ShadowColor = clMaroon
    Color = clRed
    ParentColor = False
    OnClick = zShapeBtn4Click
  end
  object zShapeBtn5: TzShapeBtn
    Left = 8
    Top = 104
    Shape = sbTRTriangle
    ShadowColor = clPurple
    Color = clFuchsia
    ParentColor = False
    OnClick = zShapeBtn5Click
  end
  object zShapeBtn6: TzShapeBtn
    Left = 176
    Top = 8
    Shape = sbBLTriangle
    ShadowColor = clNavy
    Color = clBlue
    ParentColor = False
    OnClick = zShapeBtn6Click
  end
  object zShapeBtn7: TzShapeBtn
    Left = 176
    Top = 104
    Shape = sbTLTriangle
    ShadowColor = clGreen
    Color = clLime
    ParentColor = False
    OnClick = zShapeBtn7Click
  end
  object zShapeBtn8: TzShapeBtn
    Left = 8
    Top = 56
    AcceleratorKey = '+'
    Shape = sbPlus
    HighLightColor = clLime
    Color = clGreen
    ParentColor = False
    OnClick = zShapeBtn8Click
  end
  object Label2: TLabel
    Left = 62
    Top = 144
    Width = 85
    Height = 16
    Alignment = taCenter
    AutoSize = False
  end
  object zShapeBtn9: TzShapeBtn
    Left = 176
    Top = 56
    AcceleratorKey = '-'
    Shape = sbMinus
    HighLightColor = clWhite
    ShadowColor = clMaroon
    Color = clRed
    ParentColor = False
    OnClick = zShapeBtn9Click
  end
  object zShapeBtn12: TzShapeBtn
    Left = 162
    Top = 203
    Width = 33
    Height = 33
    Shape = sbCircle
    ParentColor = False
    OnClick = zShapeBtn12Click
  end
  object zShapeBtn10: TzShapeBtn
    Left = 171
    Top = 212
    Width = 15
    Height = 15
    Shape = sbTRTriangle
    ParentColor = False
    OnClick = zShapeBtn11Click
  end
  object zShapeBtn11: TzShapeBtn
    Left = 170
    Top = 212
    Width = 15
    Height = 15
    Shape = sbBLTriangle
    ParentColor = False
    OnClick = zShapeBtn10Click
  end
  object Edit1: TEdit
    Left = 16
    Top = 208
    Width = 129
    Height = 24
    TabOrder = 0
    Text = '0'
  end
end