unit1.dfm

经纬球的缩放旋转

object Form1: TForm1
  Left = 231
  Top = 175
  Width = 614
  Height = 390
  Caption = 'OpenGL'#32472#22270
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnPaint = FormPaint
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel2: TBevel
    Left = 192
    Top = 0
    Width = 9
    Height = 361
    Shape = bsLeftLine
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 193
    Height = 363
    TabOrder = 0
    object Label1: TLabel
      Left = 48
      Top = 8
      Width = 73
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = #20999#20998#25968#37327
    end
    object Label2: TLabel
      Left = 45
      Top = 56
      Width = 76
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = #32553'         '#25918
      Layout = tlCenter
    end
    object Label3: TLabel
      Left = 48
      Top = 104
      Width = 73
      Height = 13
      Alignment = taCenter
      AutoSize = False
      Caption = #26059#36716#35282#24230
    end
    object Bevel1: TBevel
      Left = 24
      Top = 168
      Width = 145
      Height = 89
      Shape = bsFrame
    end
    object TrackBar1: TTrackBar
      Left = 8
      Top = 24
      Width = 177
      Height = 25
      Max = 50
      Min = 5
      Position = 5
      TabOrder = 0
      ThumbLength = 15
      TickStyle = tsNone
      OnChange = TrackBar1Change
    end
    object TrackBar2: TTrackBar
      Left = 8
      Top = 72
      Width = 177
      Height = 25
      Max = 50
      Min = 1
      Position = 1
      TabOrder = 1
      ThumbLength = 15
      TickStyle = tsNone
      OnChange = TrackBar2Change
    end
    object TrackBar3: TTrackBar
      Left = 8
      Top = 128
      Width = 177
      Height = 25
      Max = 360
      TabOrder = 2
      ThumbLength = 15
      TickStyle = tsNone
      OnChange = TrackBar3Change
    end
    object RadioButton1: TRadioButton
      Left = 40
      Top = 184
      Width = 113
      Height = 17
      Caption = #39030#28857
      TabOrder = 3
      OnClick = RadioButton1Click
    end
    object RadioButton2: TRadioButton
      Left = 40
      Top = 208
      Width = 113
      Height = 17
      Caption = #26865#32447
      TabOrder = 4
      OnClick = RadioButton2Click
    end
    object RadioButton3: TRadioButton
      Left = 40
      Top = 232
      Width = 113
      Height = 17
      Caption = #38754#29255
      TabOrder = 5
      OnClick = RadioButton3Click
    end
    object CheckBox1: TCheckBox
      Left = 24
      Top = 280
      Width = 97
      Height = 17
      Caption = #28165#38500#38544#34255#38754
      TabOrder = 6
      OnClick = CheckBox1Click
    end
    object Button1: TButton
      Left = 16
      Top = 320
      Width = 75
      Height = 25
      Caption = #24320#22987
      TabOrder = 7
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 112
      Top = 320
      Width = 75
      Height = 25
      Caption = #20572#27490
      TabOrder = 8
      OnClick = Button2Click
    end
  end
  object Timer1: TTimer
    Interval = 40
    OnTimer = Timer1Timer
    Left = 144
    Top = 280
  end
end