![]() |
Модераторы: Snowy, Alexeis, MetalFan |
![]() ![]() ![]() |
|
SFproG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 2 Регистрация: 30.1.2005 Репутация: нет Всего: нет |
Кто нибудь знает коды всех нот для извлечения их из программы?
Например, для извлечения ноты "До" я пишу такой код: procedure TForm1.Button1Click(Sender: TObject); begin midimsg:=$7f3c90; // "$7f3c90" - нота "до" // midioutshortmsg(hmidi_out,midimsg); end; Это коды всех нот которые я знаю: $7f3a90 - ля# $7f3b90 - си $7f3c90 - до $7f3d90 - до# $7f3e90 - ре $7f3f90 - ре# Не хватает ещё шесть. Подскажите кто знает. Заранее спасибо... |
|||
|
||||
Droll |
|
|||
![]() Шустрый ![]() Профиль Группа: Участник Сообщений: 61 Регистрация: 10.11.2004 Репутация: 1 Всего: 3 |
Смотри модуль jclMIDI из JediVCL компонентов
Пример использования там есть в примерах \jcl\examples\vcl\multimedia\MidiOutExample.dpr |
|||
|
||||
SFproG |
|
|||
Новичок Профиль Группа: Участник Сообщений: 2 Регистрация: 30.1.2005 Репутация: нет Всего: нет |
JediVCL у меня нет в Delphi 6. Нашёл в интернете. Как скачаю посмотрю... Спасибо
|
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: Звук, графика и видео" | |
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делится вскрытыми компонентами
FAQ раздела лежит здесь! Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Girder, Snowy. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |