home *** CD-ROM | disk | FTP | other *** search
- object FormPropsDlg: TFormPropsDlg
- Left = 200
- Top = 111
- ActiveControl = ComponentsList
- BorderStyle = bsDialog
- Caption = 'Form Storage Designer'
- ClientHeight = 319
- ClientWidth = 352
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- PixelsPerInch = 96
- OnDestroy = FormDestroy
- TextHeight = 13
- object Bevel1: TBevel
- Left = 4
- Top = 49
- Width = 344
- Height = 236
- Shape = bsFrame
- end
- object Label30: TLabel
- Left = 12
- Top = 53
- Width = 82
- Height = 13
- Caption = '&Components '
- FocusControl = ComponentsList
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- IsControl = True
- end
- object Label31: TLabel
- Left = 224
- Top = 53
- Width = 70
- Height = 13
- Caption = '&Properties '
- FocusControl = PropertiesList
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- IsControl = True
- end
- object Label2: TLabel
- Left = 12
- Top = 169
- Width = 111
- Height = 13
- Caption = '&Stored Properties '
- FocusControl = StoredList
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object UpBtn: TSpeedButton
- Left = 272
- Top = 186
- Width = 25
- Height = 25
- Glyph.Data = {
- DE000000424DDE0000000000000076000000280000000D0000000D0000000100
- 0400000000006800000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3000333333333333300033330000033330003333066603333000333306660333
- 3000333306660333300030000666000030003306666666033000333066666033
- 3000333306660333300033333060333330003333330333333000333333333333
- 3000}
- OnClick = UpBtnClick
- end
- object DownBtn: TSpeedButton
- Left = 305
- Top = 186
- Width = 25
- Height = 25
- Glyph.Data = {
- DE000000424DDE0000000000000076000000280000000D0000000D0000000100
- 0400000000006800000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3000333333333333300033333303333330003333306033333000333306660333
- 3000333066666033300033066666660330003000066600003000333306660333
- 3000333306660333300033330666033330003333000003333000333333333333
- 3000}
- OnClick = DownBtnClick
- end
- object StoredList: TTextListBox
- Left = 12
- Top = 184
- Width = 245
- Height = 93
- DragMode = dmAutomatic
- ItemHeight = 13
- TabOrder = 3
- OnClick = StoredListClick
- OnDragDrop = StoredListDragDrop
- OnDragOver = StoredListDragOver
- end
- object PropertiesList: TTextListBox
- Left = 224
- Top = 69
- Width = 117
- Height = 93
- ItemHeight = 13
- MultiSelect = True
- Sorted = True
- TabOrder = 2
- OnClick = ListClick
- OnDblClick = PropertiesListDblClick
- end
- object ComponentsList: TTextListBox
- Left = 12
- Top = 69
- Width = 117
- Height = 93
- ItemHeight = 13
- Sorted = True
- TabOrder = 1
- OnClick = ListClick
- end
- object FormBox: TGroupBox
- Left = 4
- Top = 2
- Width = 344
- Height = 44
- Caption = ' Form Properties '
- TabOrder = 0
- object ActiveCtrlBox: TCheckBox
- Left = 12
- Top = 16
- Width = 94
- Height = 17
- Caption = ' Acti&ve Control'
- TabOrder = 0
- end
- object PositionBox: TCheckBox
- Left = 124
- Top = 16
- Width = 94
- Height = 17
- Caption = ' &Form Position'
- State = cbChecked
- TabOrder = 1
- end
- object StateBox: TCheckBox
- Left = 236
- Top = 16
- Width = 94
- Height = 17
- Caption = ' &Window State'
- State = cbChecked
- TabOrder = 2
- end
- end
- object AddButton: TButton
- Left = 137
- Top = 102
- Width = 77
- Height = 25
- Caption = '&Add'
- TabOrder = 4
- OnClick = AddButtonClick
- end
- object DeleteButton: TButton
- Left = 263
- Top = 218
- Width = 77
- Height = 25
- Caption = '&Delete'
- TabOrder = 5
- OnClick = DeleteButtonClick
- end
- object ClearButton: TButton
- Left = 263
- Top = 248
- Width = 77
- Height = 25
- Caption = 'Cl&ear'
- TabOrder = 6
- OnClick = ClearButtonClick
- end
- object OkBtn: TButton
- Left = 184
- Top = 290
- Width = 77
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 7
- end
- object CancelBtn: TButton
- Left = 268
- Top = 290
- Width = 77
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 8
- end
- end
-