home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip Hitware 7 A
/
CHIP_HITWARE_7A.iso
/
biuro
/
ALLDAY
/
_SETUP.1
/
AllDay.exe
/
0
/
RCDATA
/
TFRMOPTIONS
/
TFRMOPTIONS.txt
Wrap
Text File
|
1999-12-29
|
14KB
|
609 lines
object FrmOptions: TFrmOptions
Left = 310
Top = 160
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = 'Optionen'
ClientHeight = 404
ClientWidth = 315
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
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object cbOpenLastActive: TCheckBox
Left = 16
Top = 312
Width = 277
Height = 17
Caption = 'Zuletzt aktive Datei beim n�chsten Start mit �ffnen'
TabOrder = 1
end
object PcOptions: TPageControl
Left = 8
Top = 8
Width = 297
Height = 297
ActivePage = TabSheet1
TabOrder = 2
object TabSheet1: TTabSheet
Caption = 'Kalender'
object rgWkStart: TRadioGroup
Left = 12
Top = 4
Width = 265
Height = 85
Caption = 'Kalenderwoche 1 ist...'
Items.Strings = (
'Woche, die mit dem 1. Januar beginnt'
'erste Woche mit mehr als drei Tagen im lfd. Jahr'
'erste volle Woche im lfd. Jahr')
TabOrder = 0
end
object rgCalType: TRadioGroup
Left = 148
Top = 96
Width = 129
Height = 73
Caption = 'Kalendersystem'
Items.Strings = (
'julianisch'
'gegorianisch')
TabOrder = 1
end
object rgFirstWkDay: TRadioGroup
Left = 12
Top = 96
Width = 121
Height = 161
Caption = 'Erster Wochentag...'
TabOrder = 2
end
object rgLang: TRadioGroup
Left = 148
Top = 172
Width = 129
Height = 85
Caption = 'Sprache'
Items.Strings = (
'Deutsch'
'Englisch')
TabOrder = 3
OnClick = rgLangClick
end
end
object TabSheet4: TTabSheet
Caption = 'Zeit'
object GroupBox1: TGroupBox
Left = 4
Top = 8
Width = 281
Height = 205
Caption = 'Position'
TabOrder = 0
object Label4: TLabel
Left = 12
Top = 148
Width = 60
Height = 13
AutoSize = False
Caption = 'Breite:'
Enabled = False
end
object Label5: TLabel
Left = 12
Top = 172
Width = 60
Height = 13
AutoSize = False
Caption = 'L�nge:'
Enabled = False
end
object Label6: TLabel
Left = 8
Top = 80
Width = 109
Height = 13
AutoSize = False
Caption = 'Zeitzone (UT +/-):'
end
object Label7: TLabel
Left = 112
Top = 144
Width = 5
Height = 20
Caption = '�'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 152
Top = 144
Width = 3
Height = 20
Caption = #39
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 192
Top = 144
Width = 6
Height = 20
Caption = '"'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 112
Top = 168
Width = 5
Height = 20
Caption = '�'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 152
Top = 168
Width = 3
Height = 20
Caption = #39
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 192
Top = 168
Width = 6
Height = 20
Caption = '"'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 148
Top = 80
Width = 46
Height = 13
Caption = 'Stunde(n)'
end
object Label14: TLabel
Left = 8
Top = 52
Width = 60
Height = 13
AutoSize = False
Caption = 'Ort:'
end
object Label15: TLabel
Left = 8
Top = 28
Width = 60
Height = 13
AutoSize = False
Caption = 'Land:'
end
object LatD: TEdit
Left = 76
Top = 144
Width = 33
Height = 21
Enabled = False
TabOrder = 0
end
object LatM: TEdit
Left = 124
Top = 144
Width = 25
Height = 21
Enabled = False
TabOrder = 1
end
object LatS: TEdit
Left = 164
Top = 144
Width = 25
Height = 21
Enabled = False
TabOrder = 2
end
object cbN: TCheckBox
Left = 208
Top = 148
Width = 30
Height = 17
Caption = 'N'
Checked = True
Enabled = False
State = cbChecked
TabOrder = 3
end
object LongD: TEdit
Left = 76
Top = 168
Width = 33
Height = 21
Enabled = False
TabOrder = 4
end
object LongM: TEdit
Left = 124
Top = 168
Width = 25
Height = 21
Enabled = False
TabOrder = 5
end
object LongS: TEdit
Left = 164
Top = 168
Width = 25
Height = 21
Enabled = False
TabOrder = 6
end
object cbW: TCheckBox
Left = 208
Top = 172
Width = 30
Height = 17
Caption = 'W'
Enabled = False
TabOrder = 7
end
object Zone: TEdit
Left = 100
Top = 76
Width = 41
Height = 21
TabOrder = 8
end
object cbOrt: TComboBox
Left = 72
Top = 48
Width = 145
Height = 21
Style = csDropDownList
DropDownCount = 20
ItemHeight = 0
Sorted = True
TabOrder = 9
OnChange = cbOrtChange
end
object cbLand: TComboBox
Left = 72
Top = 24
Width = 145
Height = 21
Style = csDropDownList
DropDownCount = 20
ItemHeight = 0
Sorted = True
TabOrder = 10
OnChange = cbLandChange
end
object cbCustom: TCheckBox
Left = 12
Top = 120
Width = 97
Height = 17
Caption = 'andere Position:'
TabOrder = 11
OnClick = cbCustomClick
end
end
end
object TabSheet3: TTabSheet
Caption = 'Anzeige'
object gbColors: TGroupBox
Left = 4
Top = 116
Width = 281
Height = 121
Caption = 'Farben'
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 48
Width = 43
Height = 13
Caption = 'Sonntag:'
end
object Label2: TLabel
Left = 84
Top = 20
Width = 21
Height = 13
Caption = 'vorn'
end
object Label3: TLabel
Left = 124
Top = 20
Width = 29
Height = 13
Caption = 'hinten'
end
object Label16: TLabel
Left = 8
Top = 72
Width = 44
Height = 13
Caption = 'Wochen:'
end
object Label17: TLabel
Left = 8
Top = 96
Width = 56
Height = 13
Caption = 'Markierung:'
end
object ebSoV: TEdit
Left = 84
Top = 44
Width = 25
Height = 21
Cursor = crArrow
ReadOnly = True
TabOrder = 0
OnClick = ebSoVClick
end
object ebSoH: TEdit
Left = 128
Top = 44
Width = 25
Height = 21
Cursor = crArrow
ReadOnly = True
TabOrder = 1
OnClick = ebSoHClick
end
object ebWkV: TEdit
Left = 84
Top = 68
Width = 25
Height = 21
Cursor = crArrow
ReadOnly = True
TabOrder = 2
OnClick = ebWkVClick
end
object ebWkH: TEdit
Left = 128
Top = 68
Width = 25
Height = 21
Cursor = crArrow
ReadOnly = True
TabOrder = 3
OnClick = ebWkHClick
end
object ebMkH: TEdit
Left = 128
Top = 92
Width = 25
Height = 21
Cursor = crArrow
ReadOnly = True
TabOrder = 4
OnClick = ebMkHClick
end
object ebMkV: TEdit
Left = 84
Top = 92
Width = 25
Height = 21
Cursor = crArrow
ReadOnly = True
TabOrder = 5
OnClick = ebMkVClick
end
end
object GroupBox2: TGroupBox
Left = 4
Top = 12
Width = 281
Height = 93
Caption = 'Zeichensatz'
TabOrder = 1
object LbName: TLabel
Left = 12
Top = 24
Width = 129
Height = 13
AutoSize = False
Caption = 'LbName'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object LbSize: TLabel
Left = 112
Top = 40
Width = 32
Height = 13
Caption = 'LbSize'
Visible = False
end
object LbStyle: TLabel
Left = 12
Top = 56
Width = 35
Height = 13
Caption = 'LbStyle'
Visible = False
end
object LbHeight: TLabel
Left = 12
Top = 40
Width = 43
Height = 13
Caption = 'LbHeight'
end
object BtnChangeFont: TButton
Left = 160
Top = 24
Width = 59
Height = 25
Caption = '�ndern'
TabOrder = 0
OnClick = BtnChangeFontClick
end
object CbAdaptToFont: TCheckBox
Left = 12
Top = 68
Width = 213
Height = 17
Caption = 'Fenstergr��e an Zeichensatz anpassen'
TabOrder = 1
end
end
end
object TabSheet2: TTabSheet
Caption = 'Gruppen'
object gbGroups: TGroupBox
Left = 4
Top = 4
Width = 281
Height = 257
Caption = 'Gruppen'
TabOrder = 0
object DblbGroups: TDBLookupListBox
Left = 8
Top = 22
Width = 265
Height = 225
Hint = 'rechte Maustaste...'
KeyField = 'Gp_no'
ListField = 'Gp_name'
ListSource = DsGroups
ParentShowHint = False
PopupMenu = PmEditGrps
ShowHint = True
TabOrder = 0
OnDblClick = iChgGrpClick
end
end
end
end
object btClose: TButton
Left = 228
Top = 372
Width = 75
Height = 25
Caption = 'Schlie�en'
Default = True
TabOrder = 0
OnClick = btCloseClick
end
object cbDayViewOpen: TCheckBox
Left = 16
Top = 332
Width = 277
Height = 17
Caption = 'Kalenderblatt mit Jahres�bersicht �ffnen'
TabOrder = 3
end
object dlgColor: TColorDialog
Ctl3D = True
Left = 152
Top = 380
end
object CdsGroups: TClientDataSet
Aggregates = <>
Params = <>
Left = 124
Top = 380
object CdsGroupsGp_no: TAutoIncField
FieldName = 'Gp_no'
end
object CdsGroupsGp_name: TStringField
FieldName = 'Gp_name'
Required = True
Size = 80
end
object CdsGroupsGp_color: TIntegerField
FieldName = 'Gp_color'
end
object CdsGroupsGp_free: TBooleanField
FieldName = 'Gp_free'
end
object CdsGroupsGp_show: TIntegerField
FieldName = 'Gp_show'
end
end
object DsGroups: TDataSource
DataSet = CdsGroups
Left = 96
Top = 380
end
object PmEditGrps: TPopupMenu
Left = 68
Top = 380
object iNewGrp: TMenuItem
Caption = 'Neu'
OnClick = iNewGrpClick
end
object iChgGrp: TMenuItem
Caption = '�ndern'
Default = True
OnClick = iChgGrpClick
end
object iDelGrp: TMenuItem
Caption = 'L�schen'
OnClick = iDelGrpClick
end
end
object DlgFontYear: TFontDialog
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MinFontSize = 0
MaxFontSize = 0
Left = 40
Top = 380
end
end
