unit1.dfm

绘制一元函数曲线的工具 输入C语言语法的函数公式, 即可绘制函数的二维曲线 采用内置编译器和虚拟机(这是调整OK的版本)

object Form1: TForm1
  Left = 192
  Top = 107
  BorderStyle = bsSingle
  Caption = #20989#25968#26354#32447' '#26597#30475#24037#20855
  ClientHeight = 573
  ClientWidth = 792
  Color = clSilver
  Ctl3D = False
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PrintScale = poNone
  Scaled = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object ScrollBox1: TScrollBox
    Left = 8
    Top = 120
    Width = 777
    Height = 449
    HorzScrollBar.Style = ssFlat
    VertScrollBar.Style = ssFlat
    TabOrder = 0
    object Image1: TImage
      Left = 0
      Top = 0
      Width = 775
      Height = 447
    end
  end
  object PageControl1: TPageControl
    Left = 8
    Top = 8
    Width = 777
    Height = 105
    ActivePage = TabSheet1
    TabIndex = 0
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #20989#25968#35774#23450
      object Memo1: TMemo
        Left = 8
        Top = 8
        Width = 753
        Height = 65
        BevelInner = bvNone
        BevelOuter = bvNone
        Lines.Strings = (
          'y = (1 - exp(-2 * x)) / (1 + exp(-2 * x));'
          ''
          '/*'#20351#29992#35828#26126'*/'
          '/*'#20989#25968#21015#34920':'
          '  exp  log'
          '  sin  asin  sinh'
          '  cos  acos  cosh'
          '  tan  atan  tanh'
          '*/'
          '/*'#20013#38388#21464#37327':'
          '  a  b  c'
          '*/')
        ScrollBars = ssVertical
        TabOrder = 0
        WantTabs = True
        WordWrap = False
      end
    end
    object TabSheet2: TTabSheet
      Caption = #21464#37327#35774#23450
      ImageIndex = 1
      object Label1: TLabel
        Left = 8
        Top = 8
        Width = 59
        Height = 13
        Caption = 'X'#21464#37327#36215#28857
      end
      object Label2: TLabel
        Left = 8
        Top = 32
        Width = 59
        Height = 13
        Caption = 'X'#21464#37327#27493#36827
      end
      object Label3: TLabel
        Left = 8
        Top = 56
        Width = 59
        Height = 13
        Caption = 'X'#21464#37327#32456#28857
      end
      object Label4: TLabel
        Left = 208
        Top = 8
        Width = 59
        Height = 13
        Caption = 'Y'#21464#37327#36215#28857
        Enabled = False
      end
      object Label5: TLabel
        Left = 208
        Top = 32
        Width = 59
        Height = 13
        Caption = 'Y'#21464#37327#27493#36827
        Enabled = False
      end
      object Label6: TLabel
        Left = 208
        Top = 56
        Width = 59
        Height = 13
        Caption = 'Y'#21464#37327#32456#28857
        Enabled = False
      end
      object Edit1: TEdit
        Left = 72
        Top = 8
        Width = 121
        Height = 19
        TabOrder = 0
        Text = '-5'
      end
      object Edit2: TEdit
        Left = 72
        Top = 32
        Width = 121
        Height = 19
        TabOrder = 1
        Text = '0.01'
      end
      object Edit3: TEdit
        Left = 72
        Top = 56
        Width = 121
        Height = 19
        TabOrder = 2
        Text = '+5'
      end
      object Edit4: TEdit
        Left = 272
        Top = 8
        Width = 121
        Height = 19
        Enabled = False
        TabOrder = 3
        Text = '-10'
      end
      object Edit5: TEdit
        Left = 272
        Top = 32
        Width = 121
        Height = 19
        Enabled = False
        TabOrder = 4
        Text = '0.01'
      end
      object Edit6: TEdit
        Left = 272
        Top = 56
        Width = 121
        Height = 19
        Enabled = False
        TabOrder = 5
        Text = '+10'
      end
      object GroupBox1: TGroupBox
        Left = 416
        Top = 4
        Width = 121
        Height = 71
        Caption = #33258#21464#37327#35774#23450
        TabOrder = 6
        object RadioButton1: TRadioButton
          Left = 8
          Top = 16
          Width = 105
          Height = 17
          Caption = #20197'X'#36724#20570#33258#21464#37327
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object RadioButton2: TRadioButton
          Left = 8
          Top = 48
          Width = 105
          Height = 17
          Caption = #20197'Y'#36724#20570#33258#21464#37327
          Enabled = False
          TabOrder = 1
        end
      end
      object GroupBox2: TGroupBox
        Left = 560
        Top = 4
        Width = 89
        Height = 71
        Caption = 'X'#36724#31867#22411
        TabOrder = 7
        object RadioButton3: TRadioButton
          Left = 8
          Top = 16
          Width = 73
          Height = 17
          Caption = #32447#24615#24231#26631
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object RadioButton4: TRadioButton
          Left = 8
          Top = 32
          Width = 73
          Height = 17
          Caption = #23545#25968#24231#26631
          Enabled = False
          TabOrder = 1
        end
        object RadioButton5: TRadioButton
          Left = 8
          Top = 48
          Width = 73
          Height = 17
          Caption = #25351#25968#24231#26631
          Enabled = False
          TabOrder = 2
        end
      end
      object GroupBox3: TGroupBox
        Left = 672
        Top = 4
        Width = 89
        Height = 71
        Caption = 'Y'#36724#31867#22411
        TabOrder = 8
        object RadioButton6: TRadioButton
          Left = 8
          Top = 16
          Width = 73
          Height = 17
          Caption = #32447#24615#24231#26631
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object RadioButton7: TRadioButton
          Left = 8
          Top = 32
          Width = 73
          Height = 17
          Caption = #23545#25968#24231#26631
          Enabled = False
          TabOrder = 1
        end
        object RadioButton8: TRadioButton
          Left = 8
          Top = 48
          Width = 73
          Height = 17
          Caption = #25351#25968#24231#26631
          Enabled = False
          TabOrder = 2
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = #32472#22270#35774#23450
      ImageIndex = 2
      object Label7: TLabel
        Left = 8
        Top = 8
        Width = 78
        Height = 13
        Caption = #27178#36724#35937#32032#33539#22260
      end
      object Label8: TLabel
        Left = 8
        Top = 32
        Width = 78
        Height = 13
        Caption = #32437#36724#35937#32032#33539#22260
      end
      object Label9: TLabel
        Left = 8
        Top = 56
        Width = 78
        Height = 13
        Caption = #36724#32447#32472#21046#36873#39033
      end
      object Label10: TLabel
        Left = 208
        Top = 8
        Width = 52
        Height = 13
        Caption = #26354#32447#39068#33394
      end
      object Label11: TLabel
        Left = 208
        Top = 32
        Width = 52
        Height = 13
        Caption = #32972#24213#39068#33394
      end
      object Shape1: TShape
        Left = 264
        Top = 8
        Width = 33
        Height = 15
        Brush.Color = clFuchsia
        Shape = stRoundRect
        OnMouseUp = Shape1MouseUp
      end
      object Shape2: TShape
        Left = 264
        Top = 32
        Width = 33
        Height = 15
        Brush.Color = clBlack
        Shape = stRoundRect
        OnMouseUp = Shape2MouseUp
      end
      object Label12: TLabel
        Left = 208
        Top = 56
        Width = 52
        Height = 13
        Caption = #36724#32447#39068#33394
      end
      object Shape3: TShape
        Left = 264
        Top = 56
        Width = 33
        Height = 15
        Brush.Color = clLime
        Shape = stRoundRect
        OnMouseUp = Shape3MouseUp
      end
      object Label13: TLabel
        Left = 312
        Top = 8
        Width = 79
        Height = 13
        Caption = 'X'#24231#26631#33539#22260' '#177
      end
      object Label14: TLabel
        Left = 312
        Top = 32
        Width = 79
        Height = 13
        Caption = 'X'#24231#26631#26684#23376' '#177
      end
      object Label16: TLabel
        Left = 488
        Top = 8
        Width = 79
        Height = 13
        Caption = 'Y'#24231#26631#33539#22260' '#177
      end
      object Label17: TLabel
        Left = 488
        Top = 32
        Width = 79
        Height = 13
        Caption = 'Y'#24231#26631#26684#23376' '#177
      end
      object Label15: TLabel
        Left = 312
        Top = 56
        Width = 59
        Height = 13
        Caption = 'Y'#33539#22260#32422#26463
      end
      object Label18: TLabel
        Left = 488
        Top = 56
        Width = 59
        Height = 13
        Caption = 'X'#33539#22260#32422#26463
      end
      object Edit7: TEdit
        Left = 96
        Top = 8
        Width = 97
        Height = 19
        TabOrder = 0
        Text = '775'
        OnChange = Edit7Change
      end
      object Edit8: TEdit
        Left = 96
        Top = 32
        Width = 97
        Height = 19
        TabOrder = 1
        Text = '447'
        OnChange = Edit7Change
      end
      object CheckBox1: TCheckBox
        Left = 96
        Top = 56
        Width = 97
        Height = 17
        Caption = #32472#21046#24231#26631#36724#32447
        Checked = True
        State = cbChecked
        TabOrder = 2
      end
      object Button1: TButton
        Left = 680
        Top = 8
        Width = 81
        Height = 19
        Caption = #32472#22270
        TabOrder = 3
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 680
        Top = 32
        Width = 81
        Height = 19
        Caption = #28165#29702
        TabOrder = 4
        OnClick = Button2Click
      end
      object Edit9: TEdit
        Left = 392
        Top = 8
        Width = 81
        Height = 19
        BevelInner = bvNone
        BevelOuter = bvNone
        TabOrder = 5
        Text = '7'
      end
      object EditA: TEdit
        Left = 392
        Top = 32
        Width = 81
        Height = 19
        BevelInner = bvNone
        BevelOuter = bvNone
        TabOrder = 6
        Text = '1'
      end
      object EditC: TEdit
        Left = 568
        Top = 8
        Width = 81
        Height = 19
        BevelInner = bvNone
        BevelOuter = bvNone
        TabOrder = 7
        Text = '4'
      end
      object EditD: TEdit
        Left = 568
        Top = 32
        Width = 81
        Height = 19
        BevelInner = bvNone
        BevelOuter = bvNone
        TabOrder = 8
        Text = '1'
      end
      object Button3: TButton
        Left = 392
        Top = 56
        Width = 81
        Height = 19
        Caption = #27604#20363#32422#26463
        TabOrder = 9
        OnClick = Button3Click
      end
      object Button4: TButton
        Left = 568
        Top = 56
        Width = 81
        Height = 19
        Caption = #27604#20363#32422#26463
        TabOrder = 10
        OnClick = Button4Click
      end
      object Button5: TButton
        Left = 680
        Top = 56
        Width = 81
        Height = 19
        Caption = #20445#23384
        TabOrder = 11
        OnClick = Button5Click
      end
    end
  end
  object ColorDialog1: TColorDialog
    Ctl3D = True
    Left = 728
    Top = 136
  end
  object SaveDialog1: TSaveDialog
    Ctl3D = False
    DefaultExt = 'bmp'
    Filter = 'Bitmaps (*.bmp)|*.bmp'
    Left = 728
    Top = 168
  end
end