Показать сообщение отдельно
  #5  
Старый 24.11.2011, 22:30
Аватар для ryderx34
ryderx34 ryderx34 вне форума
Активный
 
Регистрация: 22.01.2010
Сообщения: 211
Версия Delphi: 7, 2010
Репутация: 1349
По умолчанию

как-то так:
Код:
Min := BASS_ChannelSeconds2Bytes(Ch, 20); // 20 секунд в байтах
Max := BASS_ChannelGetLength(Ch, BASS_POS_BYTE) - Min; // длина минус 20 секунд, в байтах 
BASS_ChannelSetPosition(Ch, RandomRange(Min, Max), BASS_POS_BYTE);
Ответить с цитированием