Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Мультимедиа
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 16.08.2010, 01:05
Аватар для ryderx34
ryderx34 ryderx34 вне форума
Активный
 
Регистрация: 22.01.2010
Сообщения: 211
Версия Delphi: 7, 2010
Репутация: 1349
По умолчанию компонент для Bass

TBassContol - компонент для управления Bass.dll
Почти как TMediaPlayer, только невизуальный и ещё проще в использовании.
Умеет загружать плагины (Bass Add-ons), регулировать громкость, задавать позицию воспроизведения, имеет эквалайзер и несколько эффектов (хорус, эхо и т. д.).
Прилагается инструкция на русском языке.
Оставляйте отзывы, если понравится - буду развивать проект.

bass_control.zip

Последний раз редактировалось ryderx34, 16.08.2010 в 01:14.
Ответить с цитированием
  #2  
Старый 16.08.2010, 02:17
Аватар для urahara
urahara urahara вне форума
Новичок
 
Регистрация: 16.01.2010
Сообщения: 86
Репутация: 35
По умолчанию

Код:
function TBassControl.SupportedFormats: string;
begin
  Result:='All supported formats |*.mp3;*.wav;*.ogg;*.aif';
  if FPlugIns.AAC then
    Result:=Result+';*.aac;*.mp4';
  if FPlugIns.WMA then
    Result:=Result+';*.wma';
  if FPlugIns.CDA then
    Result:=Result+';*.cda';
  if FPlugIns.FLAC then
    Result:=Result+';*.flac';
  if FPlugIns.AC3 then
    Result:=Result+';*.ac3';
  if FPlugIns.MPC then
    Result:=Result+';*.mpc';
end;
долго смеялся, не надо мне такого.
__________________
Arrrgh
Ответить с цитированием
  #3  
Старый 16.08.2010, 02:44
Аватар для ryderx34
ryderx34 ryderx34 вне форума
Активный
 
Регистрация: 22.01.2010
Сообщения: 211
Версия Delphi: 7, 2010
Репутация: 1349
По умолчанию

Цитата:
Сообщение от urahara
...
долго смеялся, не надо мне такого.
большая часть кода написана всего через 2 месяца после того как я впервые увидел Delphi...
Переписывать не стал, потому что это пробная версия, единственное предназначение которой - узнать нужен ли подобный компонент вообще.
Ответить с цитированием
  #4  
Старый 16.08.2010, 08:16
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,004
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Да не, в некоторых вариантах это нормальный код.
Тут скорее вопрос что такое FPlugIns...
Ответить с цитированием
  #5  
Старый 16.08.2010, 14:44
Аватар для ryderx34
ryderx34 ryderx34 вне форума
Активный
 
Регистрация: 22.01.2010
Сообщения: 211
Версия Delphi: 7, 2010
Репутация: 1349
По умолчанию

Цитата:
Сообщение от lmikle
. . .
Тут скорее вопрос что такое FPlugIns...
Код:
PLUGIN_FORMATS = record
    AAC: Boolean;
    // . . .
    MPC: Boolean;
  end;
Ответить с цитированием
  #6  
Старый 20.11.2010, 05:08
GrakovNe GrakovNe вне форума
Прохожий
 
Регистрация: 18.11.2010
Сообщения: 4
Репутация: 10
По умолчанию Извините не могу кое чего понять

А как с помощью этого или как нибудь по другому реализовать поддержку таких форматов как: 3gp,amr,awb? Уже долго мучаюсь ваш форум - моя последняя надежда
Ответить с цитированием
  #7  
Старый 20.11.2010, 10:27
Аватар для ryderx34
ryderx34 ryderx34 вне форума
Активный
 
Регистрация: 22.01.2010
Сообщения: 211
Версия Delphi: 7, 2010
Репутация: 1349
По умолчанию

Цитата:
Сообщение от GrakovNe
А как с помощью этого или как нибудь по другому реализовать поддержку таких форматов как: 3gp,amr,awb?
С помощью этого - никак, Bass не поддерживает эти форматы.
Ответить с цитированием
  #8  
Старый 20.11.2010, 12:47
Rumata Rumata вне форума
Прохожий
 
Регистрация: 28.08.2010
Сообщения: 2
Репутация: 10
По умолчанию

ну а обновления компонента будут? мне кажется, ещё есть над чем работать
Ответить с цитированием
  #9  
Старый 20.11.2010, 14:27
Аватар для ryderx34
ryderx34 ryderx34 вне форума
Активный
 
Регистрация: 22.01.2010
Сообщения: 211
Версия Delphi: 7, 2010
Репутация: 1349
По умолчанию

Работы действительно ещё много, т. к. я ещё толком ничего не делал, просто набросал небольшой примерчик. Сделать новую версию собираюсь уже давно, но пока не хватает времени.
Ответить с цитированием
  #10  
Старый 21.11.2010, 14:11
Rumata Rumata вне форума
Прохожий
 
Регистрация: 28.08.2010
Сообщения: 2
Репутация: 10
По умолчанию

Цитата:
Сообщение от ryderx34
Работы действительно ещё много, т. к. я ещё толком ничего не делал, просто набросал небольшой примерчик. Сделать новую версию собираюсь уже давно, но пока не хватает времени.
буду ждать, это удобная штука если лень со всеми заморочками BASS париться. И новичкам может помочь в освоении данной библиотеки
Ответить с цитированием
  #11  
Старый 27.11.2010, 16:15
live_4_ever live_4_ever вне форума
Прохожий
 
Регистрация: 01.06.2010
Сообщения: 19
Репутация: 12
По умолчанию

ryderx34
Добавь в свой компонент поддержку трекерной музыки.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 22:23.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter