home *** CD-ROM | disk | FTP | other *** search
- object OLEObjectForm: TOLEObjectForm
- Left = 229
- Top = 113
- AutoScroll = False
- Width = 435
- Height = 300
- ActiveControl = OleContainer
- Caption = 'OLE Object'
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- FormStyle = fsMDIChild
- Menu = MainMenu1
- ObjectMenuItem = OLEObjectMenuItem
- PixelsPerInch = 120
- Position = poDefault
- Visible = True
- TextHeight = 16
- object OleContainer: TOleContainer
- Left = 8
- Top = 8
- Width = 192
- Height = 96
- TabOrder = 0
- OnStatusLineEvent = OleContainerStatusLineEvent
- end
- object MainMenu1: TMainMenu
- Left = 384
- Top = 16
- object File1: TMenuItem
- Caption = '&File'
- object New1: TMenuItem
- Caption = '&New'
- OnClick = New1Click
- end
- object Open1: TMenuItem
- Caption = '&Open...'
- OnClick = Open1Click
- end
- object SaveAs1: TMenuItem
- Caption = '&Save As...'
- OnClick = SaveAs1Click
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Exit1: TMenuItem
- Caption = 'E&xit'
- OnClick = Exit1Click
- end
- end
- object Edit1: TMenuItem
- Caption = '&Edit'
- GroupIndex = 1
- OnClick = Edit1Click
- object InsertObject1: TMenuItem
- Caption = '&Insert Object...'
- OnClick = InsertObject1Click
- end
- object PasteSpecial1: TMenuItem
- Caption = '&Paste Special...'
- OnClick = PasteSpecial1Click
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object OLEObjectMenuItem: TMenuItem
- Caption = '&Object'
- Enabled = False
- end
- end
- object Object2: TMenuItem
- Caption = '&Object'
- GroupIndex = 2
- object Deactivate1: TMenuItem
- Caption = '&Deactivate'
- OnClick = Deactivate1Click
- end
- end
- object Window1: TMenuItem
- Caption = '&Window'
- GroupIndex = 4
- object Cascade1: TMenuItem
- Caption = '&Cascade'
- OnClick = Cascade1Click
- end
- object Tile1: TMenuItem
- Caption = '&Tile'
- OnClick = Tile1Click
- end
- object ArrangeIcons1: TMenuItem
- Caption = '&Arrange Icons'
- OnClick = ArrangeIcons1Click
- end
- end
- end
- object SaveAsDialog: TSaveDialog
- DefaultExt = 'ole'
- FileName = '*.ole'
- Filter = 'OLE files (*.ole)|*.ole'
- Left = 384
- Top = 48
- end
- end
-