david
3b29f73ece
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@8 05c56307-c608-d34a-929d-697000501d7a
173 lines
4.5 KiB
Plaintext
173 lines
4.5 KiB
Plaintext
object frmRentCar: TfrmRentCar
|
|
Left = 252
|
|
Top = 150
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsDialog
|
|
Caption = 'Rent a car '
|
|
ClientHeight = 525
|
|
ClientWidth = 764
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
Position = poMainFormCenter
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnShow = FormShow
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object lbChoosePeriod: TLabel
|
|
Left = 10
|
|
Top = 387
|
|
Width = 146
|
|
Height = 13
|
|
Caption = '4. Choose the available period:'
|
|
end
|
|
object lbChooseDate: TLabel
|
|
Left = 10
|
|
Top = 225
|
|
Width = 93
|
|
Height = 13
|
|
Caption = '3. Choose the date:'
|
|
end
|
|
object lbChooseCar: TLabel
|
|
Left = 10
|
|
Top = 56
|
|
Width = 100
|
|
Height = 13
|
|
Caption = '2. Choose the model:'
|
|
end
|
|
object lbCustomerName: TLabel
|
|
Left = 10
|
|
Top = 8
|
|
Width = 140
|
|
Height = 13
|
|
Caption = '1. Enter the customer'#39's name:'
|
|
FocusControl = edtUserName
|
|
end
|
|
object lbChooseTime: TLabel
|
|
Left = 600
|
|
Top = 9
|
|
Width = 88
|
|
Height = 13
|
|
Caption = '4.Choose the time:'
|
|
end
|
|
object lbxPeriod: TcxListBox
|
|
Left = 10
|
|
Top = 406
|
|
Width = 580
|
|
Height = 81
|
|
ItemHeight = 13
|
|
Style.BorderColor = clBtnShadow
|
|
Style.BorderStyle = cbsSingle
|
|
Style.HotTrack = False
|
|
TabOrder = 3
|
|
OnClick = lbxPeriodClick
|
|
end
|
|
object DateNavigator: TcxDateNavigator
|
|
Left = 10
|
|
Top = 244
|
|
Width = 580
|
|
Height = 135
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
SelectPeriod = False
|
|
ShowDatesContainingEventsInBold = False
|
|
Styles.Background = cxBoldStyle
|
|
TabOrder = 2
|
|
OnCustomDrawContent = DateNavigatorCustomDrawContent
|
|
OnCustomDrawDayNumber = DateNavigatorCustomDrawDayNumber
|
|
OnSelectionChanged = DateNavigatorSelectionChanged
|
|
end
|
|
object lvCars: TListView
|
|
Left = 10
|
|
Top = 76
|
|
Width = 580
|
|
Height = 143
|
|
Columns = <>
|
|
HotTrackStyles = [htUnderlineCold, htUnderlineHot]
|
|
Items.Data = {
|
|
AC0000000400000001000000FFFFFFFFFFFFFFFF00000000000000000E427567
|
|
6174746920566579726F6E02000000FFFFFFFFFFFFFFFF00000000000000000E
|
|
4B6F656E6967736567672043435203000000FFFFFFFFFFFFFFFF000000000000
|
|
0000204C616D626F726768696E69204D75726369656C61676F20426172636865
|
|
74746104000000FFFFFFFFFFFFFFFF0000000000000000144D65727365646573
|
|
204D634C6172656E20534C52}
|
|
LargeImages = ResourceDemoMainForm.imgCars
|
|
RowSelect = True
|
|
TabOrder = 1
|
|
OnSelectItem = lvCarsSelectItem
|
|
end
|
|
object edtUserName: TcxTextEdit
|
|
Left = 10
|
|
Top = 28
|
|
TabOrder = 0
|
|
Text = 'Anonymous'
|
|
Width = 580
|
|
end
|
|
object TimeScheduler: TcxScheduler
|
|
Left = 600
|
|
Top = 29
|
|
Width = 153
|
|
Height = 457
|
|
DateNavigator.Visible = False
|
|
ViewDay.Active = True
|
|
ViewDay.TimeRulerPopupMenu.Items = [rpmi60min, rpmi30min, rpmi15min, rpmi10min, rpmi6min, rpmi5min]
|
|
ViewDay.TimeScale = 60
|
|
OnCustomDrawContent = TimeSchedulerCustomDrawContent
|
|
ContentPopupMenu.Items = []
|
|
ControlBox.Visible = False
|
|
EventOperations.DialogShowing = False
|
|
EventOperations.ReadOnly = True
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OptionsView.WorkDays = [dSunday, dMonday, dTuesday, dWednesday, dThursday, dFriday, dSaturday]
|
|
OptionsView.WorkFinish = 0.999305555555555600
|
|
TabOrder = 4
|
|
OnKeyDown = TimeSchedulerKeyDown
|
|
Splitters = {
|
|
090000007E00000098000000830000009CFEFFFF01000000A1FEFFFFCA010000}
|
|
end
|
|
object btnRent: TcxButton
|
|
Left = 494
|
|
Top = 493
|
|
Width = 120
|
|
Height = 25
|
|
Caption = 'Rent'
|
|
Default = True
|
|
ModalResult = 1
|
|
TabOrder = 5
|
|
OnClick = btnRentClick
|
|
end
|
|
object btnCancel: TcxButton
|
|
Left = 634
|
|
Top = 493
|
|
Width = 120
|
|
Height = 25
|
|
Cancel = True
|
|
Caption = 'Close'
|
|
ModalResult = 2
|
|
TabOrder = 6
|
|
end
|
|
object cxStyleRepository: TcxStyleRepository
|
|
Left = 168
|
|
Top = 80
|
|
object cxBoldStyle: TcxStyle
|
|
AssignedValues = [svFont]
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = [fsBold]
|
|
end
|
|
end
|
|
end
|