1
0
Files
aarre
applications
bindings
components
ZVDateTimeCtrls
aboutcomponent
acs
beepfp
chelper
cmdline
cmdlinecfg
colorpalette
csvdocument
epiktimer
fpsound
fpspreadsheet
freetypepascal
geckoport
gradcontrols
iosdesigner
iphonelazext
jujiboutils
jvcllaz
kcontrols
lazbarcodes
lclextensions
longtimer
manualdock
mplayer
examples
FullFeatured
Simple
project1.ico
project1.lpi
project1.lpr
project1.res
unit1.lfm
unit1.pas
README.txt
mplayercontrollaz.lpk
mplayercontrollaz.pas
mplayerctrl.lrs
mplayerctrl.pas
tmplayercontrol.xpm
multithreadprocs
nvidia-widgets
onguard
orpheus
playsoundpackage
poweredby
powerpdf
rgbgraphics
richmemo
richview
rtfview
rx
scrolltext
smnetgradient
spktoolbar
svn
tdi
thtmlport
tparadoxdataset
tvplanit
virtualtreeview
virtualtreeview-new
xdev_toolkit
zlibar
examples
lclbindings
wst
lazarus-ccr/components/mplayer/examples/Simple/unit1.lfm

86 lines
1.7 KiB
Plaintext
Raw Normal View History

object Form1: TForm1
Left = 290
Height = 390
Top = 189
Width = 583
ActiveControl = Panel1
Caption = 'Form1'
ClientHeight = 390
ClientWidth = 583
OnCreate = FormCreate
LCLVersion = '1.2.4.0'
object MPlayerControl1: TMPlayerControl
Left = 6
Height = 334
Top = 27
Width = 571
Align = alClient
BorderSpacing.Around = 6
Loop = 0
Volume = 0
end
object Panel1: TPanel
Left = 0
Height = 21
Top = 0
Width = 583
Align = alTop
AutoSize = True
ClientHeight = 21
ClientWidth = 583
TabOrder = 1
object PlaySpeedButton: TSpeedButton
Left = 1
Height = 19
Top = 1
Width = 26
Align = alLeft
AutoSize = True
Caption = 'Play'
OnClick = PlaySpeedButtonClick
end
object PauseSpeedButton: TSpeedButton
Left = 27
Height = 19
Top = 1
Width = 35
Align = alLeft
AutoSize = True
Caption = 'Pause'
OnClick = PauseSpeedButtonClick
end
object StopSpeedButton: TSpeedButton
Left = 62
Height = 19
Top = 1
Width = 28
Align = alLeft
AutoSize = True
Caption = 'Stop'
OnClick = StopSpeedButtonClick
end
object OpenSpeedButton: TSpeedButton
Left = 90
Height = 19
Top = 1
Width = 52
Align = alLeft
AutoSize = True
Caption = 'Open file'
OnClick = OpenSpeedButtonClick
end
end
object StatusBar1: TStatusBar
Left = 0
Height = 23
Top = 367
Width = 583
Panels = <>
end
object OpenDialog1: TOpenDialog
Options = [ofFileMustExist, ofEnableSizing, ofViewDetail]
left = 235
top = 127
end
end