procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
Подскажите пожалуйста как можно эту процедуру вызвать из какого-либо участка кода?
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
Вызов события, OnDrawCell |
Cheburashka |
Сообщение
#1
|
Бывалый Группа: Пользователи Сообщений: 195 Пол: Мужской Реальное имя: Сергей Репутация: 2 |
В общем я хочу чтобы у меня после какого-то действия вызывалась процедура OnDrawCell для StringGrid'a.
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Подскажите пожалуйста как можно эту процедуру вызвать из какого-либо участка кода? -------------------- ♣♣♣
"Себя великим не считай, гордясь величьем предков, Величья не добудешь ты и золота ценою! Хоть светит на небе луна, но отраженным светом - Чужою славой не живи, не будь второй луною!!!" ♣♣♣ |
Cheburashka |
Сообщение
#2
|
Бывалый Группа: Пользователи Сообщений: 195 Пол: Мужской Реальное имя: Сергей Репутация: 2 |
Действительно, оказывается всё настолько просто Спасибо за код, но у меня есть ещё пара вопросов по данному коду.
Во-первых, что такое SetLength? И для чего он нужен? img := (ArrPanels[2, 2].Components[0] as TImage); Зачем мы пишем Components[0]? И что мы делаем во второй строке? И ещё, вот в процедурах myPanelClick и myImageClick, что мы в них делаем? В myPanelClick, как я понял, мы меняем рамку панели, или я не прав? Сообщение отредактировано: Сергей Меркурьев - -------------------- ♣♣♣
"Себя великим не считай, гордясь величьем предков, Величья не добудешь ты и золота ценою! Хоть светит на небе луна, но отраженным светом - Чужою славой не живи, не будь второй луною!!!" ♣♣♣ |
Текстовая версия | 29.03.2024 8:39 |