home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip Hitware 7 A
/
CHIP_HITWARE_7A.iso
/
biuro
/
ALLDAY
/
_SETUP.1
/
AllDay.exe
/
0
/
RCDATA
/
TFRMDAYCALC
/
TFRMDAYCALC.txt
Wrap
Text File
|
1999-12-29
|
8KB
|
379 lines
object FrmDayCalc: TFrmDayCalc
Left = 416
Top = 171
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'FrmDayCalc'
ClientHeight = 384
ClientWidth = 583
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object btnClose: TButton
Left = 85
Top = 208
Width = 75
Height = 25
Caption = 'btnClose'
TabOrder = 1
OnClick = btnCloseClick
end
object gbCalc: TGroupBox
Left = 4
Top = 4
Width = 237
Height = 61
Caption = 'gbCalc'
TabOrder = 3
object Label1: TLabel
Left = 4
Top = 32
Width = 33
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = 'von:'
end
object Label2: TLabel
Left = 116
Top = 32
Width = 29
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = 'bis:'
end
object dtpFrom: TDateTimePicker
Left = 40
Top = 28
Width = 80
Height = 21
CalAlignment = dtaLeft
Date = 36254.518683449070000000
Time = 36254.518683449070000000
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = True
TabOrder = 0
OnCloseUp = dtpFromCloseUp
OnKeyDown = dtpFromKeyDown
end
object dtpTo: TDateTimePicker
Left = 148
Top = 28
Width = 80
Height = 21
CalAlignment = dtaLeft
Date = 36254.525867013890000000
Time = 36254.525867013890000000
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 1
OnCloseUp = dtpToCloseUp
OnKeyDown = dtpToKeyDown
end
end
object btnOptions: TButton
Left = 166
Top = 208
Width = 75
Height = 25
Caption = 'btnOptions'
TabOrder = 2
OnClick = btnOptionsClick
end
object btnCalc: TButton
Left = 4
Top = 208
Width = 75
Height = 25
Caption = 'btnCalc'
Default = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = btnCalcClick
end
object gbCount: TGroupBox
Left = 264
Top = 4
Width = 133
Height = 225
Caption = 'gbCount'
TabOrder = 4
object Label3: TLabel
Left = 8
Top = 20
Width = 120
Height = 13
AutoSize = False
Caption = 'Wochentage:'
end
object Label4: TLabel
Left = 8
Top = 132
Width = 120
Height = 13
AutoSize = False
Caption = 'Gruppen:'
end
object lbCntWkDays: TListBox
Left = 8
Top = 36
Width = 117
Height = 69
ItemHeight = 13
TabOrder = 0
OnClick = lbCntWkDaysClick
OnDblClick = btnHideClick
end
object lbCntGrps: TListBox
Left = 8
Top = 148
Width = 117
Height = 69
ItemHeight = 13
TabOrder = 1
OnClick = lbCntGrpsClick
OnDblClick = btnHideClick
end
object rbAnd: TRadioButton
Left = 72
Top = 108
Width = 50
Height = 17
Caption = 'rbAnd'
TabOrder = 2
OnClick = rbAndClick
end
object rbOr: TRadioButton
Left = 12
Top = 108
Width = 50
Height = 17
Caption = 'rbOr'
Checked = True
TabOrder = 3
TabStop = True
OnClick = rbOrClick
end
object cbNot: TCheckBox
Left = 72
Top = 128
Width = 50
Height = 17
Caption = 'cbNot'
Enabled = False
TabOrder = 4
OnClick = cbNotClick
end
end
object gbDontCount: TGroupBox
Left = 444
Top = 4
Width = 133
Height = 225
Caption = 'gbDontCount'
TabOrder = 5
object Label5: TLabel
Left = 8
Top = 20
Width = 120
Height = 13
AutoSize = False
Caption = 'Wochentage:'
end
object Label6: TLabel
Left = 8
Top = 120
Width = 120
Height = 13
AutoSize = False
Caption = 'Gruppen:'
end
object lbNoCntWkDays: TListBox
Left = 8
Top = 36
Width = 117
Height = 77
ItemHeight = 13
TabOrder = 0
OnClick = lbNoCntWkDaysClick
OnDblClick = btnShowClick
end
object lbNoCntGrps: TListBox
Left = 8
Top = 136
Width = 117
Height = 81
ItemHeight = 13
TabOrder = 1
OnClick = lbNoCntGrpsClick
OnDblClick = btnShowClick
end
end
object btnHide: TButton
Left = 404
Top = 84
Width = 33
Height = 25
Caption = '>'
Enabled = False
TabOrder = 6
OnClick = btnHideClick
end
object btnShow: TButton
Left = 404
Top = 120
Width = 33
Height = 25
Caption = '<'
Enabled = False
TabOrder = 7
OnClick = btnShowClick
end
object gbResult: TGroupBox
Left = 4
Top = 80
Width = 237
Height = 89
Caption = 'gbResult'
TabOrder = 8
object Panel1: TPanel
Left = 8
Top = 16
Width = 221
Height = 65
BevelInner = bvLowered
BevelOuter = bvLowered
Color = clWhite
TabOrder = 0
object lbResult: TLabel
Left = 8
Top = 12
Width = 197
Height = 13
AutoSize = False
Caption = 'lbResult'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object lbSubResult1: TLabel
Left = 8
Top = 52
Width = 197
Height = 13
AutoSize = False
Caption = 'lbSubResult1'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object lbSubResult2: TLabel
Left = 8
Top = 68
Width = 197
Height = 13
AutoSize = False
Caption = 'lbSubResult2'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object lbSubResult3: TLabel
Left = 8
Top = 32
Width = 197
Height = 13
AutoSize = False
Caption = 'lbSubResult3'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
end
end
object lbCntWkDayNo: TListBox
Left = 284
Top = 256
Width = 121
Height = 61
ItemHeight = 13
TabOrder = 9
end
object lbNoCntWkDayNo: TListBox
Left = 412
Top = 256
Width = 121
Height = 61
ItemHeight = 13
TabOrder = 10
end
object lbCntGrpNo: TListBox
Left = 284
Top = 320
Width = 121
Height = 57
ItemHeight = 13
TabOrder = 11
end
object lbNoCntGrpNo: TListBox
Left = 412
Top = 320
Width = 121
Height = 57
ItemHeight = 13
TabOrder = 12
end
object btnHideAll: TButton
Left = 404
Top = 56
Width = 33
Height = 25
Caption = '>>'
Enabled = False
TabOrder = 13
OnClick = btnHideAllClick
end
object btnShowAll: TButton
Left = 404
Top = 148
Width = 33
Height = 25
Caption = '<<'
Enabled = False
TabOrder = 14
OnClick = btnShowAllClick
end
end