Chip 1998 April/ChipCD_498.iso/software/testsoft/logos/logos_d.exe/0/RCDATA/TFVIDEO/TFVIDEO.txt

Text File | 1998-02-23 | 3KB | 157 lines

object fVideo: TfVideo
  Left = 208
  Top = 125
  BorderStyle = bsNone
  Caption = 'fVideo'
  ClientHeight = 573
  ClientWidth = 792
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object iTlo: TImage
    Left = 0
    Top = 0
    Width = 800
    Height = 600
    Picture.Data = {<image000.bmp>}
  end
  object Shape1: TShape
    Left = 32
    Top = 185
    Width = 77
    Height = 30
    Cursor = crHandPoint
    Pen.Color = clNone
    Pen.Mode = pmMask
    OnMouseDown = Shape1MouseDown
    OnMouseUp = Shape1MouseUp
  end
  object Shape2: TShape
    Left = 15
    Top = 59
    Width = 116
    Height = 38
    Cursor = crHandPoint
    Pen.Color = clNone
    Pen.Mode = pmMask
    OnMouseUp = Shape2MouseUp
  end
  object Shape3: TShape
    Left = 13
    Top = 104
    Width = 118
    Height = 38
    Cursor = crHandPoint
    Pen.Color = clNone
    Pen.Mode = pmMask
    OnMouseUp = Shape3MouseUp
  end
  object Shape4: TShape
    Left = 10
    Top = 141
    Width = 119
    Height = 36
    Cursor = crHandPoint
    Pen.Color = clNone
    Pen.Mode = pmMask
    OnMouseUp = Shape4MouseUp
  end
  object iTemat: TImage
    Left = 155
    Top = 36
    Width = 650
    Height = 112
  end
  object sStart: TShape
    Left = 29
    Top = 21
    Width = 77
    Height = 24
    Cursor = crHandPoint
    Pen.Color = clNone
    Pen.Mode = pmMask
    OnMouseUp = sStartMouseUp
  end
  object iPauza: TImage
    Left = 23
    Top = 14
    Width = 88
    Height = 32
    Cursor = crHandPoint
    AutoSize = True
    Picture.Data = {<image001.bmp>}
    OnMouseUp = iPauzaMouseUp
  end
  object s1: TShape
    Left = 10
    Top = 95
    Width = 119
    Height = 39
    Cursor = crHandPoint
    Pen.Color = clBlue
    Pen.Mode = pmMask
    Pen.Width = 3
    Shape = stRoundRect
    OnMouseUp = s1MouseUp
  end
  object iWroc: TImage
    Left = 28
    Top = 263
    Width = 86
    Height = 36
    Cursor = crHandPoint
    Picture.Data = {<image002.bmp>}
    Visible = False
    OnMouseDown = iWrocMouseDown
    OnMouseUp = iWrocMouseUp
  end
  object Image1: TImage
    Left = 32
    Top = 224
    Width = 81
    Height = 33
    Cursor = crHandPoint
    OnMouseUp = Image1MouseUp
  end
  object Panel1: TPanel
    Left = 158
    Top = 118
    Width = 641
    Height = 481
    BevelOuter = bvNone
    FullRepaint = False
    Color = 9257290
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    object iObraz: TImage
      Left = 0
      Top = 0
      Width = 641
      Height = 481
      Align = alClient
    end
  end
  object MP1: TMediaPlayer
    Left = 134
    Top = 78
    Width = 253
    Height = 30
    Display = Panel1
    Visible = False
    TabOrder = 1
  end
  object Timer1: TTimer
    Interval = 500
    OnTimer = Timer1Timer
    Left = 28
    Top = 386
  end
end