Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2014.08.24;
Скачать: [xml.tar.bz2];

Вниз

advtrackbar   Найти похожие ветки 

 
artemka2008   (2013-10-01 13:33) [0]

помогите решить проблему, ползунок advtrackbar уходит влево, когда воспроизведение доходит до 1:10
проверял его работу с TMediaPlayer, никаких проблем не было, а с bass.dll выходит так


 
artemka2008 ©   (2013-10-01 13:39) [1]

Исходники:
http://rusfolder.com/38249830


 
brother ©   (2013-10-01 13:52) [2]

> Исходники:

нет, спасибо не надо...


 
[ВладОшин] ©   (2013-10-01 13:55) [3]

накачают всякой фигни..
1.
advtrackbar  - нет в стандартной поставки

2.
строка tb1.Position := Bass_ChannelGetPosition(stream,0);
tb1.Position - тип?


 
brother ©   (2013-10-01 19:58) [4]

Влад, вот не лень же тебе ;)


 
artemka2008 ©   (2013-10-01 21:47) [5]

tb1: TAdvTrackBar;


 
robt5   (2013-10-01 21:52) [6]

жесть
рукалицо


 
[ВладОшин] ©   (2013-10-02 08:42) [7]


> tb1: TAdvTrackBar;

не может быть! :)

tb1.Position - тип какой?

У тебя только в одном месте двигается трак - в TForm1.Timer1Timer
в строке
tb1.Position := Bass_ChannelGetPosition(stream, 0);
Может, переполнение банальное

поставь рядом  стандартный трак, проверь в траке ли дело
типа
K := Bass_ChannelGetPosition(stream, 0);
tb1.Position := K;
Стандартный.Position := K;

поставь следилку на время отладки, что возвращается.
типа memo1.lines.add( Bass_ChannelGetPosition(stream, 0);  )
посмотри потом что за цифры около 1:10 приходят за сек до и после


> brother ©   (01.10.13 19:58) [4]

иногда хочется заморочиться :)


 
Туповатый ©   (2013-10-02 09:01) [8]


> У тебя только в одном месте двигается трак - в TForm1.Timer1Timer
> в строке
> tb1.Position := Bass_ChannelGetPosition(stream, 0);

у него там две таких строки. для надежности.


 
[ВладОшин] ©   (2013-10-02 09:29) [9]


> у него там две таких строки. для надежности.

заметил, но фиг с этим, не должно мешать, вроде :)
хотя, первую все же лучше убрать.

Все равно не успеет перерисоваться, имхо.
1.Не так много времени пройдет, пока что-то там расчитывается(z)
2.да main(гуй)-поток будет занят расчетами(z), не до рисования ему будет


 
artemka2008 ©   (2013-10-02 15:01) [10]

две строчки потому что проверял разные варианты и забыл удалить.
стандартный ttrackbar работает без проблем, и если использовать tmediaplayer, то тоже все отлично, перемотка, показ позиции и тд, но если использовать bass.dll , то ползунок уходит влево на определенном месте и появляется через промежуток времени равный тому, на котором он исчез. если исчез на 1:10, то появится на 2:20 и причем время исчезновения зависит от длины advtrackbar,
чем длинней он, тем раньше перемещается ползунок и наоборот.
я даже нашел условие в advtrackbar.pas при котором он исчезает, но как исправить я не знаю, как как tadvtrackbar зависит еще от 3х компонентов,
а именно от AdvStyleIF, AdvGDIP и GDIPicture(в большей степени от 2х последних)



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2014.08.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.002 c
3-1300339224
Alex_1025bit
2011-03-17 08:20
2014.08.24
dbExpress и MySQL определение автоинкрементного индекса


2-1380406476
Энтони
2013-09-29 02:14
2014.08.24
Вопрос по case of


15-1390656072
Jimmy
2014-01-25 17:21
2014.08.24
Карточные игры


11-1252421746
varag
2009-09-08 18:55
2014.08.24
Работа с ListView


15-1390920271
ухты
2014-01-28 18:44
2014.08.24
Когда выборы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский