home *** CD-ROM | disk | FTP | other *** search
- object BaseForm: TBaseForm
- Left = 225
- Top = 123
- Cursor = crArrow
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'Basissourcen DirectX'
- ClientHeight = 600
- ClientWidth = 800
- Color = clBlack
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- KeyPreview = True
- OldCreateOrder = True
- OnActivate = ActivateWindow
- OnClose = CloseWindow
- OnCreate = CreateWindow
- OnDestroy = DestroyWindow
- OnKeyUp = KeyUp
- OnMouseDown = MouseDown
- OnMouseUp = MouseUp
- OnResize = ResizeWindow
- OnShow = ShowWindow
- PixelsPerInch = 96
- TextHeight = 18
- object MainPlayer: TMediaPlayer
- Left = 80
- Top = 8
- Width = 29
- Height = 30
- ColoredButtons = []
- Enabled = False
- EnabledButtons = []
- VisibleButtons = []
- AutoEnable = False
- AutoRewind = False
- Constraints.MaxHeight = 640
- Constraints.MaxWidth = 480
- Display = MainPanel
- Visible = False
- TabOrder = 0
- OnNotify = NotifyMedia
- end
- object MainPanel: TPanel
- Left = 112
- Top = 88
- Width = 289
- Height = 89
- BevelOuter = bvNone
- Caption = 'MainPanel'
- Color = clBlack
- TabOrder = 1
- OnMouseDown = MouseDown
- OnMouseUp = MouseUp
- end
- object Timer1: TTimer
- Enabled = False
- OnTimer = HandleStartTimer
- Left = 8
- Top = 8
- end
- object Timer2: TTimer
- Enabled = False
- OnTimer = RestoreSystemObject
- Left = 8
- Top = 48
- end
- end
-