home *** CD-ROM | disk | FTP | other *** search
- object FrmSpacer: TFrmSpacer
- Left = 198
- Top = 102
- BorderStyle = bsDialog
- Caption = 'Spacer'
- ClientHeight = 200
- ClientWidth = 209
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 13
- object lblType: TLabel
- Left = 8
- Top = 8
- Width = 24
- Height = 13
- Caption = '&Type'
- FocusControl = cbType
- end
- object lblSize: TLabel
- Left = 8
- Top = 40
- Width = 20
- Height = 13
- Caption = '&Size'
- FocusControl = seSize
- end
- object lblAlign: TLabel
- Left = 8
- Top = 72
- Width = 23
- Height = 13
- Caption = '&Align'
- FocusControl = cbAlign
- end
- object lblHeight: TLabel
- Left = 8
- Top = 104
- Width = 31
- Height = 13
- Caption = '&Height'
- Enabled = False
- FocusControl = seHeight
- end
- object lblWidth: TLabel
- Left = 8
- Top = 136
- Width = 28
- Height = 13
- Caption = '&Width'
- Enabled = False
- FocusControl = seWidth
- end
- object cbType: TComboBox
- Left = 56
- Top = 8
- Width = 145
- Height = 21
- Hint = 'type of the spacer'
- ItemHeight = 13
- Items.Strings = (
- 'HORIZONTAL'
- 'VERTICAL'
- 'BLOCK')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Text = 'VERTICAL'
- OnChange = cbTypeChange
- end
- object cbAlign: TComboBox
- Left = 56
- Top = 72
- Width = 145
- Height = 21
- Hint = 'Alignment of the spacer'
- ItemHeight = 13
- Items.Strings = (
- 'LEFT'
- 'RIGHT'
- 'TOP'
- 'TEXTTOP'
- 'MIDDLE'
- 'ABSMIDDLE'
- 'BASELINE'
- 'BOTTOM'
- 'ABSBOTTOM')
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- end
- object seHeight: TSpinEdit
- Left = 56
- Top = 104
- Width = 145
- Height = 22
- Enabled = False
- MaxValue = 9999
- MinValue = 0
- TabOrder = 3
- Value = 0
- end
- object seWidth: TSpinEdit
- Left = 56
- Top = 136
- Width = 145
- Height = 22
- Enabled = False
- MaxValue = 9999
- MinValue = 0
- TabOrder = 4
- Value = 0
- end
- object seSize: TSpinEdit
- Left = 56
- Top = 40
- Width = 145
- Height = 22
- Hint = 'The size of the spacer in pixels'
- MaxValue = 9999
- MinValue = 0
- TabOrder = 1
- Value = 0
- end
- object btnOK: TButton
- Left = 48
- Top = 168
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 5
- end
- object btnCancel: TButton
- Left = 128
- Top = 168
- Width = 75
- Height = 25
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 6
- end
- end
-