unit4.dfm

计算个人所得税与牛顿迭代法实现的作业源码。

object Form4: TForm4
  Left = 90
  Top = 460
  Width = 659
  Height = 401
  Caption = #29275#39039#36845#20195#27861
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -21
  Font.Name = #23435#20307
  Font.Style = [fsBold]
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 21
  object Edit1: TEdit
    Left = 56
    Top = 40
    Width = 529
    Height = 37
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -29
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    Text = #27714#26041#31243' x=exp(x)-2 '#30340#26681
  end
  object Button1: TButton
    Left = 64
    Top = 224
    Width = 129
    Height = 41
    Caption = #35745'  '#31639
    Font.Charset = ANSI_CHARSET
    Font.Color = clFuchsia
    Font.Height = -21
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = Button1Click
  end
  object GroupBox1: TGroupBox
    Left = 56
    Top = 96
    Width = 265
    Height = 105
    Caption = #35831#36755#20837'0'#27425#36817#20284#20540#65306
    TabOrder = 2
    object Edit2: TEdit
      Left = 24
      Top = 40
      Width = 201
      Height = 29
      TabOrder = 0
      OnKeyPress = Edit2KeyPress
    end
  end
  object GroupBox2: TGroupBox
    Left = 336
    Top = 96
    Width = 249
    Height = 105
    Caption = #35831#36755#20837#20801#35768#35823#24046#65306
    TabOrder = 3
    object Edit3: TEdit
      Left = 32
      Top = 40
      Width = 201
      Height = 29
      TabOrder = 0
      OnKeyPress = Edit2KeyPress
    end
  end
  object Edit4: TEdit
    Left = 208
    Top = 288
    Width = 377
    Height = 53
    AutoSize = False
    Color = clInactiveCaption
    TabOrder = 4
  end
end