home *** CD-ROM | disk | FTP | other *** search
- object BillForm: TBillForm
- Left = 515
- Top = 455
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Account bill'
- ClientHeight = 241
- ClientWidth = 316
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 64
- Top = 12
- Width = 239
- Height = 13
- Caption = 'You have reached the end of your account period.'
- Visible = False
- end
- object Image3: TImage
- Left = 12
- Top = 12
- Width = 33
- Height = 33
- Picture.Data = {<image000.ico>}
- end
- object Label2: TLabel
- Left = 64
- Top = 28
- Width = 198
- Height = 13
- Caption = 'Statistics for this xxxxxx are shown below :'
- end
- object Label3: TLabel
- Left = 48
- Top = 119
- Width = 83
- Height = 13
- Caption = 'Total time online :'
- end
- object Label4: TLabel
- Left = 78
- Top = 140
- Width = 53
- Height = 13
- Caption = 'Total cost :'
- end
- object Label6: TLabel
- Left = 15
- Top = 97
- Width = 116
- Height = 13
- Caption = 'Number of connections :'
- end
- object Label7: TLabel
- Left = 88
- Top = 177
- Width = 43
- Height = 13
- Caption = 'Bill date :'
- end
- object Label8: TLabel
- Left = 224
- Top = 177
- Width = 68
- Height = 13
- Caption = 'of each month'
- end
- object Label9: TLabel
- Left = 139
- Top = 177
- Width = 19
- Height = 13
- Caption = 'Day'
- end
- object Label10: TLabel
- Left = 197
- Top = 177
- Width = 30
- Height = 13
- Caption = 'Month'
- end
- object Button1: TButton
- Left = 236
- Top = 208
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&OK'
- TabOrder = 0
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 152
- Top = 208
- Width = 75
- Height = 25
- Caption = '&Print'
- TabOrder = 1
- OnClick = Button2Click
- end
- object PeriodText: TEdit
- Left = 73
- Top = 57
- Width = 176
- Height = 21
- Color = clWhite
- ReadOnly = True
- TabOrder = 2
- end
- object OnlineText: TEdit
- Left = 139
- Top = 115
- Width = 82
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 3
- end
- object CostText: TEdit
- Left = 139
- Top = 136
- Width = 82
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 4
- end
- object ConnectionsText: TEdit
- Left = 139
- Top = 94
- Width = 82
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 5
- end
- object ComboBox1: TComboBox
- Left = 138
- Top = 174
- Width = 83
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 6
- end
- object DayEdit: TEdit
- Left = 164
- Top = 174
- Width = 21
- Height = 21
- TabOrder = 7
- Text = 'DayEdit'
- OnChange = MonthEditChange
- OnClick = DayEditClick
- end
- object MonthEdit: TEdit
- Left = 231
- Top = 174
- Width = 20
- Height = 21
- TabOrder = 8
- Text = 'MonthEdit'
- OnChange = MonthEditChange
- OnClick = MonthEditClick
- end
- end
-