Итак, первый.
Для отображения видео использую картинку:
code_392
Как мне изменять размер картинки? Свойства картинки «Autosize» и «View style» не помогают.
Пробовал так:
Add(Image,5077502,63,236)
{
Left=40
Top=20
Width=335
Height=189
Cursor=10
AutoSize=0
ViewStyle=4
Draw=0
MouseCapture=0
Point(Width)
Point(Height)
Point(onDblClick)
link(onClick,2904744:doMove,[(170,242)(170,284)])
}
Add(GetData,1668895,119,327)
{
link(Data,5077502:Handle,[(125,277)(76,277)])
}
Add(MoveWindow,2904744,259,278)
{
link(Handle,1668895:Data2,[(265,268)(191,268)(191,362)(132,362)])
}
Add(SizeWindow,13757520,161,378)
{
link(Width,5077502:Width,[(174,323)(83,323)])
link(Height,5077502:Height,[(181,323)(90,323)])
}
Add(Edit,3297074,84,385)
{
Left=80
Top=385
link(onChange,13757520:doWidth,[(138,391)(138,384)])
}
И так
Add(Image,5077502,63,236)
{
Left=40
Top=20
Width=335
Height=189
Cursor=10
AutoSize=0
ViewStyle=4
Draw=0
MouseCapture=0
Point(Width)
Point(Height)
Point(onDblClick)
link(onClick,2904744:doMove,[(170,242)(170,284)])
}
Add(GetData,1668895,119,327)
{
link(Data,5077502:Handle,[(125,277)(76,277)])
}
Add(MoveWindow,2904744,259,278)
{
link(Handle,1668895:Data2,[(265,268)(191,268)(191,362)(132,362)])
}
Add(SizeWindow,13757520,161,378)
{
link(Width,5077502:Width,[(174,323)(83,323)])
link(Height,5077502:Height,[(181,323)(90,323)])
}
Add(TrackBar,2464926,77,399)
{
Left=95
Top=430
Max=100
Position=50
link(onPosition,13757520:doWidth,[(135,405)(135,384)])
}
Не работает ни одно, ни другое. Памажите.
Вопрос намбер ту.
Как мне визуализировать поток?
Пробовал так:
Add(MainForm,2509220,14,91)
{
Left=20
Top=105
Width=444
Height=303
link(onCreate,5966542:doDraw,[(194,132)(194,230)])
}
Add(MediaPlayer,8201,152,64)
{
VideoScale=2
link(FileName,26368:String,[(158,54)(190,54)(190,228)(224,228)])
link(Handle,1668895:Data1,[(165,54)(79,54)(79,362)(125,362)])
}
Add(Image,5077502,63,236)
{
Left=40
Top=20
Width=335
Height=189
Cursor=10
AutoSize=0
ViewStyle=4
Draw=0
MouseCapture=0
Point(Width)
Point(Height)
Point(onDblClick)
link(onClick,2904744:doMove,[(170,242)(170,284)])
}
Add(GetData,1668895,119,327)
{
Count=3
link(Data,5077502:Handle,[(125,277)(76,277)])
}
Add(MoveWindow,2904744,259,278)
{
link(Handle,1668895:Data2,[(265,268)(191,268)(191,362)(132,362)])
}
Add(ODialog,31869,131,173)
{
Filter="МЕДИА файлы|*.*"
Select=1
link(onExecute,26368:doAdd,[])
}
Add(Button,47479,87,173)
{
Left=5
Top=235
Width=60
Caption="Открыть"
link(onClick,31869:doExecute,[])
}
Add(ListBox,26368,197,173)
{
Left=80
Top=230
Width=315
Height=40
Color=12698049
Ctl3D=1
Sort=0
Point(String)
link(onClick,8201:doPlay,[(239,186)(239,163)(79,163)(79,70)])
}
Add(SizeWindow,13757520,161,378)
{
link(Width,5077502:Width,[(174,323)(83,323)])
link(Height,5077502:Height,[(181,323)(90,323)])
}
Add(TrackBar,2464926,77,399)
{
Left=95
Top=430
Max=100
Position=50
link(onPosition,13757520:doWidth,[(135,405)(135,384)])
}
Add(BASS_ChlVisibleSpectrum,5966542,343,224)
{
link(WindowsHandle,1668895:Data3,[(349,214)(247,214)(247,369)(139,369)])
}
Выдаёт ошибку (Bass.dll качал с ссылки: http://www.hiasm.com/down/bass.dll)
Вот в принципи и усё