nesco писал(а):
Вообще-то календарь на аглицком через "C" пишется -- Calendar.Tad писал(а):
Напиши "К текущей дате"
Пример замены системного меню на своеAdd(MainForm,2953706,378,294)
{
Width=817
Height=587
Caption="Calendar"
}
Add(Calendar,12016330,448,294)
{
Left=155
Top=105
ToDayLink=0
Point(onToDayLink)
link(onToDayLink,6643468:doDeferredEvent,[])
}
Add(DeferredEvent,6643468,490,308)
{
link(onDeferredEvent,4648087:doPopupHere,[])
}
Add(PopupMenu,4648087,532,308)
{
Menu=#14:К текущей дате|
}
nesco писал(а):
Вот только монотонный он какой-то, но это недостаток системного календаря.
Поиск
Друзья
Администрация