home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 April A
/
Pcwk4a98.iso
/
PROGRAM
/
DELPHI16
/
Calmira
/
Src
/
SRC
/
STRTPROP.DFM
/
STRTPROP.txt
Wrap
Text File
|
1997-02-17
|
10KB
|
247 lines
object StartPropDlg: TStartPropDlg
Left = 231
Top = 106
HelpContext = 56
ActiveControl = OKBtn
BorderStyle = bsDialog
Caption = 'Start Menu Properties'
ClientHeight = 337
ClientWidth = 323
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
PixelsPerInch = 96
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
TextHeight = 13
object OKBtn: TBitBtn
Left = 80
Top = 304
Width = 77
Height = 27
TabOrder = 2
OnClick = OKBtnClick
Kind = bkOK
Margin = 4
Style = bsNew
Spacing = -1
IsControl = True
end
object CancelBtn: TBitBtn
Left = 160
Top = 304
Width = 77
Height = 27
TabOrder = 3
OnClick = CancelBtnClick
Kind = bkCancel
Margin = 4
Style = bsNew
Spacing = -1
IsControl = True
end
object Notebook: TTabbedNotebook
Left = 2
Top = 0
Width = 317
Height = 301
TabFont.Color = clBtnText
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 0
object TTabPage
Left = 5
Top = 26
Caption = 'Items'
object AddBtn: TStyleSpeed
Left = 8
Top = 10
Width = 25
Height = 25
Hint = 'Add menu item'
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333300003333333333333333333300003333333333333333333300003333
3333333333333333000033333333333333333333000033300000000000000333
00003338777777777777033300003338EEEEEEEEEEE7033300003338EEEEEEEE
EEE7033300003338EEEEEEEEEEE7033300003338EEEEEEEEEEE7033300003338
EEEEEEEEEEE7033300003338EEEEEEEEEEE70333000033388888888888880333
00003338EEEEEEEEEEEE03330000333888888888888803330000333333333333
3333333300003333333333333333333300003333333333333333333300003333
3333333333333333000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = AddItemClick
end
object InsertBtn: TStyleSpeed
Left = 8
Top = 34
Width = 25
Height = 25
Hint = 'Insert menu item'
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333393330
000000000000333399999338777777700000333999999938EEE0EE7000003339
99999338EEE0EE700000333993393338E00000700000333993333338EEE0EE70
0000333993333338EEE0EE700000333993333338EEEEEE700000333993333338
8888888000003339933333333333333300003333333333333333333300003000
0000000333333333000038777777770333333333000038EEEEEEE70333333333
000038EEEEEEE70333333333000038888888880333333333000038EEEEEEE703
3333333300003888888888833333333300003333333333333333333300003333
3333333333333333000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = InsertItemClick
end
object EditBtn: TStyleSpeed
Left = 8
Top = 58
Width = 25
Height = 25
Hint = 'Edit current item'
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00444444444444
4444444400004000000044444444444400004000333304444444444400004003
3333304444444444000040333BB333044444444400004033BBBB333044444444
0000403FBBBBB33304444444000040FFFBBBBB33304444440000440FFFBBBBB3
3304444400004440FFFBBBBB33304444000044440FFFBBBBB333044400004444
40FFFBBBBB33304400004444440FFFBBBBB33304000044444440FFFBBBBB0000
0000444444440FFFBBB0333000004444444440FFFB033330000044444444440F
F03303300000444444444440F033330400004444444444440033304400004444
4444444440000444000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = EditItemClick
end
object DeleteBtn: TStyleSpeed
Left = 8
Top = 82
Width = 25
Height = 25
Hint = 'Delete current item'
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333391183
3333983300003333333911183339118300003333333911118391111800003333
3333911118111118000033333333391111111183000033333333339111111833
00003330000000011111833300003338777777791111833300003338EEEEEE91
1111833300003338EEEEE9111811183300003338EEEE91118E91118300003338
EEEE9118EEE9111800003338EEEEE91EEEE7911100003338EEEEEEEEEEE70919
00003338888888888888033300003338EEEEEEEEEEEE03330000333888888888
8888033300003333333333333333333300003333333333333333333300003333
3333333333333333000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = DeleteItemClick
end
object ExpandBtn: TStyleSpeed
Left = 8
Top = 106
Width = 25
Height = 25
Hint = 'Expand tree'
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333300003333333333338000000300003333333333338FFFFF0300003333
333333338FFFFF03000033333333333088888883000033333333330333333333
0000333333333033333333330000333333330333333333330000380000003333
80000003000038FFFFF000008FFFFF03000038FFFFF033338FFFFF0300003888
8888333388888883000033333333033333333333000033333333303333333333
0000333333333303333333330000333333333330800000030000333333333333
8FFFFF0300003333333333338FFFFF0300003333333333338888888300003333
3333333333333333000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = ExpandItemClick
end
object CollapseBtn: TStyleSpeed
Left = 8
Top = 130
Width = 25
Height = 25
Hint = 'Collapse tree'
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333300003333333333338383838300003333333333333333333300003333
3333333383333383000033333333333838383833000033333333338333333333
0000333333333833333333330000333333338333333333330000380000003333
83838383000038FFFFF0888833333333000038FFFFF033338333338300003888
8888333338383833000033333333833333333333000033333333383333333333
0000333333333383333333330000333333333338838383830000333333333333
3333333300003333333333338333338300003333333333333838383300003333
3333333333333333000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = CollapseItemClick
end
object ConvertBtn: TStyleSpeed
Left = 8
Top = 154
Width = 25
Height = 25
Hint = 'Import Program Manager groups'
Glyph.Data = {
80010000424D8001000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333000030000000000000000003000038777777777777777703000038EE
EEEEEEEEEEEEE703000038EE0000EEE00000E703000038EEEEEEEEEEEEEEE703
000038EE5550EEEE00EEE703000038EEE0F5EEE00B0EE703000038EEEE50EEE0
0000E703000038EEEEEEEEEEEEEEE703000038EE0000EEE00000E703000038EE
EEEEEEEEEEEEE703000038EE8000EEEE000EE703000038EE0000EEE0000EE703
000038EEE0F0EEEE060EE703000038EEE000EEEE000EE703000038EEEEEEEEEE
EEEEE70300003888888888888888880300003333333333333333333300003333
3333333333333333000000000000000000000000000000000000000000000000
00000000}
ParentShowHint = False
ShowHint = True
OnClick = ConvertClick
end
object Outline: TScrollTree
Left = 36
Top = 10
Width = 261
Height = 249
Style = otOwnerDraw
ItemHeight = 16
OnDrawItem = OutlineDrawItem
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
TabOrder = 0
OnDragDrop = OutlineDragDrop
OnDragOver = OutlineDragOver
OnEndDrag = OutlineEndDrag
OnMouseDown = OutlineMouseDown
ItemSeparator = '\'
PicturePlus.Data = {<image000. BM� v ( p � � �� � � � �� ��� ��� � � �� � � � �� ��� 3333333 3333333 3333333 330 333 330�333 330�333 3 � 3 3���3 3 � 3 330�333 330�333 330 333 3333333 33333>}