home *** CD-ROM | disk | FTP | other *** search
- inherited GraphicShapePropForm: TGraphicShapePropForm
- Left = 626
- Top = 421
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- inherited OKBtn: TButton
- HelpContext = 40418
- end
- inherited CancelBtn: TButton
- HelpContext = 40420
- end
- inherited PageControl1: TPageControl
- ActivePage = LineTabSheet
- inherited GeneralTabSheet: TTabSheet
- inherited PositionGroupBox: TGroupBox
- inherited UpDown1: TUpDown
- HelpContext = 40500
- end
- inherited UpDown2: TUpDown
- HelpContext = 40510
- end
- end
- inherited SizeGroupBox: TGroupBox
- inherited UpDown3: TUpDown
- HelpContext = 40520
- end
- inherited UpDown4: TUpDown
- HelpContext = 40530
- end
- end
- end
- object LineTabSheet: TTabSheet
- HelpContext = 40400
- Caption = 'Format'
- object Panel1: TPanel
- Left = 240
- Top = 120
- Width = 89
- Height = 73
- HelpContext = 40408
- BevelOuter = bvNone
- BorderStyle = bsSingle
- Color = clAppWorkSpace
- TabOrder = 0
- object PreviewShape: TShape
- Left = 4
- Top = 4
- Width = 77
- Height = 61
- end
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 8
- Width = 225
- Height = 94
- Caption = 'Line'
- TabOrder = 1
- object Label6: TLabel
- Left = 8
- Top = 18
- Width = 27
- Height = 13
- Caption = '&Type:'
- end
- object Label7: TLabel
- Left = 8
- Top = 42
- Width = 52
- Height = 13
- Caption = 'Thickness:'
- end
- object Label5: TLabel
- Left = 8
- Top = 64
- Width = 27
- Height = 13
- Caption = 'Color:'
- end
- object LineTypeComboBox: TNFComboBox
- Left = 72
- Top = 14
- Width = 145
- Height = 22
- HelpContext = 40430
- Style = csOwnerDrawFixed
- ItemHeight = 16
- Items.Strings = (
- 'psSolid'
- 'psDash'
- 'psDot'
- 'psDashDot'
- 'psDashDotDot')
- TabOrder = 0
- OnChange = LineTypeComboBoxChange
- OnDrawItem = ComboBox2DrawItem
- end
- object LineWidthFloatEdit: TFloatEdit
- Left = 72
- Top = 38
- Width = 81
- Height = 21
- HelpContext = 40440
- Alignment = taLeftJustify
- DisplayFormat = '0, Point(s);(0, Point(s))'
- TabOrder = 1
- OnChange = LineWidthFloatEditChange
- OnEnter = LineWidthFloatEditChange
- OnExit = LineWidthFloatEditChange
- end
- object PenColorPanel: TPanel
- Left = 72
- Top = 62
- Width = 33
- Height = 22
- HelpContext = 40450
- BevelOuter = bvNone
- BorderStyle = bsSingle
- TabOrder = 2
- end
- object ChangePenColorBtn: TButton
- Left = 128
- Top = 62
- Width = 89
- Height = 23
- HelpContext = 40460
- Caption = '&Change...'
- TabOrder = 3
- OnClick = ChangePenColorBtnClick
- end
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 104
- Width = 225
- Height = 89
- Caption = 'Filling'
- TabOrder = 2
- object Label8: TLabel
- Left = 9
- Top = 38
- Width = 27
- Height = 13
- Caption = 'Color:'
- end
- object BrushColorPanel: TPanel
- Left = 57
- Top = 36
- Width = 33
- Height = 22
- HelpContext = 40470
- BevelOuter = bvNone
- BorderStyle = bsSingle
- TabOrder = 1
- end
- object ChangeBrushColorBtn: TButton
- Left = 113
- Top = 35
- Width = 89
- Height = 23
- HelpContext = 40480
- Caption = 'C&hange...'
- TabOrder = 2
- OnClick = ChangeBrushColorBtnClick
- end
- object TranspCheckBox: TCheckBox
- Left = 8
- Top = 16
- Width = 97
- Height = 17
- HelpContext = 40490
- Caption = 'Transparent'
- TabOrder = 0
- OnClick = TranspCheckBoxClick
- end
- end
- end
- end
- object ColorDialog: TColorDialog
- Ctl3D = True
- Options = [cdAnyColor]
- Left = 24
- Top = 232
- end
- end
-