Вниз
Скачать: CL | DM;

Цветные ячейки в StringGrid   Найти похожие ветки 

 
Viktop   (2005-02-27 14:07) [0]

Как задать цвет определённой ячейке StringGrid по нажатию на КНОПКУ?


 
olookin ©   (2005-02-27 14:10) [1]

рисовать на канвасе StringGrid


 
olookin ©   (2005-02-27 14:10) [2]

рисовать на канвасе StringGrid


 
Anatoly Podgoretsky ©   (2005-02-27 14:17) [3]

OnDrawCell


 
Viktop   (2005-02-27 14:18) [4]

Это как?


 
olookin ©   (2005-02-27 14:23) [5]

Покопайтесь в этом примере

procedure TModelWindow.StringGrid1TopLeftChanged(Sender: TObject);
var i,xc,yc: integer;
   s: string;
begin
 with StringGrid1 do begin
 with Canvas do begin Brush.Color:=clBlack; Font.Color:=clYellow;
 Font.Style:=[fsBold]; Font.Name:="MS Sans Serif"; end;
 for i:=0 to RowCount-1 do begin
 xc:=CellRect(0,i).Left; yc:=CellRect(0,i).Top;
 if (yc<>0) or ((i=0) and (TopRow=0)) then begin
 Canvas.FillRect(CellRect(0,i));
 Canvas.TextRect(CellRect(0,i),xc+2,yc+2,s); end; end; end;
end;


 
Leonid Troyanovsky ©   (2005-02-27 14:41) [6]


> Viktop   (27.02.05 14:07)  
> Как задать цвет определённой ячейке StringGrid по нажатию
> на КНОПКУ?


http://groups.google.com/groups?selm=287011140%40p2.f175.n5020.z2.ftn

--
Regards, LVT.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c
3-1108060910
Step[B.M.]
2005-02-10 21:41
2005.03.13
Как заставить FireBird сортировать кирилицу по "человечески"?


1-1109670882
Ivolg
2005-03-01 12:54
2005.03.13
Ошибка


11-1092467454
Dmitry
2004-08-14 11:10
2005.03.13
Не работают хинты в KOL


14-1108546902
Romkin
2005-02-16 12:41
2005.03.13
С днем рождения, Delphi!


14-1108996975
infom
2005-02-21 17:42
2005.03.13
Юношеский максимализм.....




   Наверх