Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.08.2010, 20:09   #11
DIgorevich
Погулять вышел
Участник клуба
 
Аватар для DIgorevich
 
Регистрация: 17.05.2010
Сообщений: 1,573
По умолчанию

А для кого придумана кнопочка # при наборе сообщения?

Вот, исправь и проверяй:
Цитата:
procedure TForm1.FormClick(Sender: TObject);
begin
inc(a);
if (a mod 2<>0) then
begin
sndPlaySound(nil, SND_ASYNC);
Label1.Caption:='Запись пошла!';
OpenMedia;
RecordMedia;
end
else
begin
Label1.Caption:='Воспроизведение';
StopMedia;
SaveMedia;
CloseMedia;
sndPlaySound('c:\message.wav', SND_ASYNC + SND_LOOP);
end;
end;
Никогда не знаешь, где тебе повезет... (Фрай)

Последний раз редактировалось DIgorevich; 08.08.2010 в 20:17.
DIgorevich вне форума Ответить с цитированием
Старый 08.08.2010, 20:33   #12
Фанат_Муравьева
 
Регистрация: 08.08.2010
Сообщений: 7
По умолчанию

Я тут просто новенький, не знал как форматировать


Спасибо огромное! Теперь всё работает как надо!

Тему можно закрывать.
Фанат_Муравьева вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
записи...программа в паскале barby-Nastya Фриланс 5 16.05.2010 04:02
дерево выражения, записанного в постфиксной форме Delphi Римма1990 Помощь студентам 0 20.04.2009 20:49
нужна программа для записи паролей... Coollik Свободное общение 2 24.07.2008 03:21
Программа использующая записи (тип данных) GN_ Общие вопросы Delphi 6 13.01.2007 19:16