eddoc
Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Код: with TcxScheduler(Sender).ViewDay.HitTest do
begin
if HitAtTimeRuler
then
cxLbl7.Caption:= 'It''s a TimeRuler Zone'
else
if HitAtTimeZoneLabel
then
cxLbl7.Caption:= 'It''s a TimeLabel Zone'
else
if HitAtContainer
then
cxLbl7.Caption:= 'It''s a Container Zone'
else
if HitAtResource
then
cxLbl7.Caption:= 'It''s a Resource Zone'
else
if HitAtButton
then
cxLbl7.Caption:= 'It''s a Button Zone'
else
if HitAtContent
then
cxLbl7.Caption:= 'It''s a Content Zone'
else
if HitAtContentNavigationButton
then
cxLbl7.Caption:= 'It''s a ContentNavigationButton Zone'
else
if HitAtDayHeader
then
cxLbl7.Caption:= 'It''s a DayHeader Zone'
else
if HitAtTime
then
cxLbl7.Caption:= 'It''s a Time Zone'
else
if HitAtGroupSeparator
then
cxLbl7.Caption:= 'It''s a GroupSeparator Zone'
else
if HitAtEvent
then
cxLbl7.Caption:= 'It''s a Event Zone'
else
if HitAtResourceHeader
then
cxLbl7.Caption:= 'It''s a ResourceHeader Zone'
else
cxLbl7.Caption:= 'Out of scheduling area';
end; |
|
Всего записей: 328 | Зарегистр. 25-11-2007 | Отправлено: 16:12 03-01-2013 | Исправлено: eddoc, 17:24 03-01-2013 |
|
