Главная страница
    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
15-1390735988
Сварщик
2014-01-26 15:33
2014.08.24
AV при попытке расшифровать файл через DecryptFileA (и W тоже)


3-1300339224
Alex_1025bit
2011-03-17 08:20
2014.08.24
dbExpress и MySQL определение автоинкрементного индекса


2-1380528742
12345
2013-09-30 12:12
2014.08.24
не вызывается событие OnBeforePost


2-1380108417
Вася
2013-09-25 15:26
2014.08.24
Это фишка или баг фрипаскаля?


2-1380422621
Коля
2013-09-29 06:43
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский