Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.12.30;
Скачать: CL | DM;

Вниз

Коллеги подскажите как заданную ячейку в String Grid   Найти похожие ветки 

 
smartleds   (2007-12-06 14:28) [0]

пометить цветом (лучше красным).
У меня есть таблица от 1 до 256
k:=1;
for i:=0 to 7 do
  For j:=0 to 31 do
  begin
form2.StringGrid1.Cells[j,i]:=inttostr(k);
  k:=k+1;
 end;
Мне нужно пометить цветом заданные ячейки. Номера ячеек для окраски будут вычислены пользователем в программе.


 
Германн ©   (2007-12-06 14:32) [1]

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=168
Грид немножко другой, но общая идея такая же.


 
smartleds   (2007-12-06 14:56) [2]

Спасибо, полезная ссылка, разобрался. Один вопрос , если на окрашенную ячейку я кликаю мышкой, то краска пропадает , как ее зафиксировать?


 
smartleds   (2007-12-06 14:59) [3]

Даже не только на эту ячейку , но и вообще на таблицу, окрашенные ячейки остаются как прежде белыми.


 
Dib@zol ©   (2007-12-06 14:59) [4]

Обрабатывать OnPaint надо, вестимо.


 
Германн ©   (2007-12-06 14:59) [5]


> если на окрашенную ячейку я кликаю мышкой, то краска пропадает
> , как ее зафиксировать?

Зафиксировать никак. Но в OnDrawCell передается параметр State: TGridDrawState. Его можно и нужно учитывать при перерисовке.


 
Германн ©   (2007-12-06 15:00) [6]


> smartleds   (06.12.07 14:59) [3]
>
> Даже не только на эту ячейку , но и вообще на таблицу, окрашенные
> ячейки остаются как прежде белыми.
>

Значит не разобрался таки.


 
Anatoly Podgoretsky ©   (2007-12-06 15:03) [7]

Какой цвет задан для состояния Selected такой и будет.



Страницы: 1 вся ветка

Текущий архив: 2007.12.30;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.013 c
15-1196316970
DaniilG
2007-11-29 09:16
2007.12.30
Turbo Delphi +Event Log


3-1188048232
ChaoX
2007-08-25 17:23
2007.12.30
Уникальный индекс для строки


15-1196462270
Petr V. Abramov
2007-12-01 01:37
2007.12.30
.Net 2-й fw


11-1181762529
=BuckLr=
2007-06-13 23:22
2007.12.30
RE_FmtUnderlineStyle


15-1196334922
xayam
2007-11-29 14:15
2007.12.30
помогите перевести с английского