用于开发税务票据管理的软件

源代码在线查看: unit9.dfm

软件大小: 36519 K
上传用户: jill
关键词: 软件
下载地址: 免注册下载 普通下载 VIP

相关代码

				object Form9: TForm9
				  Left = 295
				  Top = 108
				  Width = 332
				  Height = 469
				  Caption = #26597#35810#26465#20214
				  Color = clBtnFace
				  Font.Charset = DEFAULT_CHARSET
				  Font.Color = clWindowText
				  Font.Height = -11
				  Font.Name = 'MS Sans Serif'
				  Font.Style = []
				  OldCreateOrder = False
				  ShowHint = True
				  PixelsPerInch = 96
				  TextHeight = 13
				  object CheckBox1: TCheckBox
				    Left = 40
				    Top = 16
				    Width = 49
				    Height = 17
				    Caption = #26085#26399
				    TabOrder = 0
				    Visible = False
				    OnClick = CheckBox1Click
				  end
				  object CheckBox2: TCheckBox
				    Left = 96
				    Top = 16
				    Width = 57
				    Height = 17
				    Caption = #22411#21495
				    TabOrder = 1
				    Visible = False
				    OnClick = CheckBox2Click
				  end
				  object CheckBox3: TCheckBox
				    Left = 168
				    Top = 16
				    Width = 57
				    Height = 17
				    Caption = #20018#21495
				    TabOrder = 2
				    Visible = False
				    OnClick = CheckBox3Click
				  end
				  object CheckBox4: TCheckBox
				    Left = 240
				    Top = 16
				    Width = 73
				    Height = 17
				    Caption = #29992#25143#21517
				    TabOrder = 3
				    Visible = False
				    OnClick = CheckBox4Click
				  end
				  object Panel1: TPanel
				    Left = 88
				    Top = 48
				    Width = 137
				    Height = 73
				    TabOrder = 4
				    Visible = False
				    object Label1: TLabel
				      Left = 0
				      Top = 16
				      Width = 12
				      Height = 13
				      Caption = #20174
				    end
				    object Label2: TLabel
				      Left = 0
				      Top = 48
				      Width = 12
				      Height = 13
				      Caption = #21040
				    end
				    object y1: TComboBox
				      Left = 16
				      Top = 16
				      Width = 41
				      Height = 21
				      ItemHeight = 13
				      ItemIndex = 0
				      TabOrder = 0
				      Text = '02'
				      Items.Strings = (
				        '02'
				        '03'
				        '04'
				        '05'
				        '06'
				        '07'
				        '08'
				        '09')
				    end
				    object m1: TComboBox
				      Left = 56
				      Top = 16
				      Width = 33
				      Height = 21
				      ItemHeight = 13
				      ItemIndex = 0
				      TabOrder = 1
				      Text = '1'
				      Items.Strings = (
				        '1'
				        '2'
				        '3'
				        '4'
				        '5'
				        '6'
				        '7'
				        '8'
				        '9'
				        '10'
				        '11'
				        '12')
				    end
				    object d1: TComboBox
				      Left = 88
				      Top = 16
				      Width = 33
				      Height = 21
				      ItemHeight = 13
				      ItemIndex = 0
				      TabOrder = 2
				      Text = '1'
				      Items.Strings = (
				        '1'
				        '2'
				        '3'
				        '4'
				        '5'
				        '6'
				        '7'
				        '8'
				        '9'
				        '10'
				        '11'
				        '12'
				        '13'
				        '14'
				        '15'
				        '16'
				        '17'
				        '18'
				        '19'
				        '20'
				        '21'
				        '22'
				        '23'
				        '24'
				        '25'
				        '26'
				        '27'
				        '28'
				        '29'
				        '30'
				        '31')
				    end
				    object d2: TComboBox
				      Left = 88
				      Top = 48
				      Width = 33
				      Height = 21
				      ItemHeight = 13
				      ItemIndex = 0
				      TabOrder = 3
				      Text = '1'
				      Items.Strings = (
				        '1'
				        '2'
				        '3'
				        '4'
				        '5'
				        '6'
				        '7'
				        '8'
				        '9'
				        '10'
				        '11'
				        '12'
				        '13'
				        '14'
				        '15'
				        '16'
				        '17'
				        '18'
				        '19'
				        '20'
				        '21'
				        '22'
				        '23'
				        '24'
				        '25'
				        '26'
				        '27'
				        '28'
				        '29'
				        '30'
				        '31')
				    end
				    object y2: TComboBox
				      Left = 16
				      Top = 48
				      Width = 41
				      Height = 21
				      ItemHeight = 13
				      ItemIndex = 0
				      TabOrder = 4
				      Text = '02'
				      Items.Strings = (
				        '02'
				        '03'
				        '04'
				        '05'
				        '06'
				        '07'
				        '08'
				        '09')
				    end
				    object m2: TComboBox
				      Left = 56
				      Top = 48
				      Width = 33
				      Height = 21
				      ItemHeight = 13
				      ItemIndex = 0
				      TabOrder = 5
				      Text = '1'
				      Items.Strings = (
				        '1'
				        '2'
				        '3'
				        '4'
				        '5'
				        '6'
				        '7'
				        '8'
				        '9'
				        '10'
				        '11'
				        '12')
				    end
				  end
				  object Panel2: TPanel
				    Left = 88
				    Top = 136
				    Width = 137
				    Height = 73
				    TabOrder = 5
				    Visible = False
				    object Label4: TLabel
				      Left = 16
				      Top = 8
				      Width = 24
				      Height = 13
				      Caption = #22411#21495
				    end
				    object Edit2: TEdit
				      Left = 16
				      Top = 24
				      Width = 81
				      Height = 21
				      TabOrder = 0
				    end
				  end
				  object Panel3: TPanel
				    Left = 89
				    Top = 216
				    Width = 137
				    Height = 73
				    TabOrder = 6
				    Visible = False
				    object Label5: TLabel
				      Left = 16
				      Top = 8
				      Width = 24
				      Height = 13
				      Caption = #20018#21495
				    end
				    object Edit3: TEdit
				      Left = 16
				      Top = 24
				      Width = 81
				      Height = 21
				      TabOrder = 0
				    end
				  end
				  object Panel4: TPanel
				    Left = 89
				    Top = 304
				    Width = 137
				    Height = 73
				    TabOrder = 7
				    Visible = False
				    object Label3: TLabel
				      Left = 16
				      Top = 16
				      Width = 48
				      Height = 13
				      Caption = #29992#25143#21517#65306
				    end
				    object Edit1: TEdit
				      Left = 16
				      Top = 40
				      Width = 89
				      Height = 21
				      TabOrder = 0
				    end
				  end
				  object Button1: TButton
				    Left = 120
				    Top = 392
				    Width = 75
				    Height = 25
				    Caption = #26597#35810
				    TabOrder = 8
				    OnClick = Button1Click
				  end
				  object init: TButton
				    Left = 256
				    Top = 240
				    Width = 49
				    Height = 25
				    Caption = 'init'
				    TabOrder = 9
				    Visible = False
				    OnClick = initClick
				  end
				  object XPMenu1: TXPMenu
				    DimLevel = 30
				    GrayLevel = 10
				    Font.Charset = GB2312_CHARSET
				    Font.Color = clMenuText
				    Font.Height = -11
				    Font.Name = 'Tahoma'
				    Font.Style = []
				    Color = clBtnFace
				    DrawMenuBar = False
				    IconBackColor = clBtnFace
				    MenuBarColor = clBtnFace
				    SelectColor = clHighlight
				    SelectBorderColor = clHighlight
				    SelectFontColor = clMenuText
				    DisabledColor = clInactiveCaption
				    SeparatorColor = clBtnFace
				    CheckedColor = clHighlight
				    IconWidth = 24
				    DrawSelect = True
				    UseSystemColors = True
				    UseDimColor = False
				    OverrideOwnerDraw = False
				    Gradient = False
				    FlatMenu = False
				    AutoDetect = False
				    Active = True
				    Left = 248
				    Top = 72
				  end
				end
							

相关资源