314 lines
7.5 KiB
Plaintext
314 lines
7.5 KiB
Plaintext
|
object frmLabelAdd: TfrmLabelAdd
|
||
|
Left = 191
|
||
|
Top = 109
|
||
|
Width = 997
|
||
|
Height = 612
|
||
|
BorderIcons = [biMaximize]
|
||
|
Caption = #26631#31614#32534#36753
|
||
|
Color = clBtnFace
|
||
|
Font.Charset = ANSI_CHARSET
|
||
|
Font.Color = clWindowText
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = []
|
||
|
OldCreateOrder = False
|
||
|
OnCreate = FormCreate
|
||
|
OnShow = FormShow
|
||
|
PixelsPerInch = 96
|
||
|
TextHeight = 12
|
||
|
object Panel1: TPanel
|
||
|
Left = 0
|
||
|
Top = 28
|
||
|
Width = 413
|
||
|
Height = 513
|
||
|
BevelInner = bvRaised
|
||
|
BevelOuter = bvLowered
|
||
|
TabOrder = 0
|
||
|
object Label2: TLabel
|
||
|
Left = 31
|
||
|
Top = 21
|
||
|
Width = 60
|
||
|
Height = 12
|
||
|
Caption = #26631#31614#25991#20214#65306
|
||
|
Font.Charset = GB2312_CHARSET
|
||
|
Font.Color = clBlue
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = []
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object Label3: TLabel
|
||
|
Left = 31
|
||
|
Top = 95
|
||
|
Width = 60
|
||
|
Height = 12
|
||
|
Caption = #22791' '#27880#65306
|
||
|
end
|
||
|
object Label9: TLabel
|
||
|
Left = 31
|
||
|
Top = 71
|
||
|
Width = 60
|
||
|
Height = 12
|
||
|
Caption = #26631#31614#21517#31216#65306
|
||
|
Font.Charset = ANSI_CHARSET
|
||
|
Font.Color = clBlue
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = []
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object Label10: TLabel
|
||
|
Left = 31
|
||
|
Top = 47
|
||
|
Width = 60
|
||
|
Height = 12
|
||
|
Caption = #26631#31614#31867#22411#65306
|
||
|
Font.Charset = ANSI_CHARSET
|
||
|
Font.Color = clBlue
|
||
|
Font.Height = -12
|
||
|
Font.Name = #23435#20307
|
||
|
Font.Style = []
|
||
|
ParentFont = False
|
||
|
end
|
||
|
object LabelFileName: TBtnEditA
|
||
|
Left = 92
|
||
|
Top = 17
|
||
|
Width = 260
|
||
|
Height = 20
|
||
|
ReadOnly = True
|
||
|
TabOrder = 0
|
||
|
OnBtnClick = LabelFileNameBtnClick
|
||
|
end
|
||
|
object beizhu: TMemo
|
||
|
Left = 92
|
||
|
Top = 92
|
||
|
Width = 257
|
||
|
Height = 149
|
||
|
ScrollBars = ssBoth
|
||
|
TabOrder = 1
|
||
|
end
|
||
|
object LabelCaption: TEdit
|
||
|
Left = 92
|
||
|
Top = 67
|
||
|
Width = 258
|
||
|
Height = 20
|
||
|
ReadOnly = True
|
||
|
TabOrder = 2
|
||
|
end
|
||
|
object LabelType: TRTComboBox
|
||
|
Tag = 99
|
||
|
Left = 92
|
||
|
Top = 43
|
||
|
Width = 260
|
||
|
Height = 20
|
||
|
Style = csDropDownList
|
||
|
ItemHeight = 12
|
||
|
ItemIndex = 0
|
||
|
TabOrder = 3
|
||
|
Text = #20013#25991#26631#31614
|
||
|
Items.Strings = (
|
||
|
#20013#25991#26631#31614
|
||
|
#33521#25991#26631#31614
|
||
|
#20013#33521#25991#26631#31614)
|
||
|
end
|
||
|
end
|
||
|
object ToolBar1: TToolBar
|
||
|
Left = 0
|
||
|
Top = 0
|
||
|
Width = 981
|
||
|
AutoSize = True
|
||
|
ButtonHeight = 30
|
||
|
ButtonWidth = 83
|
||
|
Caption = 'ToolBar2'
|
||
|
Color = clBtnFace
|
||
|
Flat = True
|
||
|
Images = DataLink_CYZZ.ThreeImgList
|
||
|
List = True
|
||
|
ParentColor = False
|
||
|
ShowCaptions = True
|
||
|
TabOrder = 1
|
||
|
Transparent = False
|
||
|
object Tsave: TToolButton
|
||
|
Left = 0
|
||
|
Top = 0
|
||
|
AutoSize = True
|
||
|
Caption = #20445#23384#26631#31614
|
||
|
ImageIndex = 5
|
||
|
OnClick = TsaveClick
|
||
|
end
|
||
|
object Tclose: TToolButton
|
||
|
Left = 87
|
||
|
Top = 0
|
||
|
AutoSize = True
|
||
|
Caption = #20851#38381
|
||
|
ImageIndex = 21
|
||
|
OnClick = TcloseClick
|
||
|
end
|
||
|
end
|
||
|
object RMPreview1: TRMPreview
|
||
|
Left = 428
|
||
|
Top = 32
|
||
|
Width = 553
|
||
|
Height = 541
|
||
|
Align = alRight
|
||
|
BevelOuter = bvLowered
|
||
|
Caption = #26631#31614#39044#35272
|
||
|
TabOrder = 2
|
||
|
OnDblClick = RMPreview1DblClick
|
||
|
Options.RulerUnit = rmutScreenPixels
|
||
|
Options.RulerVisible = False
|
||
|
Options.DrawBorder = False
|
||
|
Options.BorderPen.Color = clGray
|
||
|
Options.BorderPen.Style = psDash
|
||
|
end
|
||
|
object ADOQueryCmd: TADOQuery
|
||
|
Connection = DataLink_CYZZ.ADOLink
|
||
|
CommandTimeout = 300
|
||
|
Parameters = <>
|
||
|
Left = 512
|
||
|
Top = 208
|
||
|
end
|
||
|
object OpenDialog1: TOpenDialog
|
||
|
Filter = 'RMFl(*.rmf)|*.rmf'
|
||
|
InitialDir = '.'
|
||
|
Left = 200
|
||
|
Top = 4
|
||
|
end
|
||
|
object RMGridReport1: TRMGridReport
|
||
|
ThreadPrepareReport = True
|
||
|
InitialZoom = pzDefault
|
||
|
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
|
||
|
ShowProgress = False
|
||
|
DefaultCollate = False
|
||
|
ShowPrintDialog = False
|
||
|
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
|
||
|
Preview = RMPreview1
|
||
|
PreviewOptions.RulerUnit = rmutScreenPixels
|
||
|
PreviewOptions.RulerVisible = False
|
||
|
PreviewOptions.DrawBorder = False
|
||
|
PreviewOptions.BorderPen.Color = clGray
|
||
|
PreviewOptions.BorderPen.Style = psDash
|
||
|
CompressLevel = rmzcFastest
|
||
|
CompressThread = False
|
||
|
LaterBuildEvents = True
|
||
|
OnlyOwnerDataSet = False
|
||
|
Left = 336
|
||
|
Top = 8
|
||
|
ReportData = {}
|
||
|
end
|
||
|
object ADOQueryTmp: TADOQuery
|
||
|
Connection = DataLink_CYZZ.ADOLink
|
||
|
LockType = ltReadOnly
|
||
|
CommandTimeout = 300
|
||
|
Parameters = <>
|
||
|
Left = 528
|
||
|
Top = 184
|
||
|
end
|
||
|
object RMGridReportDesigner1: TRMGridReportDesigner
|
||
|
Left = 376
|
||
|
Top = 8
|
||
|
end
|
||
|
object RMBarCodeObject1: TRMBarCodeObject
|
||
|
Left = 280
|
||
|
Top = 4
|
||
|
end
|
||
|
object RMBMPExport1: TRMBMPExport
|
||
|
ScaleX = 1.000000000000000000
|
||
|
ScaleY = 1.000000000000000000
|
||
|
Left = 408
|
||
|
Top = 8
|
||
|
end
|
||
|
object RMXLSExport1: TRMXLSExport
|
||
|
ShowAfterExport = True
|
||
|
ExportPrecision = 1
|
||
|
PagesOfSheet = 10
|
||
|
ExportImages = True
|
||
|
ExportFrames = True
|
||
|
ExportImageFormat = ifBMP
|
||
|
JPEGQuality = 0
|
||
|
ScaleX = 1.000000000000000000
|
||
|
ScaleY = 1.000000000000000000
|
||
|
CompressFile = False
|
||
|
Left = 440
|
||
|
Top = 8
|
||
|
end
|
||
|
object RMDS_Main: TRMDBDataSet
|
||
|
Visible = True
|
||
|
AliasName = #26631#31614#25968#25454
|
||
|
Left = 498
|
||
|
Top = 72
|
||
|
end
|
||
|
object RMDataDictionary1: TRMDataDictionary
|
||
|
FieldFieldNames.TableName = 'TableName'
|
||
|
FieldFieldNames.FieldName = 'FieldName'
|
||
|
FieldFieldNames.FieldAlias = 'FieldAlias'
|
||
|
Left = 562
|
||
|
Top = 72
|
||
|
end
|
||
|
object ADOQuery1: TADOQuery
|
||
|
Connection = DataLink_CYZZ.ADOLink
|
||
|
Parameters = <>
|
||
|
Left = 352
|
||
|
Top = 480
|
||
|
end
|
||
|
object RMGridReport2: TRMGridReport
|
||
|
ThreadPrepareReport = True
|
||
|
InitialZoom = pzDefault
|
||
|
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
|
||
|
ShowProgress = False
|
||
|
DefaultCollate = False
|
||
|
ShowPrintDialog = False
|
||
|
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
|
||
|
PreviewOptions.RulerUnit = rmutScreenPixels
|
||
|
PreviewOptions.RulerVisible = False
|
||
|
PreviewOptions.DrawBorder = False
|
||
|
PreviewOptions.BorderPen.Color = clGray
|
||
|
PreviewOptions.BorderPen.Style = psDash
|
||
|
Dataset = RMDS_Main
|
||
|
CompressLevel = rmzcFastest
|
||
|
CompressThread = False
|
||
|
LaterBuildEvents = True
|
||
|
OnlyOwnerDataSet = False
|
||
|
Left = 432
|
||
|
Top = 368
|
||
|
ReportData = {}
|
||
|
end
|
||
|
object ADOQueryCmdSC: TADOQuery
|
||
|
Connection = DataLink_CYZZ.ADOLink
|
||
|
Parameters = <>
|
||
|
Left = 296
|
||
|
Top = 304
|
||
|
object ADOQueryCmdFileContent: TBlobField
|
||
|
FieldName = 'Files'
|
||
|
end
|
||
|
object ADOQueryCmdFtFileName: TStringField
|
||
|
FieldName = 'FileName'
|
||
|
Size = 40
|
||
|
end
|
||
|
object ADOQueryCmdFileEditDate: TDateTimeField
|
||
|
FieldName = 'FileEditDate'
|
||
|
end
|
||
|
object ADOQueryCmdFileSize: TFloatField
|
||
|
FieldName = 'FileSize'
|
||
|
end
|
||
|
object ADOQueryCmdFiller: TStringField
|
||
|
FieldName = 'Filler'
|
||
|
end
|
||
|
object ADOQueryCmdLastEditTime: TDateTimeField
|
||
|
FieldName = 'LastEditTime'
|
||
|
end
|
||
|
object ADOQueryCmdLastEditer: TStringField
|
||
|
FieldName = 'LastEditer'
|
||
|
end
|
||
|
object ADOQueryCmdFileCreateDate: TDateTimeField
|
||
|
FieldName = 'FileCreateDate'
|
||
|
end
|
||
|
object ADOQueryCmdchildPath: TStringField
|
||
|
FieldName = 'FilePath'
|
||
|
end
|
||
|
object ADOQueryCmdFileType: TStringField
|
||
|
FieldName = 'FileType'
|
||
|
end
|
||
|
end
|
||
|
end
|