Регистрация Главная Сообщество
Сообщения за день Справка Регистрация

Пишем программу на Delphi

-

Вопросы и ответы, обсуждения

- Ваши вопросы по Pascal/Delphi только в данном разделе

Ответ
 
Опции темы
Старый 26.02.2014, 21:46   #1
 Разведчик
Аватар для YedmoN
 
YedmoN никому не известный тип
Регистрация: 17.02.2014
Сообщений: 0
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Отправить сообщение для YedmoN с помощью Skype™
 
Smile Пишем программу на Delphi

Здравствуйте уважаемые программисты. Я совсем "новичек" в Delphi, вернее ранее еще в школе изучал, но было не совсем интересно , поскольку в школьные года интересует совсем другое.
И так приступим к делу. Решил написать программу в которой при нажатии кнопки воспроизводился звук. Сделал 10 кнопок , к каждой хочу отдельный звук (не системный, а музыку какую либо). Интересует код , который надо списывать для каждой кнопки, я имею представление об этом, но надо увидеть сам код, что-бы понять.
Заранее спасибо вам за помощь. Прошу не критиковать, поскольку учусь.

Прилагаю скрин, что-бы вы имели представление о чем я.[Ссылки могут видеть только зарегистрированные пользователи. ]
  Ответить с цитированием
Старый 26.02.2014, 22:45   #2
 Пехотинец
Аватар для NebesaBag
 
NebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражания
Регистрация: 27.12.2011
Сообщений: 73
Популярность: 2425
Сказал(а) спасибо: 334
Поблагодарили 57 раз(а) в 27 сообщениях
 
По умолчанию Re: Пишем программу на Delphi

uses
..., MMSystem;

Запуск циклического проигрывания
sndPlaySound('ТвойЗвуковойФайл.wav',SND_NODEFAULT Or SND_ASYNC Or SND_LOOP);

Остановка
sndPlaySound(nil, 0);
________________
[Ссылки могут видеть только зарегистрированные пользователи. ]

Пишу софт на заказ(Delphi / C# / PHP-скрипты). Описывайте задачи и цели софта, сообщайте сумму на которую рассчитываете.
Skype: vinozavr (Молдова)


Кто плюсует популярность, подписывайтесь пожалуйста)
  Ответить с цитированием
Старый 26.02.2014, 23:15   #3
 Разведчик
Аватар для YedmoN
 
YedmoN никому не известный тип
Регистрация: 17.02.2014
Сообщений: 0
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Отправить сообщение для YedmoN с помощью Skype™
 
По умолчанию Re: Пишем программу на Delphi

Ответьте пожалуйста в лс, есть пару вопросов для уточнения. Не совсем понял.
  Ответить с цитированием
Старый 27.02.2014, 09:36   #4
 Разведчик
Аватар для DirectD3D
 
DirectD3D скоро будет известенDirectD3D скоро будет известенDirectD3D скоро будет известенDirectD3D скоро будет известенDirectD3D скоро будет известен
Регистрация: 26.02.2014
Сообщений: 2
Популярность: 432
Сказал(а) спасибо: 0
Поблагодарили 11 раз(а) в 7 сообщениях
 
По умолчанию Re: Пишем программу на Delphi

Цитата:
Сообщение от YedmoNПосмотреть сообщение
Здравствуйте уважаемые программисты. Я совсем "новичек" в Delphi, вернее ранее еще в школе изучал, но было не совсем интересно , поскольку в школьные года интересует совсем другое.
И так приступим к делу. Решил написать программу в которой при нажатии кнопки воспроизводился звук. Сделал 10 кнопок , к каждой хочу отдельный звук (не системный, а музыку какую либо). Интересует код , который надо списывать для каждой кнопки, я имею представление об этом, но надо увидеть сам код, что-бы понять.
Заранее спасибо вам за помощь. Прошу не критиковать, поскольку учусь.

Прилагаю скрин, что-бы вы имели представление о чем я.[Ссылки могут видеть только зарегистрированные пользователи. ]

Уточни воспроизводить из файла mp3 песню или же делать ресурс с несколькимя звуками ?
  Ответить с цитированием
Старый 27.02.2014, 16:15   #5
 Разведчик
Аватар для YedmoN
 
YedmoN никому не известный тип
Регистрация: 17.02.2014
Сообщений: 0
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Отправить сообщение для YedmoN с помощью Skype™
 
По умолчанию Re: Пишем программу на Delphi

Цитата:
Уточни воспроизводить из файла mp3 песню или же делать ресурс с несколькимя звуками ?

Немного посидел и разобрался, сделал 1 кнопку, которая воспроизводит 10 звуков по очереди.
Спасибо)
  Ответить с цитированием
Старый 27.02.2014, 17:59   #6
 Разведчик
Аватар для DirectD3D
 
DirectD3D скоро будет известенDirectD3D скоро будет известенDirectD3D скоро будет известенDirectD3D скоро будет известенDirectD3D скоро будет известен
Регистрация: 26.02.2014
Сообщений: 2
Популярность: 432
Сказал(а) спасибо: 0
Поблагодарили 11 раз(а) в 7 сообщениях
 
По умолчанию Re: Пишем программу на Delphi

Цитата:
Сообщение от YedmoNПосмотреть сообщение
Немного посидел и разобрался, сделал 1 кнопку, которая воспроизводит 10 звуков по очереди.
Спасибо)

Молодец
  Ответить с цитированием
Старый 03.04.2014, 22:01   #7
 Разведчик
Аватар для zap96ol
 
zap96ol неизвестен в этих краяхzap96ol неизвестен в этих краях
Регистрация: 04.11.2011
Сообщений: 20
Популярность: -117
Сказал(а) спасибо: 52
Поблагодарили 1 раз в 1 сообщении
 
По умолчанию Re: Пишем программу на Delphi

Цитата:
uses
..., MMSystem;

Запуск циклического проигрывания
sndPlaySound('ТвойЗвуковойФайл.wav',SND_NODEFAULT Or SND_ASYNC Or SND_LOOP);

Остановка
sndPlaySound(nil, 0);

интересно а можно побольше подробностей?:
sndPlaySound - это функция получается ?
('ТвойЗвуковойФайл.wav',SND_NODEFAULT Or SND_ASYNC Or SND_LOOP) - в скобочках параметры этой функции, которые перечислены через запятую, так?
SND_NODEFAULT Or SND_ASYNC Or SND_LOOP - что означает этот параметр? в этом длинном англиийском предложение написанном капсом есть какая то логика? или это просто параметр который нужно либо выучить и знать , или просто можно списать от куда нибудь?

MMSystem - вы подключаете новый модуль, вообще прежде чем ответить на вопрос автора вы что то искали в гугле или в книгах?
Или вы просто знаете все модули наизусть и знаете к какому модулю нужны какие либо функции...?

п.с. Сколько всего модулей существует в Делфи?
И что бы быть тру программистом ведь надо знать каждый модуль?

Спасибка
________________
[Ссылки могут видеть только зарегистрированные пользователи. ]
[Ссылки могут видеть только зарегистрированные пользователи. ]

Последний раз редактировалось zap96ol; 03.04.2014 в 22:04.
  Ответить с цитированием
Старый 04.04.2014, 10:19   #8
 Пехотинец
Аватар для NebesaBag
 
NebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражанияNebesaBag блестящий пример для подражания
Регистрация: 27.12.2011
Сообщений: 73
Популярность: 2425
Сказал(а) спасибо: 334
Поблагодарили 57 раз(а) в 27 сообщениях
 
По умолчанию Re: Пишем программу на Delphi

Цитата:
Сообщение от zap96olПосмотреть сообщение
интересно а можно побольше подробностей?

В своё время мне для 1 программы понадобилось периодическое звуковое сопровождение. Я начал гуглить и самый приемлемый для меня вариант был связанный с этим модулем. Сразу же нашел примеры функций и реализовал их у себя.
Всё просто.
________________
[Ссылки могут видеть только зарегистрированные пользователи. ]

Пишу софт на заказ(Delphi / C# / PHP-скрипты). Описывайте задачи и цели софта, сообщайте сумму на которую рассчитываете.
Skype: vinozavr (Молдова)


Кто плюсует популярность, подписывайтесь пожалуйста)
  Ответить с цитированием
Пользователь сказал cпасибо:
zap96ol (05.04.2014)
Ответ


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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Статья] Пишем простой скриншотер в Delphi TryCoder Pascal/Delphi 2 06.07.2013 19:27
[Статья] Пишем брутфорс [Delphi] ReAct1[on] Pascal/Delphi 1 16.11.2012 19:34

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 01:37.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net