Subversion Repositories plumbers

Rev

Rev 21 | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 21 Rev 24
1 
object MainForm: TMainForm
 1 
object MainForm: TMainForm
2 
  Left = 0
 2 
  Left = 0
3 
  Top = 0
 3 
  Top = 0
4 
  BorderIcons = [biSystemMenu, biMinimize]
 4 
  BorderIcons = [biSystemMenu, biMinimize]
5 
  BorderStyle = bsSingle
 5 
  BorderStyle = bsSingle
6 
  ClientHeight = 107
 6 
  ClientHeight = 107
7 
  ClientWidth = 280
 7 
  ClientWidth = 280
8 
  Color = clBlack
 8 
  Color = clBlack
9 
  Font.Charset = DEFAULT_CHARSET
 9 
  Font.Charset = DEFAULT_CHARSET
10 
  Font.Color = clWindowText
 10 
  Font.Color = clWindowText
11 
  Font.Height = -11
 11 
  Font.Height = -11
12 
  Font.Name = 'Tahoma'
 12 
  Font.Name = 'Tahoma'
13 
  Font.Style = []
 13 
  Font.Style = []
14 
  KeyPreview = True
 14 
  KeyPreview = True
15 
  OldCreateOrder = False
 15 
  OldCreateOrder = False
16 
  Position = poScreenCenter
 16 
  Position = poScreenCenter
17 
  OnCreate = FormCreate
 17 
  OnCreate = FormCreate
18 
  OnDestroy = FormDestroy
 18 
  OnDestroy = FormDestroy
19 
  OnKeyDown = FormKeyDown
 19 
  OnKeyDown = FormKeyDown
20 
  PixelsPerInch = 96
 20 
  PixelsPerInch = 96
21 
  TextHeight = 13
 21 
  TextHeight = 13
22 
  object Image1: TImage
 22 
  object Image1: TImage
23 
    Left = 159
 23 
    Left = 159
24 
    Top = 8
 24 
    Top = 8
25 
    Width = 41
 25 
    Width = 41
26 
    Height = 33
 26 
    Height = 33
27 
    OnMouseUp = ControlClick
 27 
    OnMouseUp = ControlClick
28 
  end
 28 
  end
29 
  object Panel1: TPanel
 29 
  object Panel1: TPanel
30 
    Left = 24
 30 
    Left = 24
31 
    Top = 32
 31 
    Top = 32
32 
    Width = 176
 32 
    Width = 176
33 
    Height = 25
 33 
    Height = 25
34 
    BevelOuter = bvSpace
 34 
    BevelOuter = bvSpace
35 
    Color = clWhite
 35 
    Color = clWhite
36 
    Ctl3D = False
 36 
    Ctl3D = False
37 
    ParentBackground = False
 37 
    ParentBackground = False
38 
    ParentCtl3D = False
 38 
    ParentCtl3D = False
39 
    TabOrder = 0
 39 
    TabOrder = 0
40 
    Visible = False
 40 
    Visible = False
41 
    OnMouseUp = ControlClick
 41 
    OnMouseUp = ControlClick
42 
  end
 42 
  end
43 
  object MediaPlayer1: TMediaPlayer
 43 
  object MediaPlayer1: TMediaPlayer
44 
    Left = 191
 44 
    Left = 191
45 
    Top = 51
 45 
    Top = 51
46 
    Width = 57
 46 
    Width = 57
47 
    Height = 30
 47 
    Height = 30
48 
    VisibleButtons = [btPlay, btStop]
 48 
    VisibleButtons = [btPlay, btStop]
49 
    DoubleBuffered = True
 - 
 
50 
    Display = Panel2
 49 
    Display = Panel2
51 
    Visible = False
 50 
    Visible = False
52 
    ParentDoubleBuffered = False
 - 
 
53 
    TabOrder = 1
 51 
    TabOrder = 1
54 
  end
 52 
  end
55 
  object Panel2: TPanel
 53 
  object Panel2: TPanel
56 
    Left = 24
 54 
    Left = 24
57 
    Top = 63
 55 
    Top = 63
58 
    Width = 137
 56 
    Width = 137
59 
    Height = 18
 57 
    Height = 18
60 
    BevelOuter = bvNone
 58 
    BevelOuter = bvNone
61 
    ParentColor = True
 59 
    ParentColor = True
62 
    TabOrder = 2
 60 
    TabOrder = 2
63 
    Visible = False
 61 
    Visible = False
64 
  end
 62 
  end
65 
  object StartupTimer: TTimer
 63 
  object StartupTimer: TTimer
66 
    Enabled = False
 64 
    Enabled = False
67 
    Interval = 10
 65 
    Interval = 10
68 
    OnTimer = StartupTimerTimer
 66 
    OnTimer = StartupTimerTimer
69 
    Left = 216
 67 
    Left = 216
70 
    Top = 16
 68 
    Top = 16
71 
  end
 69 
  end
72 
end
 70 
end