Componentes.Terceros.RemObj.../official/5.0.24.615/Data Abstract for Delphi/Samples/QuantumGrid 4/QuantumGrid4_ClientMain.dfm

191 lines
6.1 KiB
Plaintext

object QuantumGrid4_ClientMainForm: TQuantumGrid4_ClientMainForm
Left = 125
Top = 83
AutoScroll = False
BorderWidth = 5
Caption = 'QuantumGrid 4 Client'
ClientHeight = 447
ClientWidth = 506
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object PageControl: TPageControl
Left = 0
Top = 33
Width = 506
Height = 414
ActivePage = TabSheet2
Align = alClient
TabIndex = 0
TabOrder = 0
object TabSheet2: TTabSheet
Caption = 'Quantum Grid 4 - OnDemand'
ImageIndex = 1
object cxGrid1: TcxGrid
Left = 0
Top = 0
Width = 498
Height = 261
Align = alClient
TabOrder = 0
LookAndFeel.Kind = lfFlat
object viewCustomers: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = QuantumGrid4_ClientDataModule.dsCustomers
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
object viewCustomersCustomerID: TcxGridDBColumn
DataBinding.FieldName = 'CustomerID'
end
object viewCustomersCompanyName: TcxGridDBColumn
DataBinding.FieldName = 'CompanyName'
end
object viewCustomersContactName: TcxGridDBColumn
DataBinding.FieldName = 'ContactName'
end
object viewCustomersContactTitle: TcxGridDBColumn
DataBinding.FieldName = 'ContactTitle'
end
object viewCustomersAddress: TcxGridDBColumn
DataBinding.FieldName = 'Address'
end
object viewCustomersCity: TcxGridDBColumn
DataBinding.FieldName = 'City'
end
object viewCustomersRegion: TcxGridDBColumn
DataBinding.FieldName = 'Region'
end
object viewCustomersPostalCode: TcxGridDBColumn
DataBinding.FieldName = 'PostalCode'
end
object viewCustomersCountry: TcxGridDBColumn
DataBinding.FieldName = 'Country'
end
object viewCustomersPhone: TcxGridDBColumn
DataBinding.FieldName = 'Phone'
end
object viewCustomersFax: TcxGridDBColumn
DataBinding.FieldName = 'Fax'
end
end
object viewOrders: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = QuantumGrid4_ClientDataModule.dsOrders
DataController.DetailKeyFieldNames = 'CustomerID'
DataController.KeyFieldNames = 'OrderID'
DataController.MasterKeyFieldNames = 'CustomerID'
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
object viewOrdersOrderID: TcxGridDBColumn
DataBinding.FieldName = 'OrderID'
end
object viewOrdersCustomerID: TcxGridDBColumn
DataBinding.FieldName = 'CustomerID'
end
object viewOrdersEmployeeID: TcxGridDBColumn
DataBinding.FieldName = 'EmployeeID'
end
object viewOrdersOrderDate: TcxGridDBColumn
DataBinding.FieldName = 'OrderDate'
end
object viewOrdersRequiredDate: TcxGridDBColumn
DataBinding.FieldName = 'RequiredDate'
end
object viewOrdersShippedDate: TcxGridDBColumn
DataBinding.FieldName = 'ShippedDate'
end
object viewOrdersShipVia: TcxGridDBColumn
DataBinding.FieldName = 'ShipVia'
end
object viewOrdersFreight: TcxGridDBColumn
DataBinding.FieldName = 'Freight'
end
object viewOrdersShipName: TcxGridDBColumn
DataBinding.FieldName = 'ShipName'
end
object viewOrdersShipAddress: TcxGridDBColumn
DataBinding.FieldName = 'ShipAddress'
end
object viewOrdersShipCity: TcxGridDBColumn
DataBinding.FieldName = 'ShipCity'
end
object viewOrdersShipRegion: TcxGridDBColumn
DataBinding.FieldName = 'ShipRegion'
end
object viewOrdersShipPostalCode: TcxGridDBColumn
DataBinding.FieldName = 'ShipPostalCode'
end
object viewOrdersShipCountry: TcxGridDBColumn
DataBinding.FieldName = 'ShipCountry'
end
end
object cxGrid1Level1: TcxGridLevel
GridView = viewCustomers
object cxGrid1Level2: TcxGridLevel
GridView = viewOrders
end
end
end
object DBGrid3: TDBGrid
Left = 0
Top = 266
Width = 498
Height = 120
Align = alBottom
DataSource = QuantumGrid4_ClientDataModule.dsOrders
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object Panel2: TPanel
Left = 0
Top = 261
Width = 498
Height = 5
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
end
end
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 506
Height = 33
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object Button1: TButton
Left = 80
Top = 0
Width = 97
Height = 25
Caption = 'Apply Updates'
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 0
Top = 0
Width = 75
Height = 25
Caption = 'Open/Close'
TabOrder = 1
OnClick = Button2Click
end
end
end