|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.11.2012, 17:51 | #1 |
Пользователь
Регистрация: 09.06.2011
Сообщений: 53
|
будильник, ошибки
// при нажатии на кнопку играет 1.wav
procedure TfrmMain.Button1Click(Sender: TObject); begin PlaySound('H:\1.wav', 0, SND_ASYNC); end; //если в Edit1, Text = 8:00:00 и на lblTime 8:00:00 играет 1.wav procedure TfrmMain.Timer2Timer(Sender: TObject); begin if (lblTime = strtotime(Edit1)) then //выдает ошибку PlaySound('H:\1.wav', 0, SND_ASYNC); end; end. |
06.11.2012, 19:02 | #2 |
Форумчанин
Регистрация: 30.10.2010
Сообщений: 524
|
Код:
|
09.11.2012, 16:16 | #3 |
Пользователь
Регистрация: 09.06.2011
Сообщений: 53
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Будильник | cargo29 | Общие вопросы Delphi | 9 | 27.03.2011 07:49 |
Будильник. | rabbitsnew | Общие вопросы Delphi | 2 | 30.08.2010 21:04 |
будильник | waka2ebawer | Общие вопросы Delphi | 4 | 22.06.2010 10:47 |
Будильник | RealSHELS | Свободное общение | 6 | 30.05.2008 21:40 |
Будильник | DeDoK | Общие вопросы Delphi | 7 | 21.02.2008 10:02 |