📄 unit1.~dfm
字号:
object Form1: TForm1
Left = 231
Top = 122
Width = 696
Height = 480
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Button1: TButton
Left = 276
Top = 164
Width = 75
Height = 25
Caption = 'Button1'
TabOrder = 0
OnClick = Button1Click
end
object Crpe1: TCrpe
About = 'Version and Credits...'
DesignControls = 'Design-Time Window Controls'
Version.Crpe.Major = 0
Version.Crpe.Minor = 0
Version.Crpe.Release = 0
Version.Crpe.Build = 0
Version.Report.Major = 0
Version.Report.Minor = 0
Version.Report.Letter = #0
Version.Windows.Platform = 'NT'
Version.Windows.Major = 5
Version.Windows.Minor = 1
Version.Windows.Build = '2600'
TempPath = 'C:\DOCUME~1\ck\LOCALS~1\Temp\'
PrintDate.Day = 0
PrintDate.Month = 0
PrintDate.Year = 0
Subreports.Number = 0
Subreports.Item.Top = -1
Subreports.Item.Left = -1
Subreports.Item.Width = -1
Subreports.Item.Height = -1
Subreports.Item.Border.Left = lsNone
Subreports.Item.Border.Right = lsNone
Subreports.Item.Border.Top = lsNone
Subreports.Item.Border.Bottom = lsNone
Subreports.Item.Border.TightHorizontal = False
Subreports.Item.Border.DropShadow = False
Subreports.Item.Border.ForeColor = clNone
Subreports.Item.Border.BackgroundColor = clNone
Subreports.Item.NLinks = 0
GroupSortFields.Number = -1
Groups.Number = -1
Groups.Item.CustomizeGroupName = False
ParamFields.AllowDialog = True
ParamFields.Item.Top = -1
ParamFields.Item.Left = -1
ParamFields.Item.Width = -1
ParamFields.Item.Height = -1
ParamFields.Item.Border.Left = lsNone
ParamFields.Item.Border.Right = lsNone
ParamFields.Item.Border.Top = lsNone
ParamFields.Item.Border.Bottom = lsNone
ParamFields.Item.Border.TightHorizontal = False
ParamFields.Item.Border.DropShadow = False
ParamFields.Item.Border.ForeColor = clNone
ParamFields.Item.Border.BackgroundColor = clNone
ParamFields.Item.Format.Alignment = haDefault
ParamFields.Item.Format.SuppressIfDuplicated = False
ParamFields.Item.Format.CanGrow = False
ParamFields.Item.Format.MaxNLines = 0
ParamFields.Item.Format.Field.Number.CurrencySymbol = '$'
ParamFields.Item.Format.Field.Number.ThousandSymbol = ','
ParamFields.Item.Format.Field.Number.DecimalSymbol = '.'
ParamFields.Item.Format.Field.Number.ShowZeroValueAs = '0'
ParamFields.Item.Format.Field.Date.FirstSeparator = '/'
ParamFields.Item.Format.Field.Date.SecondSeparator = '/'
ParamFields.Item.Format.Field.Time.AMString = 'AM'
ParamFields.Item.Format.Field.Time.PMString = 'PM'
ParamFields.Item.Format.Field.Time.HourMinSeparator = ':'
ParamFields.Item.Format.Field.Time.MinSecSeparator = ':'
ParamFields.Item.Format.Field.Paragraph.LineSpacing = 1.000000000000000000
ParamFields.Item.Font.Charset = DEFAULT_CHARSET
ParamFields.Item.Font.Color = clWindowText
ParamFields.Item.Font.Height = -11
ParamFields.Item.Font.Name = 'MS Sans Serif'
ParamFields.Item.Font.Style = []
ParamFields.Item.HiliteConditions.Item.FontColor = clNone
ParamFields.Item.HiliteConditions.Item.Background = clNone
ParamFields.Item.ParamType = pfNoValue
ParamFields.Item.ParamSource = psReport
ParamFields.Item.Info.AllowNull = True
ParamFields.Item.Info.AllowEditing = True
ParamFields.Item.Info.AllowMultipleValues = False
ParamFields.Item.Info.ValueType = vtDiscrete
ParamFields.Item.Info.PartOfGroup = False
ParamFields.Item.Info.MutuallyExclusiveGroup = True
ParamFields.Item.Info.GroupNum = -1
ParamFields.Item.ValueLimit = False
ParamFields.Item.Ranges.Item.Bounds = IncludeStartAndEnd
ParamFields.Item.NeedsCurrentValue = False
ParamFields.Item.IsLinked = False
Formulas.Item.Top = -1
Formulas.Item.Left = -1
Formulas.Item.Width = -1
Formulas.Item.Height = -1
Formulas.Item.Border.Left = lsNone
Formulas.Item.Border.Right = lsNone
Formulas.Item.Border.Top = lsNone
Formulas.Item.Border.Bottom = lsNone
Formulas.Item.Border.TightHorizontal = False
Formulas.Item.Border.DropShadow = False
Formulas.Item.Border.ForeColor = clNone
Formulas.Item.Border.BackgroundColor = clNone
Formulas.Item.Format.Alignment = haDefault
Formulas.Item.Format.SuppressIfDuplicated = False
Formulas.Item.Format.CanGrow = False
Formulas.Item.Format.MaxNLines = 0
Formulas.Item.Format.Field.Number.CurrencySymbol = '$'
Formulas.Item.Format.Field.Number.ThousandSymbol = ','
Formulas.Item.Format.Field.Number.DecimalSymbol = '.'
Formulas.Item.Format.Field.Number.ShowZeroValueAs = '0'
Formulas.Item.Format.Field.Date.FirstSeparator = '/'
Formulas.Item.Format.Field.Date.SecondSeparator = '/'
Formulas.Item.Format.Field.Time.AMString = 'AM'
Formulas.Item.Format.Field.Time.PMString = 'PM'
Formulas.Item.Format.Field.Time.HourMinSeparator = ':'
Formulas.Item.Format.Field.Time.MinSecSeparator = ':'
Formulas.Item.Format.Field.Paragraph.LineSpacing = 1.000000000000000000
Formulas.Item.Font.Charset = DEFAULT_CHARSET
Formulas.Item.Font.Color = clWindowText
Formulas.Item.Font.Height = -11
Formulas.Item.Font.Name = 'MS Sans Serif'
Formulas.Item.Font.Style = []
Formulas.Item.HiliteConditions.Item.FontColor = clNone
Formulas.Item.HiliteConditions.Item.Background = clNone
AreaFormat.Item.NSections = 0
SectionSize.Item.Height = -1
SectionSize.Item.Width = -1
SQLExpressions.Item.Top = -1
SQLExpressions.Item.Left = -1
SQLExpressions.Item.Width = -1
SQLExpressions.Item.Height = -1
SQLExpressions.Item.Border.Left = lsNone
SQLExpressions.Item.Border.Right = lsNone
SQLExpressions.Item.Border.Top = lsNone
SQLExpressions.Item.Border.Bottom = lsNone
SQLExpressions.Item.Border.TightHorizontal = False
SQLExpressions.Item.Border.DropShadow = False
SQLExpressions.Item.Border.ForeColor = clNone
SQLExpressions.Item.Border.BackgroundColor = clNone
SQLExpressions.Item.Format.Alignment = haDefault
SQLExpressions.Item.Format.SuppressIfDuplicated = False
SQLExpressions.Item.Format.CanGrow = False
SQLExpressions.Item.Format.MaxNLines = 0
SQLExpressions.Item.Format.Field.Number.CurrencySymbol = '$'
SQLExpressions.Item.Format.Field.Number.ThousandSymbol = ','
SQLExpressions.Item.Format.Field.Number.DecimalSymbol = '.'
SQLExpressions.Item.Format.Field.Number.ShowZeroValueAs = '0'
SQLExpressions.Item.Format.Field.Date.FirstSeparator = '/'
SQLExpressions.Item.Format.Field.Date.SecondSeparator = '/'
SQLExpressions.Item.Format.Field.Time.AMString = 'AM'
SQLExpressions.Item.Format.Field.Time.PMString = 'PM'
SQLExpressions.Item.Format.Field.Time.HourMinSeparator = ':'
SQLExpressions.Item.Format.Field.Time.MinSecSeparator = ':'
SQLExpressions.Item.Format.Field.Paragraph.LineSpacing = 1.000000000000000000
SQLExpressions.Item.Font.Charset = DEFAULT_CHARSET
SQLExpressions.Item.Font.Color = clWindowText
SQLExpressions.Item.Font.Height = -11
SQLExpressions.Item.Font.Name = 'MS Sans Serif'
SQLExpressions.Item.Font.Style = []
SQLExpressions.Item.HiliteConditions.Item.FontColor = clNone
SQLExpressions.Item.HiliteConditions.Item.Background = clNone
LogOnInfo.Item.Table = -1
SessionInfo.Table = -1
SessionInfo.Item.Propagate = True
ExportOptions.Excel.Constant = 36.000000000000000000
ExportOptions.Excel.WorksheetFunctions = False
ExportOptions.Excel.FirstPage = 1
ExportOptions.Excel.LastPage = 1
ExportOptions.HTML.PageNavigator = True
ExportOptions.HTML.SeparatePages = True
ExportOptions.HTML.FirstPage = 1
ExportOptions.HTML.LastPage = 1
ExportOptions.RTF.FirstPage = 1
ExportOptions.RTF.LastPage = 1
ExportOptions.Word.FirstPage = 1
ExportOptions.Word.LastPage = 1
ExportOptions.PDF.FirstPage = 1
ExportOptions.PDF.LastPage = 1
ExportOptions.Text.StringDelimiter = '"'
ExportOptions.Text.FieldSeparator = ','
Lines.Item.LineStyle = lsNone
Lines.Item.Left = -1
Lines.Item.Right = -1
Lines.Item.Width = -1
Lines.Item.Top = -1
Lines.Item.Bottom = -1
Lines.Item.Color = clNone
Lines.Item.Extend = False
Lines.Item.Suppress = False
Boxes.Number = -1
Pictures.Item.Top = -1
Pictures.Item.Left = -1
Pictures.Item.Width = -1
Pictures.Item.Height = -1
Pictures.Item.Border.Left = lsNone
Pictures.Item.Border.Right = lsNone
Pictures.Item.Border.Top = lsNone
Pictures.Item.Border.Bottom = lsNone
Pictures.Item.Border.TightHorizontal = False
Pictures.Item.Border.DropShadow = False
Pictures.Item.Border.ForeColor = clNone
Pictures.Item.Border.BackgroundColor = clNone
Pictures.Item.CropLeft = -1
Pictures.Item.CropRight = -1
Pictures.Item.CropTop = -1
Pictures.Item.CropBottom = -1
TextObjects.Item.Top = -1
TextObjects.Item.Left = -1
TextObjects.Item.Width = -1
TextObjects.Item.Height = -1
TextObjects.Item.Border.Left = lsNone
TextObjects.Item.Border.Right = lsNone
TextObjects.Item.Border.Top = lsNone
TextObjects.Item.Border.Bottom = lsNone
TextObjects.Item.Border.TightHorizontal = False
TextObjects.Item.Border.DropShadow = False
TextObjects.Item.Border.ForeColor = clNone
TextObjects.Item.Border.BackgroundColor = clNone
TextObjects.Item.Format.Alignment = haDefault
TextObjects.Item.Format.SuppressIfDuplicated = False
TextObjects.Item.Format.CanGrow = False
TextObjects.Item.Format.MaxNLines = 0
TextObjects.Item.Format.Paragraph.LineSpacing = 1.000000000000000000
TextObjects.Item.Font.Charset = DEFAULT_CHARSET
TextObjects.Item.Font.Color = clWindowText
TextObjects.Item.Font.Height = -11
TextObjects.Item.Font.Name = 'MS Sans Serif'
TextObjects.Item.Font.Style = []
TextObjects.Item.Paragraphs.Item.Alignment = haDefault
TextObjects.Item.Paragraphs.Item.IndentFirstLine = 0
TextObjects.Item.Paragraphs.Item.IndentLeft = 0
TextObjects.Item.Paragraphs.Item.IndentRight = 0
TextObjects.Item.Paragraphs.Item.TextStart = 0
TextObjects.Item.Paragraphs.Item.TextEnd = 0
TextObjects.Item.Paragraphs.Item.TabStops.Item.Alignment = haDefault
TextObjects.Item.Paragraphs.Item.TabStops.Item.Offset = -1
TextObjects.Item.EmbeddedFields.Item.FieldObjectType = oftNone
TextObjects.Item.EmbeddedFields.Item.FieldType = fvUnknown
TextObjects.Item.EmbeddedFields.Item.TextStart = 0
TextObjects.Item.EmbeddedFields.Item.TextEnd = 0
TextObjects.Item.EmbeddedFields.Item.Format.Alignment = haDefault
TextObjects.Item.EmbeddedFields.Item.Format.SuppressIfDuplicated = False
TextObjects.Item.EmbeddedFields.Item.Format.CanGrow = False
TextObjects.Item.EmbeddedFields.Item.Format.MaxNLines = 0
TextObjects.Item.EmbeddedFields.Item.Format.Field.Number.CurrencySymbol = '$'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Number.ThousandSymbol = ','
TextObjects.Item.EmbeddedFields.Item.Format.Field.Number.DecimalSymbol = '.'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Number.ShowZeroValueAs = '0'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Date.FirstSeparator = '/'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Date.SecondSeparator = '/'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Time.AMString = 'AM'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Time.PMString = 'PM'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Time.HourMinSeparator = ':'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Time.MinSecSeparator = ':'
TextObjects.Item.EmbeddedFields.Item.Format.Field.Paragraph.LineSpacing = 1.000000000000000000
TextObjects.Item.EmbeddedFields.Item.Border.Left = lsNone
TextObjects.Item.EmbeddedFields.Item.Border.Right = lsNone
TextObjects.Item.EmbeddedFields.Item.Border.Top = lsNone
TextObjects.Item.EmbeddedFields.Item.Border.Bottom = lsNone
TextObjects.Item.EmbeddedFields.Item.Border.TightHorizontal = False
TextObjects.Item.EmbeddedFields.Item.Border.DropShadow = False
TextObjects.Item.EmbeddedFields.Item.Border.ForeColor = clNone
TextObjects.Item.EmbeddedFields.Item.Border.BackgroundColor = clNone
TextObjects.Item.TextSize = -1
TextObjects.Item.TextHeight = -1
OleObjects.Item.Top = -1
OleObjects.Item.Left = -1
OleObjects.Item.Width = -1
OleObjects.Item.Height = -1
OleObjects.Item.Border.Left = lsNone
OleObjects.Item.Border.Right = lsNone
OleObjects.Item.Border.Top = lsNone
OleObjects.Item.Border.Bottom = lsNone
OleObjects.Item.Border.TightHorizontal = False
OleObjects.Item.Border.DropShadow = False
OleObjects.Item.Border.ForeColor = clNone
OleObjects.Item.Border.BackgroundColor = clNone
CrossTabs.Item.Top = -1
CrossTabs.Item.Left = -1
CrossTabs.Item.Width = -1
CrossTabs.Item.Height = -1
CrossTabs.Item.Border.Left = lsNone
CrossTabs.Item.Border.Right = lsNone
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -