Delphi/CppBuilder

开发平台：
Delphi

CnGLCanvasDemo.dfm：源码内容
							object frmMain: TfrmMain
  Left = 167
  Top = 66
  Width = 973
  Height = 617
  Caption = 'GLCanvas Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 957
    Height = 579
    ActivePage = TabSheet2
    Align = alClient
    TabOrder = 0
    OnChange = PageControl1Change
    object TabSheet2: TTabSheet
      Caption = #36895#24230#19982#21015#34920#27979#35797
      ImageIndex = 1
      object imgBench: TImage
        Left = 389
        Top = 24
        Width = 380
        Height = 380
      end
      object lblGLCanvasBench: TLabel
        Left = 3
        Top = 5
        Width = 48
        Height = 13
        Caption = 'GLCanvas'
      end
      object lblGDIBench: TLabel
        Left = 389
        Top = 5
        Width = 18
        Height = 13
        Caption = 'GDI'
      end
      object Label8: TLabel
        Left = 427
        Top = 472
        Width = 430
        Height = 73
        Caption = 
          #30001#20110#26412#26679#20363#31243#24207#37324#29992#21040#20102#22810#20010'GLCanvas'#20849#21516#24037#20316#65292#25152#20197#22312'CnOpenGLCanvas'#21333#20803#20013#23450#20041#20102'MultiCanvas'#25351#31034#31526#12290 +
          #22312#22823#22810#25968#24773#20917#19979#31243#24207#19981#20250#26377#22810#20010#30011#24067#65292#25152#20197#22914#26524#20320#30340#31243#24207#19981#38656#35201#20351#29992#22810#20010#30011#24067#65292#21487#20197#21462#28040#23450#20041#35813#25351#31034#31526#65292#33021#22815#36731#24494#25552#21319#25928#29575#12290
        WordWrap = True
      end
      object glcBench: TCnGLCanvas
        Left = 3
        Top = 24
        Width = 380
        Height = 380
        BackgroundColor = clWhite
        Antialiasing = False
      end
      object GroupBox1: TGroupBox
        Left = 3
        Top = 410
        Width = 414
        Height = 95
        Caption = #36895#24230#27979#35797
        TabOrder = 1
        object Label6: TLabel
          Left = 13
          Top = 53
          Width = 242
          Height = 13
          Caption = #35831#28857#20004#27425#8220'20000'#30452#32447#8221#65292#31532#20108#27425#30340#26102#38388#26356#20026#20934#30830
        end
        object btnBenchLines: TButton
          Left = 5
          Top = 22
          Width = 80
          Height = 25
          Caption = '20000'#30452#32447
          TabOrder = 0
          OnClick = BenchTestClick
        end
        object btnBenchRects: TButton
          Tag = 1
          Left = 86
          Top = 22
          Width = 80
          Height = 25
          Caption = '20000'#30697#24418
          TabOrder = 1
          OnClick = BenchTestClick
        end
        object btnBenchEllipses: TButton
          Tag = 2
          Left = 167
          Top = 22
          Width = 80
          Height = 25
          Caption = '20000'#26925#22278
          TabOrder = 2
          OnClick = BenchTestClick
        end
        object btnBenchPoints: TButton
          Tag = 3
          Left = 248
          Top = 22
          Width = 80
          Height = 25
          Caption = '200000'#28857
          TabOrder = 3
          OnClick = BenchTestClick
        end
        object btnBenchTexts: TButton
          Tag = 4
          Left = 329
          Top = 22
          Width = 80
          Height = 25
          Caption = '10000'#25991#23383
          TabOrder = 4
          OnClick = BenchTestClick
        end
        object rdoPenWidth1: TRadioButton
          Left = 13
          Top = 72
          Width = 89
          Height = 17
          Caption = 'Pen Width = 1'
          Checked = True
          TabOrder = 5
          TabStop = True
        end
        object rdoPenWidth2: TRadioButton
          Left = 117
          Top = 72
          Width = 89
          Height = 17
          Caption = 'Pen Width = 2'
          TabOrder = 6
        end
      end
      object GroupBox2: TGroupBox
        Left = 423
        Top = 410
        Width = 426
        Height = 53
        Caption = #32472#21046#21015#34920#27979#35797
        TabOrder = 2
        object Label7: TLabel
          Left = 269
          Top = 27
          Width = 48
          Height = 13
          Caption = #30011#31508#23485#24230
        end
        object btnBuildList: TButton
          Tag = 4
          Left = 5
          Top = 22
          Width = 80
          Height = 25
          Caption = #21019#24314#21015#34920
          TabOrder = 0
          OnClick = btnBuildListClick
        end
        object btnExecuteList: TButton
          Tag = 4
          Left = 91
          Top = 22
          Width = 80
          Height = 25
          Caption = #25191#34892#21015#34920
          Enabled = False
          TabOrder = 1
          OnClick = btnExecuteListClick
        end
        object clrPenColor2: TColorBox
          Left = 177
          Top = 24
          Width = 81
          Height = 22
          ItemHeight = 16
          TabOrder = 2
        end
        object trackPenWidth2: TTrackBar
          Left = 323
          Top = 24
          Width = 99
          Height = 20
          Min = 1
          Position = 1
          TabOrder = 3
          ThumbLength = 14
        end
      end
    end
    object TabSheet1: TTabSheet
      Caption = #32508#21512#27979#35797
      object glcMain: TCnGLCanvas
        Left = 0
        Top = 0
        Width = 949
        Height = 496
        BackgroundColor = clWhite
        Align = alClient
        OnResize = glcMainResize
      end
      object Panel1: TPanel
        Left = 0
        Top = 496
        Width = 949
        Height = 55
        Align = alBottom
        TabOrder = 1
        object Label1: TLabel
          Left = 348
          Top = 7
          Width = 48
          Height = 13
          Caption = #30011#31508#39068#33394
        end
        object Label2: TLabel
          Left = 348
          Top = 33
          Width = 48
          Height = 13
          Caption = #22635#20805#39068#33394
        end
        object Label3: TLabel
          Left = 504
          Top = 7
          Width = 48
          Height = 13
          Caption = #30011#31508#31867#22411
        end
        object Label4: TLabel
          Left = 664
          Top = 7
          Width = 48
          Height = 13
          Caption = #30011#31508#23485#24230
        end
        object Label5: TLabel
          Left = 503
          Top = 33
          Width = 36
          Height = 13
          Caption = #36879#26126#24230
        end
        object chkAntialiasing: TCheckBox
          Left = 826
          Top = 6
          Width = 89
          Height = 17
          Caption = #25239#38191#40831
          Checked = True
          State = cbChecked
          TabOrder = 15
          OnClick = MainTestClick
        end
        object btnDot: TButton
          Left = 1
          Top = 2
          Width = 66
          Height = 25
          Caption = #28857
          TabOrder = 0
          OnClick = MainTestClick
        end
        object cboLineStipple: TComboBox
          Left = 560
          Top = 4
          Width = 89
          Height = 21
          AutoDropDown = True
          AutoCloseUp = True
          Style = csDropDownList
          ItemHeight = 13
          ItemIndex = 0
          TabOrder = 10
          Text = #23454#32447
          OnChange = MainTestClick
          Items.Strings = (
            #23454#32447
            'Dash'
            'DashDot'
            'lssDashDotDot'
            'lssDot')
        end
        object btnLine: TButton
          Tag = 1
          Left = 1
          Top = 28
          Width = 66
          Height = 25
          Caption = #30452#32447
          TabOrder = 1
          OnClick = MainTestClick
        end
        object btnPolyline: TButton
          Tag = 2
          Left = 68
          Top = 2
          Width = 104
          Height = 25
          Caption = #25240#32447#12289#22810#36793#24418
          TabOrder = 2
          OnClick = MainTestClick
        end
        object clrPen: TColorBox
          Left = 403
          Top = 4
          Width = 89
          Height = 22
          ItemHeight = 16
          TabOrder = 8
          OnChange = MainTestClick
        end
        object btnCurve: TButton
          Tag = 3
          Left = 68
          Top = 28
          Width = 104
          Height = 25
          Caption = #26354#32447#12289#38381#21512#26354#32447
          TabOrder = 3
          OnClick = MainTestClick
        end
        object btnRectEllipse: TButton
          Tag = 4
          Left = 173
          Top = 2
          Width = 89
          Height = 25
          Caption = #30697#24418#12289#26925#22278
          TabOrder = 4
          OnClick = MainTestClick
        end
        object btnArc: TButton
          Tag = 5
          Left = 173
          Top = 28
          Width = 89
          Height = 25
          Caption = #24359
          TabOrder = 5
          OnClick = MainTestClick
        end
        object btnText: TButton
          Tag = 6
          Left = 263
          Top = 2
          Width = 75
          Height = 25
          Caption = #25991#23383
          TabOrder = 6
          OnClick = MainTestClick
        end
        object btnImage: TButton
          Tag = 7
          Left = 263
          Top = 28
          Width = 75
          Height = 25
          Caption = #22270#29255
          TabOrder = 7
          OnClick = MainTestClick
        end
        object clrBrush: TColorBox
          Left = 403
          Top = 30
          Width = 89
          Height = 22
          Selected = clTeal
          ItemHeight = 16
          TabOrder = 9
          OnChange = MainTestClick
        end
        object chkTranslate: TCheckBox
          Left = 664
          Top = 32
          Width = 89
          Height = 17
          Caption = #20301#31227#21464#25442
          TabOrder = 12
          OnClick = MainTestClick
        end
        object chkRotate: TCheckBox
          Left = 745
          Top = 32
          Width = 89
          Height = 17
          Caption = #26059#36716#21464#25442
          TabOrder = 13
          OnClick = MainTestClick
        end
        object chkScale: TCheckBox
          Left = 826
          Top = 32
          Width = 89
          Height = 17
          Caption = #25918#32553#21464#25442
          TabOrder = 14
          OnClick = MainTestClick
        end
        object trackPenWidth: TTrackBar
          Left = 718
          Top = 4
          Width = 99
          Height = 20
          Min = 1
          Position = 1
          TabOrder = 11
          ThumbLength = 14
          OnChange = MainTestClick
        end
        object trackFillAlpha: TTrackBar
          Left = 557
          Top = 30
          Width = 99
          Height = 20
          Max = 255
          Frequency = 10
          Position = 255
          TabOrder = 16
          ThumbLength = 14
          OnChange = MainTestClick
        end
      end
    end
  end
end

						