IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Вызов события, OnDrawCell
сообщение
Сообщение #1


Бывалый
***

Группа: Пользователи
Сообщений: 195
Пол: Мужской
Реальное имя: Сергей

Репутация: -  2  +


В общем я хочу чтобы у меня после какого-то действия вызывалась процедура OnDrawCell для StringGrid'a.
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);

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


--------------------
♣♣♣
"Себя великим не считай, гордясь величьем предков,
Величья не добудешь ты и золота ценою!
Хоть светит на небе луна, но отраженным светом -
Чужою славой не живи, не будь второй луною!!!"
♣♣♣
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Бывалый
***

Группа: Пользователи
Сообщений: 195
Пол: Мужской
Реальное имя: Сергей

Репутация: -  2  +


Действительно, оказывается всё настолько просто smile.gif Спасибо за код, но у меня есть ещё пара вопросов по данному коду.
Во-первых, что такое SetLength? И для чего он нужен?
  img := (ArrPanels[2, 2].Components[0] as TImage);
if img <> nil then img.Picture := nil;

Зачем мы пишем Components[0]? И что мы делаем во второй строке?
И ещё, вот в процедурах myPanelClick и myImageClick, что мы в них делаем?
В myPanelClick, как я понял, мы меняем рамку панели, или я не прав?

Сообщение отредактировано: Сергей Меркурьев -


--------------------
♣♣♣
"Себя великим не считай, гордясь величьем предков,
Величья не добудешь ты и золота ценою!
Хоть светит на небе луна, но отраженным светом -
Чужою славой не живи, не будь второй луною!!!"
♣♣♣
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Сергей Меркурьев   Вызов события   27.06.2010 22:21
Unconnected   Ну так и вызываешь, form1.StringGrid1DrawCell(Send…   27.06.2010 22:35
Сергей Меркурьев   Так ему Sender не нравится... Пишет следующее [Err…   27.06.2010 22:37
volvo   Налицо ошибка проектирования. Событие не должно вы…   27.06.2010 23:40
Сергей Меркурьев   Что касается видимости ячеек, то этого у меня не п…   27.06.2010 23:52
volvo   Похоже, ты не понимаешь основ событийного программ…   28.06.2010 0:32
Сергей Меркурьев   Хорошо объясню ситуацию по конкретнее. Спасибо что…   28.06.2010 0:41
volvo   Не использовать StringGrid для работы с изображени…   28.06.2010 3:35
Сергей Меркурьев   Вы везде употребляете слово "автоматически…   28.06.2010 13:47
Unconnected   Ну наверное имелось в виду при запуске программы с…   28.06.2010 15:46
volvo   Когда я говорю "автоматически" - подразу…   28.06.2010 16:03
Сергей Меркурьев   Действительно, оказывается всё настолько просто :)…   28.06.2010 19:04
Client   Думаю, что этот обработчик надо установить для все…   28.06.2010 20:18
volvo   Комментарии к коду читал? Там все написано. А во …   28.06.2010 21:15
Сергей Меркурьев   Спасибо!   28.06.2010 21:37
Сергей Меркурьев   А вот еще один вопрос по поводу первых процедур - …   30.06.2010 20:34
volvo   Ну, например, написать вот такую вот функцию: // …   30.06.2010 20:56
Сергей Меркурьев   А как сделать обмен таких изображений, зная коорди…   30.06.2010 22:34
Client   А что ты делаешь если надо поменять 2 переменные ц…   30.06.2010 23:00
Сергей Меркурьев   b1 := arrPanels[x,y].Components[0] as TImage; …   30.06.2010 23:03
Client   свойство Picture тоже поменяй   30.06.2010 23:20
volvo   Этого недостаточно. Такой способ сработает только …   30.06.2010 23:39
Сергей Меркурьев   volvo, в общем-то я затрудняюсь ответить на Ваши в…   1.07.2010 12:42


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 8:39
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name