www.pudn.com > DrawDiguiTrees.rar > UDrawTree.dfm


object FrmMain: TFrmMain 
  Left = 39 
  Top = -3 
  Width = 971 
  Height = 733 
  Caption = 'FrmMain' 
  Color = clBtnFace 
  Font.Charset = DEFAULT_CHARSET 
  Font.Color = clWindowText 
  Font.Height = -11 
  Font.Name = 'MS Sans Serif' 
  Font.Style = [] 
  OldCreateOrder = False 
  OnCreate = FormCreate 
  OnShow = FormShow 
  PixelsPerInch = 96 
  TextHeight = 13 
  object Image1: TImage 
    Left = 40 
    Top = 24 
    Width = 745 
    Height = 657 
  end 
  object BitBtn_Draw: TBitBtn 
    Left = 808 
    Top = 464 
    Width = 96 
    Height = 41 
    Caption = 'DrawTree' 
    Font.Charset = DEFAULT_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -16 
    Font.Name = 'MS Sans Serif' 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 0 
    OnClick = BitBtn_DrawClick 
  end 
  object Edit_Num: TEdit 
    Left = 816 
    Top = 56 
    Width = 49 
    Height = 33 
    Font.Charset = DEFAULT_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -16 
    Font.Name = 'MS Sans Serif' 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 1 
    Text = '5' 
  end 
  object ScrollBar1: TScrollBar 
    Left = 864 
    Top = 57 
    Width = 25 
    Height = 32 
    Kind = sbVertical 
    Max = 8 
    Min = 1 
    PageSize = 0 
    Position = 1 
    TabOrder = 2 
    OnChange = ScrollBar1Change 
  end 
  object GroupBox1: TGroupBox 
    Left = 800 
    Top = 112 
    Width = 129 
    Height = 161 
    Caption = 'TreeType' 
    Font.Charset = DEFAULT_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -13 
    Font.Name = 'MS Sans Serif' 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 3 
    object RadioBtn_Tree1: TRadioButton 
      Left = 22 
      Top = 32 
      Width = 83 
      Height = 17 
      Caption = 'Tree1' 
      Checked = True 
      TabOrder = 0 
      TabStop = True 
    end 
    object RadioBtn_Tree2: TRadioButton 
      Left = 22 
      Top = 72 
      Width = 83 
      Height = 17 
      Caption = 'Tree2' 
      TabOrder = 1 
    end 
  end 
  object BitBtn_AutoRun: TBitBtn 
    Left = 808 
    Top = 536 
    Width = 96 
    Height = 39 
    Caption = 'AutoRun' 
    Font.Charset = DEFAULT_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -16 
    Font.Name = 'MS Sans Serif' 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 4 
    OnClick = BitBtn_AutoRunClick 
  end 
  object GroupBox2: TGroupBox 
    Left = 800 
    Top = 288 
    Width = 129 
    Height = 113 
    Caption = 'Dynamic' 
    Font.Charset = DEFAULT_CHARSET 
    Font.Color = clWindowText 
    Font.Height = -13 
    Font.Name = 'MS Sans Serif' 
    Font.Style = [] 
    ParentFont = False 
    TabOrder = 5 
    object RadioBtn_Radom: TRadioButton 
      Left = 8 
      Top = 32 
      Width = 91 
      Height = 17 
      Caption = 'Radom' 
      TabOrder = 0 
    end 
    object RadioBtn_WindDir: TRadioButton 
      Left = 8 
      Top = 72 
      Width = 91 
      Height = 17 
      Caption = 'WindDir' 
      TabOrder = 1 
    end 
  end 
  object Timer1: TTimer 
    Enabled = False 
    Interval = 200 
    OnTimer = Timer1Timer 
    Left = 920 
    Top = 416 
  end 
end