Свежие новости на сайте Русских Героев (от fireman):
http://remake-heroes.ucoz.ru/news/

АвторСообщение
Император
Администратор форума * Проект Horn of the Abyss * Проект "Русские Герои" * Сайт Новых городов * ICQ 484-525-562




Сообщение: 15
Зарегистрирован: 14.10.07
Откуда: Украина, Чернигов
Репутация: 0
ссылка на сообщение  Отправлено: 14.10.07 19:08. Заголовок: Работа с Midi в Delphi


Здесь я спрошу: никому не приходилось с этим сталкиваться? Имею в виду не проиграть mid-файл, а воспроизвести определённую ноту определённым инструментом. Может кто помочь?

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 4 [только новые]





Сообщение: 1
Зарегистрирован: 19.12.07
Репутация: 0
ссылка на сообщение  Отправлено: 19.12.07 21:54. Заголовок: Хотел спросить, как ..


Хотел спросить, как определить корневую папку программы и искать mp3-файлы в ней.

Спасибо: 0 
ПрофильЦитата Ответить
Император
Администратор форума * Проект Horn of the Abyss * Проект "Русские Герои" * Сайт Новых городов * ICQ 484-525-562




Сообщение: 350
Зарегистрирован: 14.10.07
Откуда: Украина, Чернигов
Репутация: 3
ссылка на сообщение  Отправлено: 19.12.07 22:20. Заголовок: Наверное, нужно доба..


Наверное, нужно добавить TOpenDialog и у него в свойствах посмотреть папку. Затем:

 
{$I-}
FindFirst(f, '*.mp3');
repeat
FindNext(f);
until IOResult=0;
{$I+}

где f переменная типа file.

Хотя я уже сам подзабыл.
Ещё было такое, что ParamStr(0) возвращает путь к программе. Может, уже такого нет. Попробуй.

С мышиной точки зрения, кошачье мурлыканье исключительно похоже на гром. (Авессалом Подводный) Спасибо: 0 
ПрофильЦитата Ответить
Боярин




Сообщение: 2
Зарегистрирован: 22.12.07
Репутация: 0
ссылка на сообщение  Отправлено: 22.12.07 11:05. Заголовок: Спасибо...


Не... Ето не то... Другой вопрос: как найти адрес программы?

Спасибо: 0 
ПрофильЦитата Ответить



Не зарегистрирован
Зарегистрирован: 01.01.70
ссылка на сообщение  Отправлено: 08.01.08 12:18. Заголовок: Аргет


ExtractFileDir(ParamStr(0));

Спасибо: 0 
Цитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  2 час. Хитов сегодня: 0
Права: смайлы да, картинки да, шрифты нет, голосования нет
аватары да, автозамена ссылок вкл, премодерация вкл, правка нет