home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 April A
/
Pcwk4a98.iso
/
PROGRAM
/
DELPHI16
/
Calmira
/
Src
/
SRC
/
TASKPROP.DFM
/
TASKPROP.txt
Wrap
Text File
|
1997-02-17
|
4KB
|
183 lines
object TaskPropDlg: TTaskPropDlg
Left = 263
Top = 115
HelpContext = 59
ActiveControl = OKBtn
BorderStyle = bsDialog
Caption = 'Taskbar Properties'
ClientHeight = 304
ClientWidth = 316
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
PixelsPerInch = 96
Position = poScreenCenter
OnCreate = FormCreate
TextHeight = 13
object OKBtn: TBitBtn
Left = 74
Top = 272
Width = 77
Height = 27
TabOrder = 1
OnClick = OKBtnClick
Kind = bkOK
Margin = 4
Style = bsNew
Spacing = -1
IsControl = True
end
object CancelBtn: TBitBtn
Left = 154
Top = 272
Width = 77
Height = 27
TabOrder = 2
Kind = bkCancel
Margin = 4
Style = bsNew
Spacing = -1
IsControl = True
end
object Notebook: TTabbedNotebook
Left = 2
Top = 0
Width = 311
Height = 269
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
TabFont.Color = clBtnText
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 0
object TTabPage
Left = 5
Top = 26
Caption = 'Preferences'
object CheckList: TCheckList
Left = 10
Top = 12
Width = 281
Height = 202
Color = clBtnFace
IntegralHeight = True
ItemHeight = 20
Items.Strings = (
'Keep the taskbar on screen all the time'
'Depress the button of the current/active task'
'Fit maximized windows to space above taskbar'
'Show clock in 24 hour format'
'Popup resources over the clock'
'Popup full date over the clock'
'Animate the taskbar when popping up'
'Display full window captions as button hints'
'Move minimized window icons above the bar'
'Hide the icons of minimized applications'
'Show buttons for icon windows'
'Show button for Explorer window'
'Show full MS-DOS path on icon window buttons'
'Use icons from start menu and shortcuts/aliases'
'Display document filename before program name'
'Change document name to lower case text')
TabOrder = 0
end
end
object TTabPage
Left = 5
Top = 26
Caption = 'Advanced'
object Bevel1: TBevel
Left = 12
Top = 184
Width = 279
Height = 41
Shape = bsFrame
end
object Label1: TLabel
Left = 10
Top = 12
Width = 61
Height = 13
Caption = '&Exclusions'
FocusControl = ExcludeList
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object AddBtn: TStyleSpeed
Left = 146
Top = 146
Width = 71
Height = 23
Caption = '&Add'
OnClick = AddBtnClick
Style = sbBitBtn
end
object RemoveBtn: TStyleSpeed
Left = 220
Top = 146
Width = 71
Height = 23
Caption = '&Remove'
OnClick = RemoveBtnClick
Style = sbBitBtn
end
object Label2: TLabel
Left = 24
Top = 198
Width = 123
Height = 13
Caption = 'Re&fresh interval (seconds)'
FocusControl = RefreshEdit
end
object ExcludeList: TListBox
Left = 10
Top = 46
Width = 281
Height = 93
ItemHeight = 16
Style = lbOwnerDrawFixed
TabOrder = 0
OnDrawItem = ExcludeListDrawItem
end
object Header: THeader
Left = 10
Top = 28
Width = 281
Height = 19
Sections.Sections = (
#0'141'#0'Module name'
#0'62'#0'Class name')
TabOrder = 1
end
object RefreshEdit: TSpinEdit
Left = 162
Top = 194
Width = 79
Height = 22
MaxValue = 60
MinValue = 1
TabOrder = 2
Value = 5
end
end
end
object HelpBtn: TBitBtn
Left = 234
Top = 272
Width = 77
Height = 27
TabOrder = 3
Kind = bkHelp
Margin = 4
Style = bsNew
Spacing = -1
end
end