📄 uvmadgsick.dfm
字号:
inherited VMADGSick: TVMADGSick
Width = 702
Height = 498
inherited RzPanel1: TRzPanel
Width = 702
Height = 498
inherited RzBackground1: TRzBackground
Width = 702
Height = 498
end
inherited RzPanel2: TRzPanel
Width = 702
Height = 498
object Splitter1: TSplitter [0]
Left = 313
Top = 0
Width = 4
Height = 498
Color = clAppWorkSpace
ParentColor = False
end
inherited Grid: TcxGrid
Width = 313
Height = 498
Align = alLeft
inherited GridDBTableView: TcxGridDBTableView
DataController.Filter.Criteria = {FFFFFFFF0000000000}
object GridDBTableViewSICKID: TcxGridDBColumn
DataBinding.FieldName = 'SICKID'
end
object GridDBTableViewBIRTHDAY: TcxGridDBColumn
DataBinding.FieldName = 'BIRTHDAY'
end
object GridDBTableViewCNAME: TcxGridDBColumn
SortOrder = soAscending
DataBinding.FieldName = 'CNAME'
end
object GridDBTableViewCREATED: TcxGridDBColumn
DataBinding.FieldName = 'CREATED'
end
object GridDBTableViewISVALID: TcxGridDBColumn
DataBinding.FieldName = 'ISVALID'
end
object GridDBTableViewISACTIVE: TcxGridDBColumn
DataBinding.FieldName = 'ISACTIVE'
end
object GridDBTableViewST: TcxGridDBColumn
DataBinding.FieldName = 'ST'
end
object GridDBTableViewUPDATED: TcxGridDBColumn
DataBinding.FieldName = 'UPDATED'
end
object GridDBTableViewPROFESSIONID: TcxGridDBColumn
DataBinding.FieldName = 'PROFESSIONID'
end
object GridDBTableViewWEDLOCKID: TcxGridDBColumn
DataBinding.FieldName = 'WEDLOCKID'
end
object GridDBTableViewNATIVEPLACEID: TcxGridDBColumn
DataBinding.FieldName = 'NATIVEPLACEID'
end
object GridDBTableViewNATIONID: TcxGridDBColumn
DataBinding.FieldName = 'NATIONID'
end
object GridDBTableViewPAYMENTMETHODID: TcxGridDBColumn
DataBinding.FieldName = 'PAYMENTMETHODID'
end
object GridDBTableViewCREATEBY: TcxGridDBColumn
DataBinding.FieldName = 'CREATEBY'
end
object GridDBTableViewUPDATEBY: TcxGridDBColumn
DataBinding.FieldName = 'UPDATEBY'
end
object GridDBTableViewCODE: TcxGridDBColumn
DataBinding.FieldName = 'CODE'
end
object GridDBTableViewISARREARAGE: TcxGridDBColumn
DataBinding.FieldName = 'ISARREARAGE'
end
object GridDBTableViewSEX: TcxGridDBColumn
PropertiesClassName = 'TcxCheckComboBoxProperties'
Properties.Delimiter = ';'
Properties.EmptySelectionText = 'None selected'
Properties.Items = <
item
Description = #30007
end
item
Description = #22899
end>
DataBinding.FieldName = 'SEX'
end
object GridDBTableViewTOLLSTATIONID: TcxGridDBColumn
PropertiesClassName = 'TcxLookupComboBoxProperties'
Properties.KeyFieldNames = 'TOLLSTATIONID'
Properties.ListColumns = <
item
FieldName = 'CAPTION'
end>
Properties.ListSource = TollStationID
DataBinding.FieldName = 'TOLLSTATIONID'
end
end
end
object RzPanel3: TRzPanel
Left = 317
Top = 0
Width = 385
Height = 498
Align = alClient
BorderOuter = fsFlat
TabOrder = 1
object Splitter2: TSplitter
Left = 1
Top = 249
Width = 383
Height = 4
Cursor = crVSplit
Align = alTop
Color = clInactiveCaption
ParentColor = False
end
inline PagesViewRecipe: TAdapterDataPagesView
Left = 1
Top = 1
Width = 383
Height = 248
Align = alTop
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 0
inherited RzPanel1: TRzPanel
Width = 383
Height = 248
inherited RzBackground1: TRzBackground
Width = 383
Height = 248
end
inherited RzPanel2: TRzPanel
Width = 383
Height = 248
inherited Pages: TRzPageControl
Width = 381
Height = 207
FixedDimension = 0
end
inherited RzPanel3: TRzPanel
Width = 381
end
end
end
end
inline PagesViewReckoning: TAdapterDataPagesView
Left = 1
Top = 253
Width = 383
Height = 244
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 1
inherited RzPanel1: TRzPanel
Width = 383
Height = 244
inherited RzBackground1: TRzBackground
Width = 383
Height = 244
end
inherited RzPanel2: TRzPanel
Width = 383
Height = 244
inherited Pages: TRzPageControl
Width = 381
Height = 203
FixedDimension = 0
end
inherited RzPanel3: TRzPanel
Width = 381
end
end
end
end
end
end
end
inherited FrameController: TRzFrameController
Top = 8
end
inherited ComponentPrinter: TdxComponentPrinter
PreviewOptions.PreviewBoundsRect = {00000000000000002003000058020000}
Left = 48
Top = 8
end
inherited DataSource: TDataSource
DataSet = MADSick.ClientDataSet
Left = 88
Top = 8
end
object CreateBy: TDataSource
DataSet = MADEmployee.ClientDataSet
Left = 24
Top = 96
end
object PaymentMethodID: TDataSource
DataSet = MADPaymentMethod.ClientDataSet
Left = 64
Top = 128
end
object NationID: TDataSource
DataSet = MADNation.ClientDataSet
Left = 128
Top = 128
end
object NativePlaceID: TDataSource
DataSet = MADNativePlace.ClientDataSet
Left = 96
Top = 128
end
object ProfessionID: TDataSource
DataSet = MADProfession.ClientDataSet
Left = 96
Top = 96
end
object WedlockID: TDataSource
DataSet = MADWedlock.ClientDataSet
Left = 128
Top = 96
end
object UpdateBy: TDataSource
DataSet = MADEmployee.ClientDataSet
Left = 64
Top = 96
end
object TollStationID: TDataSource
DataSet = MADTollStation.ClientDataSet
Left = 24
Top = 128
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -