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

Вниз

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

 
Nilman ©   (2012-07-18 21:52) [0]

Запутался, подскажите пож. Есть StringGrid высотой например 100px, DefaultRowHeight=20. StringGrid имеет одну строку. DefaultDrawing=False, рисую сам. StringGrid.Color:=clLime. Вопрос в том как сделать фон всего грида цветом clLime? Сейчас цветом clLime рисуются только ячейки, а фон грида вне ячеек остаётся белым.

procedure TMainForm.ts5sgCatListDrawCell(Sender: TObject; ACol, ARow: Integer;
 Rect: TRect; State: TGridDrawState);
begin
   (Sender as TStringGrid).Canvas.Brush.Color:=(Sender as TStringGrid).Color;
   (Sender as TStringGrid).Canvas.FillRect(Rect);
....
end;


Подскажите пож как раскрасить фон StringGrid вне области ячеек?


 
Юрий Зотов ©   (2012-07-18 22:03) [1]

Свойство Color разве не работает?


 
QAZ   (2012-07-18 22:08) [2]


> фон всего грида цветом clLime

срань господня,увидел бы такое - непременно б блеванул


 
Nilman ©   (2012-07-19 01:47) [3]

> срань господня,увидел бы такое - непременно б блеванул
Это для наглядности))

> Свойство Color разве не работает?
Как ни странно, но не работает.. Я почему грешным делом и подумал что при DefaultDrawing=False задача отрисовки области вне ячеек тоже лежит на плечах программиста.. Поправьте если не прав


 
Германн ©   (2012-07-19 02:00) [4]


> Я почему грешным делом и подумал что при DefaultDrawing=False
> задача отрисовки области вне ячеек тоже лежит на плечах
> программиста.. Поправьте если не прав

Даже для стандартных компонент VCL значение DefaultDrawing может учитываться неоднозначно. Но тут именно ИМХО и зависит от версии Дельфи.

Но что подразумевается под
> раскрасить фон StringGrid вне области ячеек?


 
Юрий Зотов ©   (2012-07-19 03:10) [5]


> Nilman ©   (19.07.12 01:47) [3]

Странно. У меня работает при любом DefaultDrawing. Красит всю клиентскую область грида.


 
Nilman ©   (2012-07-19 11:37) [6]


> Но что подразумевается под
> > раскрасить фон StringGrid вне области ячеек?

Клиентская область грида вмещает например 10 строк, а текущее значение RowCount=1

Чудеса.. Кинул девственно новый грид, со всеми свойствами по дефолту, поменял Color, в design time изменения видно, в runtime фон грида белый...


 
AV ©   (2012-07-19 11:46) [7]


> Кинул девственно новый грид, со всеми свойствами по дефолту,
>  поменял Color

дописал [0]
работает, как ожидалось
http://ge.tt/6cuwPiK/v/0


 
Nilman ©   (2012-07-23 15:53) [8]

Всем спасибо, у меня так и не заработало. Решил проблему другим путём)..



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

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

Наверх




Память: 0.48 MB
Время: 0.057 c
2-1347886681
fredwriter
2012-09-17 16:58
2013.03.22
AlphaBlend: наложить bmp на jpg или наоборот


2-1343924127
Pcrepair
2012-08-02 20:15
2013.03.22
Правильный код функции с idHTTP


15-1335175649
картман
2012-04-23 14:07
2013.03.22
Всем привет, тутже есть химики?)))


2-1338267500
SHerloK
2012-05-29 08:58
2013.03.22
Tchar и колесико


15-1332859127
Unknown user
2012-03-27 18:38
2013.03.22
Структура БД в XML