Будильник

[DeDoK]

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

[ERASERROR]

Что бы получить дату в строку пиши datatostr(date) что бы получить время в строку пиши timetostr(time) просто запиши эти данные и сравнивай , можно с помощью таймера.

[_Dmitry]

Посмотри вот эту статью http://www.interface.ru/home.asp?artId=4137
сам пока не разбирался, но похоже это то, что надо.

[knight]

Можно еще RxLib (rxstrutils.pas) использовать. Там много функций анализа дат и времени. Например DaysBetween ( DateBegin, DateEnd) = Количество дней между датами.

[pu4koff]

Сообщение от knight

Можно еще RxLib (rxstrutils.pas) использовать. Там много функций анализа дат и времени. Например DaysBetween ( DateBegin, DateEnd) = Количество дней между датами.

это есть и в стандартном DateUtils (или что-то в этом роде)

[mihali4]

Вот, "прилепите" только музыку:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if (Int(Now)=Int(DateTimePicker1.Date)) and (FormatDateTime('hh:mm',Now)=Edit1.Text) then
//тут вставите загрузку муз. файла и запуск медиаплеера
//Label1 - для проверки или визуального оповещения
Label1.Caption:='Zoom' else
Label1.Caption:='';
end;
//DateTimePicker1 - задает дату
//Edit1 - задает время

[knight]

Сообщение от pu4koff

это есть и в стандартном DateUtils (или что-то в этом роде)

В rx просто их побольше. И поудобней для использвания...

[andrey4623]

В принципе, тут ничего сложного нет. При наступлении определенной даты и времени загружаете и проигрываете музыку в TMediaPlayer (или средствами API)
Причем размер программы должен быть компактным. Кому понравится, если простейший будильник будет занимать 15-20 мегабайт оперативы?