用于开发税务票据管理的软件
源代码在线查看: unit2.dfm
object Form2: TForm2
Left = 192
Top = 107
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderStyle = bsToolWindow
Caption = 'Records'
ClientHeight = 340
ClientWidth = 358
Color = clWindowFrame
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
OnKeyPress = FormKeyPress
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object SpeedButton1: TSpeedButton
Left = 8
Top = 288
Width = 129
Height = 22
Caption = 'OK'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold, fsItalic]
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 8
Top = 264
Width = 129
Height = 22
Caption = 'Clear Records'
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = SpeedButton2Click
end
object StringGrid1: TStringGrid
Left = 0
Top = 0
Width = 320
Height = 257
Color = clWindowFrame
ColCount = 3
DefaultColWidth = 16
DefaultRowHeight = 16
Enabled = False
FixedCols = 0
RowCount = 10
FixedRows = 0
Font.Charset = RUSSIAN_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold, fsItalic]
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSelect]
ParentFont = False
TabOrder = 0
end
end