![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Календарь [D7, XP]
Der Nechk@ssoff © (2006-03-23 07:56:00)Здраствуйте!У меня на форме есть Calendar как сделать что бы при нажатии на ячейку с N-ным днем появлялось сообщение "N число текущего месяца"?
Я использую такой код:
procedure TForm5.Calendar1Change(Sender: TObject);
begin
showmessage('N число текущего месяца.');
end;
end.
но число N постоянно для всех других дней.
Der Nechk@ssoff (2006-03-23 08:10:00) [1]Спасибо!
Pearled (2006-03-23 08:03:00) [2]вместо N подставляй выбранное число:
showmessage(IntToStr(Calendar1.Day)+' число текущего месяца');