Конференция "KOL" » Исходники... [Delphi]
 
  • MTsv DN (13.10.08 13:33) [0]
    Всем привет...

    Вот решил создать топик по обмену наработками. Перефразирую Глеба Жеглова: "Неслыханных кодов не бывает, что-то, где-то, кем-то уже написано..."

    Первым, чем хочу поделиться - расширенное использование диалога OpenFiles - выбор не только файлов, но и папок. На паскале в сети ничего не нашел, поэтому пришлось портировать и править код Hojjat Bohlooli...и вот что из этого вышло:
    http://ru.uus4u.com/downloads/sources/extended_opendialog.7z
    P.S. Делал для Unicode, т.ч. не забудьте подключить UNICODE_CTRLS.
    P.P.S. Позже у себя на сайте открою раздел...
  • vampir_infernal (13.10.08 13:35) [1]
    спасибо за наработки
  • MTsv DN (13.10.08 13:45) [2]
    На здоровье. Будут еще, просто времени оформлять не хватает...
  • AnarchyMob © (14.10.08 03:36) [3]
    А для Win CE этот диалог пойдет (а то я уже собирался сам писать) , сейчас просто времени нет это проверить. Если хотите я свои наработки, в области "системы", выложу. Только я незнаю как здесь файлы прикреплять к сообщениям.
  • Danger © (14.10.08 08:52) [4]

    > AnarchyMob ©   (14.10.08 03:36) [3]
    > я незнаю как здесь файлы прикреплять к сообщениям.


    А никак, файлы здесь не прикрепляются. Просто ссылку выкладывать.
  • MTsv DN (14.10.08 14:55) [5]
    2 AnarchyMob
    Работает ли код в WinCE я не знаю...
  • MTsv DN (14.10.08 15:05) [6]
    Предлагаю еще одну наработку - конвертер WAV2FLAC.

    Файл FLAC.PAS был взят из NewAC. Кодировщик был портирован из "родных" примеров FLAC v.1.2.1b.
    http://ru.uus4u.com/downloads/sources/wav2flac.7z

    P.S. К сожалению, в примерах умалчивалось как кодировать файлы отличные от 16бит. Как смог, добавил поддержку 8бит, хотя файлы исходными не получаются... WAV файлы 16 бит кодируются норамльно.
    P.P.S. Если кто знает как добавить поддержку 8, 24, 32 бит прошу сообщить...
  • MTsv DN (16.10.08 17:37) [7]
    Всем привет...

    Итак. Все-таки "добил" я этот конвертер. Обновление WAV2FLAC.
    http://ru.uus4u.com/downloads/sources/wav2flac.7z

    Поддержка:
    SampleRate: 22.5/32/44.1/48 kHz
    BitRate:       8/16/24
    Channels:     1/2
  • MTsv DN (16.10.08 19:39) [8]
    Ну, и логическим завершением вышесказанного: конвертер FLAC2WAV.
    Много кода позаимствовано из NewAC. Исправлен код для 8-битных файлов. Также использован портированный пример из FLAC v.1.2.1b.
    http://ru.uus4u.com/downloads/sources/flac2wav.7z

    Поддержка:
    SampleRate: 22.5/32/44.1/48 kHz
    BitRate:       8/16/24
    Channels:     1/2
  • MTsv DN (21.10.08 11:32) [9]
    Всем привет...

    Очередной исходник - WAV Normelizer.

    Проект основан на коде Manuel Kasper.
    http://ru.uus4u.com/downloads/sources/wav_normalizer.7z

    P.S. Поддерживаются 8 и 16 битные WAV файлы...
  • AnarchyMob © (22.10.08 14:08) [10]
    Обращаюсь к тебе как к профи в области цифрового звука, не мог бы ты где-нибудь найти исходники ogg декодера (желательно конечно на паскале). Просто хочу написать плейер для КПК, а использовать библиотеки типа fmod не хочу.

    P.S.
    mp3 декодер у меня есть, и оболочка для плейера тоже уже готова.
  • AnarchyMob © (22.10.08 14:09) [11]
    Обращаюсь к тебе как к профи в области цифрового звука, не мог бы ты где-нибудь найти исходники ogg декодера (желательно конечно на паскале). Просто хочу написать плейер для КПК, а использовать библиотеки типа fmod не хочу.

    P.S.
    mp3 декодер у меня есть, и оболочка для плейера тоже уже готова.
  • MTsv DN (22.10.08 14:24) [12]
    Есть. Готовлю в эту тему... Через пару дней будут...
  • MTsv DN (22.10.08 14:25) [13]
    ...и wav2ogg, и ogg2wav... Также есть в wav2mp3, на основе "родного" исходника...
  • MTsv DN (22.10.08 19:38) [14]
    Пожалуйста, конвертер OGG2WAV... Давным-давно нарыл в сети исходник...вот адаптировал для KOL.

    http://ru.uus4u.com/downloads/sources/ogg2wav.7z

    P.S. Там переменной bits присваивается 16. Для моих нужд этого достаточно, однако можно сделать, чтоб из заголовка OGG файла получала...
  • AnarchyMob © (22.10.08 20:40) [15]
    ОГРОМНОЕ СПАСИБО буду разбиратся, я что-то искал в сети что-нибудь по этой теме, но ничего как помню не нашел, неужели я так плохо веду поиск?
  • AnarchyMob © (22.10.08 20:53) [16]
    Облом, там библиотеки используются, и об использовании модулей в Win CE я могу забыть, а есть, интересно, эти библиотеки (ogg.dll, vorbis.dll, vorbisenc.dll, vorbisfile.dll) для Win CE, или целый кодек ogg написанный на паскале т.е. с таблицами и прочим и без использования DLL.
  • MTsv DN (23.10.08 10:00) [17]

    > Облом, там библиотеки используются, и об использовании модулей
    > в Win CE я могу забыть, а есть, интересно, эти библиотеки
    > (ogg.dll, vorbis.dll, vorbisenc.dll, vorbisfile.dll) для
    > Win CE, или целый кодек ogg написанный на паскале т.е. с
    > таблицами и прочим и без использования DLL.

    http://www.cyanwerks.com/pocketogg/
  • AnarchyMob © (24.10.08 20:01) [18]
    Незнаю даже как благодарить, наконец-то я получил что хотел, что ж теперь самое главное, мне предстоит портировать тексты ogglib на Free Pascal, задача конечно нелегкая, но когда-то надо начинать.
  • MTsv DN (27.03.09 19:47) [19]
    Всем привет...

    Вот решил старую тему поднять. И не только потому что есть, что предложить, а потому что уперся лбом в стену...и нужен свежий взгляд.
    Итак:
    http://www.sendspace.com/file/ru9zdo

    Работа с библиотеками иконок (мультииконки).
    Код простой, т.ч. разобраться сложности не составить. Работа из файла отлажена и проверена.

    ...А теперь проблема... Попытка работы с ресурсом обламалась. Где косячу не вижу в упор. Доступ к IconGroup и счтывание в поток успешно. Заголовок первой иконки вроде верный, однако, на этом все. Думаю, не так обрабатываю ресурс... Но ничего путного придумать не смог... Кто-нить ткните носом в ошибку...
 
Конференция "KOL" » Исходники... [Delphi]
Есть новые Нет новых   [134431   +11][b:0][p:0.001]