|
Вопрос # 3 742/ вопрос открыт / |
|
Здравствуйте, эксперты!
У меня есть StringGrid и мне нужно создать процедуру
get_color(ACol,ARow : integer ; B : boolean);
которая в случае если b true закрашивала ячейку [ACol,ARow]
в один цвет иначе в другой.
ЗЫ мне нужно не событие "OnDrawCell" а процедура!
Заранее благодарю!
К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)
 |
Вопрос задал: Черняев Саша (статус: Посетитель)
Вопрос отправлен: 6 февраля 2010, 20:28
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 4; последнее сообщение — 7 февраля 2010, 18:48; участников в обсуждении: 3.
|
Вадим К (статус: Академик), 6 февраля 2010, 20:42 [#1]:
как раз событие тоже нужно. в своей процедуре где нибудь в массиве отмечаете, что ячейка должна иметь определённый цвет. А вот в событии отрисовки уже рисуете нужным цветом. А если просто закрасить ячейку нужным цветом, то он удалиться, как только к примеру форма будет свернута и развернута.
Галочка "подтверждения прочтения" - вселенское зло.
|
6 февраля 2010, 21:03: Вопрос перемещён из тематического раздела Delphi » Общие вопросы по программированию в раздел Delphi » Работа с компонентами и библиотеками модератором Ерёмин А.А.
|
|
Черняев Саша (статус: Посетитель), 6 февраля 2010, 23:49 [#2]:
ну программа должна работать постоянно, это таблица на соревновании, т.е если введенные данные корректны, то мне определенную ячейку надо закрасить одним цветом. Ну я допустим создам булевский массив, где true - зеленый цвет, а false - красный, а как мне сделать событие чтобы рисовать какую-то клетку?
|
|
min@y™ (статус: Доктор наук), 7 февраля 2010, 09:59 [#3]:
Цитата (Черняев Саша):
а как мне сделать событие чтобы рисовать какую-то клетку?
type TDrawCellEvent = procedure (Sender: TObject; ACol, ARow: Longint; Rect: TRect; State: TGridDrawState) of object;
Вся логика отрисовки должна быть в обработчике события. Если что-то изменилось, нужно просто вызвать StringGrid.Refresh() или Update(), или Invalidate() для перерисовки видимой части грида.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Черняев Саша (статус: Посетитель), 7 февраля 2010, 18:48 [#4]:
спасибо! сделал!
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
