home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hot Shareware 32
/
hot34.iso
/
ficheros
/
9APLI
/
TIMBNT25.ZIP
/
INSTALL.EXE
/
BILLPOWR.EXE
/
0
/
RCDATA
/
TCUSTOM
/
TCUSTOM.txt
Wrap
Text File
|
1998-04-14
|
16KB
|
735 lines
object Custom: TCustom
Left = 0
Top = 42
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Custom'
ClientHeight = 408
ClientWidth = 628
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Arial'
Font.Style = []
Menu = MainMenu1
Scaled = False
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 17
object IntFreeLbl: TLabel
Left = 96
Top = 318
Width = 122
Height = 17
Alignment = taRightJustify
AutoSize = False
Caption = 'Interest-Free Intvl'
Visible = False
end
object TaxLbl: TLabel
Left = 14
Top = 318
Width = 31
Height = 16
Alignment = taRightJustify
AutoSize = False
Caption = 'Tax'
Visible = False
end
object ChrgTimeIntvlLabel: TLabel
Left = 12
Top = 344
Width = 165
Height = 17
Alignment = taRightJustify
AutoSize = False
Caption = 'Minimum Time Charged'
Visible = False
end
object OKBtn: TButton
Left = 550
Top = 4
Width = 73
Height = 29
Caption = '&Ok'
ModalResult = 1
TabOrder = 0
TabStop = False
OnClick = OKBtnClick
end
object CancelBtn: TButton
Left = 550
Top = 36
Width = 73
Height = 29
Cancel = True
Caption = '&Cancel'
TabOrder = 1
TabStop = False
OnClick = OKBtnClick
end
object TimeDateBox: TGroupBox
Left = 254
Top = 6
Width = 193
Height = 57
Caption = 'Time, Date Display'
TabOrder = 10
object NonEuroTm: TRadioButton
Left = 6
Top = 18
Width = 181
Height = 17
HelpContext = 808
Caption = '12-hr, MM/DD/YY'
TabOrder = 0
OnClick = TmClick
end
object EuroTm: TRadioButton
Left = 6
Top = 36
Width = 181
Height = 17
HelpContext = 808
Caption = '24-hr, DD/MM/YY'
TabOrder = 1
OnClick = TmClick
end
end
object PromptForBox: TGroupBox
Left = 454
Top = 294
Width = 167
Height = 115
Caption = 'Prompt For'
TabOrder = 17
object Reminders: TCheckBox
Left = 10
Top = 96
Width = 153
Height = 17
HelpContext = 815
Caption = 'Reminders'
TabOrder = 3
end
object AlarmBox: TGroupBox
Left = 6
Top = 16
Width = 157
Height = 79
TabOrder = 2
object MaxBeepsLabel: TLabel
Left = 4
Top = 16
Width = 89
Height = 19
AutoSize = False
Caption = 'Alarm Beeps'
end
object AlrmIntvlLabel: TLabel
Left = 6
Top = 36
Width = 97
Height = 19
AutoSize = False
Caption = 'Pre-Interval'
end
object ReAlrmIntvlLabel: TLabel
Left = 6
Top = 56
Width = 112
Height = 17
Caption = 'Re-Alarm Interval'
end
object AlrmIntvl: TMaskEdit
Left = 122
Top = 36
Width = 31
Height = 22
HelpContext = 814
EditMask = '99;1;_'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
MaxLength = 2
ParentFont = False
TabOrder = 0
Text = ' '
OnKeyDown = KeyDown
end
object ReAlrmIntvl: TMaskEdit
Left = 122
Top = 56
Width = 31
Height = 22
HelpContext = 814
EditMask = '99;1;_'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
MaxLength = 2
ParentFont = False
TabOrder = 1
Text = ' '
OnKeyDown = KeyDown
end
end
object AlarmCheckBox: TCheckBox
Left = 10
Top = 16
Width = 111
Height = 17
HelpContext = 814
Caption = 'Event Alarms'
TabOrder = 1
OnClick = AlarmCheckBoxClick
end
object MaxBeeps: TMaskEdit
Left = 100
Top = 32
Width = 59
Height = 22
HelpContext = 814
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
MaxLength = 40
ParentFont = False
TabOrder = 0
OnKeyDown = KeyDown
end
end
object ReligiousDateBox: TGroupBox
Left = 256
Top = 140
Width = 191
Height = 147
Caption = 'Include on Daily Listings'
TabOrder = 12
object Muslim: TCheckBox
Left = 10
Top = 20
Width = 167
Height = 17
HelpContext = 810
Caption = 'Muslim'
TabOrder = 0
OnClick = Click
end
object Jewish: TCheckBox
Left = 10
Top = 38
Width = 175
Height = 17
HelpContext = 810
Caption = 'Jewish'
TabOrder = 1
OnClick = Click
end
object Christian: TCheckBox
Left = 10
Top = 56
Width = 165
Height = 17
HelpContext = 810
Caption = 'Christian'
TabOrder = 2
OnClick = Click
end
object ReportRelig: TCheckBox
Left = 10
Top = 126
Width = 177
Height = 17
HelpContext = 810
Caption = 'Include on Reports'
TabOrder = 5
OnClick = ReportReligClick
end
object latlongbox: TGroupBox
Left = 6
Top = 74
Width = 179
Height = 51
TabOrder = 3
OnExit = latlongboxExit
object latLabel: TLabel
Left = 6
Top = 16
Width = 79
Height = 8
AutoSize = False
Caption = 'Latitude'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -8
Font.Name = 'Arial'
Font.Style = [fsUnderline]
ParentFont = False
end
object longLabel: TLabel
Left = 90
Top = 16
Width = 81
Height = 8
AutoSize = False
Caption = 'Longitude'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -8
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object latitude: TMaskEdit
Left = 6
Top = 26
Width = 79
Height = 22
HelpContext = 810
EditMask = 'l:99:99:99;1;_'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Pitch = fpFixed
Font.Style = []
MaxLength = 10
ParentFont = False
TabOrder = 0
Text = 'N:00:00:00'
OnKeyDown = KeyDown
end
object Longitude: TMaskEdit
Left = 90
Top = 26
Width = 83
Height = 22
HelpContext = 810
EditMask = 'l:999:99:99;1;_'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
MaxLength = 11
ParentFont = False
TabOrder = 1
Text = 'W:000:00:00'
OnKeyDown = KeyDown
end
end
object RiseSetCheckBox: TCheckBox
Left = 10
Top = 74
Width = 133
Height = 17
HelpContext = 810
Caption = 'Sunrise / Sunset'
TabOrder = 4
OnClick = RiseSetCheckBoxClick
end
end
object TermSubsBox: TGroupBox
Left = 254
Top = 70
Width = 369
Height = 65
Caption = 'Term Substitutions'
TabOrder = 11
TabStop = True
object TermSubsGrid: TStringGrid
Left = 4
Top = 16
Width = 361
Height = 47
HelpContext = 828
ColCount = 2
DefaultColWidth = 110
DefaultRowHeight = 20
FixedRows = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goEditing]
ScrollBars = ssVertical
TabOrder = 0
OnEnter = TermSubsGridEnter
OnExit = TermSubsGridExit
OnGetEditMask = TermSubsGridGetEditMask
OnKeyDown = KeyDown
OnSelectCell = TermSubsGridSelectCell
OnSetEditText = TermSubsGridSetEditText
RowHeights = (
21
20
20
20
20)
end
end
object WorkDayBox: TGroupBox
Left = 452
Top = 140
Width = 169
Height = 107
Caption = 'Work Day'
TabOrder = 13
object WorkDayBegin: TLabel
Left = 4
Top = 18
Width = 83
Height = 17
Alignment = taRightJustify
AutoSize = False
Caption = 'Begin Time'
end
object WorkDayEnd: TLabel
Left = 4
Top = 38
Width = 81
Height = 17
Alignment = taRightJustify
AutoSize = False
Caption = 'End Time'
end
object WorkDayBeginTime: TMaskEdit
Left = 96
Top = 14
Width = 69
Height = 24
HelpContext = 812
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 0
OnEnter = WorkDayTimeEnter
OnExit = WorkDayTimeExit
OnKeyPress = WorkDayKeyPress
end
object WorkDayEndTime: TMaskEdit
Left = 96
Top = 34
Width = 69
Height = 24
HelpContext = 812
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 1
OnEnter = WorkDayTimeEnter
OnExit = WorkDayTimeExit
OnKeyPress = WorkDayKeyPress
end
object PartitionBox: TGroupBox
Left = 6
Top = 58
Width = 157
Height = 45
TabOrder = 2
object PartitionLabel: TLabel
Left = 4
Top = 20
Width = 149
Height = 19
AutoSize = False
Caption = 'Interval: Min'
end
object PartitionInterval: TMaskEdit
Left = 72
Top = 18
Width = 25
Height = 25
HelpContext = 812
EditMask = '##;1;_'
MaxLength = 2
TabOrder = 0
Text = ' '
OnKeyDown = KeyDown
end
end
object PartitionCheckBox: TCheckBox
Left = 10
Top = 58
Width = 145
Height = 17
HelpContext = 812
Caption = 'Partition Day'
TabOrder = 3
OnClick = PartitionCheckBoxClick
end
end
object FirstWeekDayBox: TGroupBox
Left = 10
Top = 232
Width = 241
Height = 35
Caption = '1st Week Day'
TabOrder = 2
object SundayBtn: TRadioButton
Left = 6
Top = 16
Width = 107
Height = 17
HelpContext = 806
Caption = 'Sunday'
TabOrder = 0
OnClick = Click
end
object MondayBtn: TRadioButton
Left = 120
Top = 16
Width = 117
Height = 17
HelpContext = 806
Caption = 'Monday'
TabOrder = 1
OnClick = Click
end
end
object JulianDateCheckBox: TCheckBox
Left = 460
Top = 252
Width = 155
Height = 17
HelpContext = 818
Caption = 'Display Julian Dates'
TabOrder = 15
OnClick = Click
end
object DragBox: TGroupBox
Left = 258
Top = 294
Width = 189
Height = 115
Caption = 'Daily Event Dragging'
TabOrder = 14
TabStop = True
object DragDeadLn: TCheckBox
Left = 10
Top = 18
Width = 155
Height = 17
HelpContext = 816
Caption = 'Drag Deadlines'
TabOrder = 0
OnClick = Click
end
object DragRmndr: TCheckBox
Left = 10
Top = 42
Width = 157
Height = 17
HelpContext = 816
Caption = 'Drag Reminders'
TabOrder = 1
OnClick = Click
end
object DragPlan: TCheckBox
Left = 10
Top = 66
Width = 157
Height = 17
HelpContext = 816
Caption = 'Drag Plan Deadlines'
TabOrder = 2
OnClick = Click
end
object dragConfirm: TCheckBox
Left = 10
Top = 90
Width = 157
Height = 17
HelpContext = 816
Caption = 'Confirm All Dragging'
TabOrder = 3
OnClick = Click
end
end
object PasswordCheckBox: TCheckBox
Left = 14
Top = 392
Width = 235
Height = 17
HelpContext = 822
Caption = 'Request Password upon Entry'
TabOrder = 9
OnClick = Click
end
object DailyTimeBlocksCheckBox: TCheckBox
Left = 14
Top = 370
Width = 235
Height = 17
HelpContext = 826
Caption = 'Fill in Month'#39's Daily Squares'
TabOrder = 8
OnClick = Click
end
object GrpBox: TGroupBox
Left = 8
Top = 140
Width = 243
Height = 87
Caption = 'Employee Groups'
TabOrder = 19
object GrpGrid: TStringGrid
Left = 4
Top = 17
Width = 233
Height = 66
HelpContext = 804
ColCount = 2
DefaultColWidth = 50
DefaultRowHeight = 20
FixedCols = 0
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goEditing, goTabs]
ScrollBars = ssVertical
TabOrder = 0
OnEnter = EmpGridEnter
OnExit = GrpGridExit
OnGetEditMask = GrpGridGetEditMask
OnGetEditText = GrpGridGetEditText
OnKeyDown = KeyDown
OnSelectCell = GrpGridSelectCell
OnSetEditText = GrpGridSetEditText
end
end
object JulianWeekCheckBox: TCheckBox
Left = 460
Top = 272
Width = 163
Height = 17
HelpContext = 820
Caption = 'Display Julian Weeks'
TabOrder = 16
OnClick = Click
end
object EmpBox: TGroupBox
Left = 6
Top = 6
Width = 243
Height = 129
Caption = 'Employees'
TabOrder = 18
TabStop = True
object EmpGrid: TStringGrid
Left = 4
Top = 17
Width = 233
Height = 108
HelpContext = 802
ColCount = 2
DefaultColWidth = 50
DefaultRowHeight = 20
FixedCols = 0
RowCount = 200
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goEditing, goTabs]
ScrollBars = ssVertical
TabOrder = 0
OnEnter = EmpGridEnter
OnExit = EmpGridExit
OnGetEditMask = EmpGridGetEditMask
OnGetEditText = EmpGridGetEditText
OnKeyDown = KeyDown
OnSelectCell = EmpGridSelectCell
OnSetEditText = EmpGridSetEditText
end
end
object BookKeepingBox: TGroupBox
Left = 12
Top = 272
Width = 239
Height = 35
Caption = 'Bookkeeping'
TabOrder = 3
object AutoUpdateGL: TCheckBox
Left = 4
Top = 16
Width = 113
Height = 17
HelpContext = 830
Caption = 'AutoUpdate GL'
TabOrder = 0
end
object DoubleEntry: TCheckBox
Left = 124
Top = 16
Width = 113
Height = 17
HelpContext = 832
Caption = 'Double-Entry'
TabOrder = 1
end
end
object IntFree: TMaskEdit
Left = 222
Top = 314
Width = 29
Height = 25
HelpContext = 821
MaxLength = 2
TabOrder = 5
Visible = False
OnExit = IntFreeExit
end
object Tax: TMaskEdit
Left = 50
Top = 314
Width = 37
Height = 25
HelpContext = 823
MaxLength = 5
TabOrder = 4
Visible = False
OnExit = TaxExit
end
object ChrgTimeIntvl1: TMaskEdit
Left = 182
Top = 340
Width = 33
Height = 25
HelpContext = 835
TabOrder = 6
Visible = False
OnExit = ChrgTimeIntvl1Exit
end
object ChrgTimeIntvl2: TMaskEdit
Left = 218
Top = 340
Width = 33
Height = 25
HelpContext = 835
TabOrder = 7
Visible = False
OnExit = ChrgTimeIntvl2Exit
end
object MainMenu1: TMainMenu
object menuEdit: TMenuItem
Caption = 'Edit'
object MenuEditInsert: TMenuItem
Caption = 'Insert a Row'
OnClick = MenuEditInsertClick
end
object MenuEditDelete: TMenuItem
Caption = 'Delete a Row'
OnClick = MenuEditDeleteClick
end
end
object Help: TMenuItem
Caption = '&Help'
OnClick = HelpQuickHelpClick
end
end
end