Главная страница
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
15-1347455469
Artem
2012-09-12 17:11
2013.03.22
Как включить отображение 3d визуализации?


15-1329815103
Kolan
2012-02-21 13:05
2013.03.22
Напомните историю про уволенного программиста


15-1337084520
Max
2012-05-15 16:22
2013.03.22
аналог AsProtect


15-1338582602
Юрий
2012-06-02 00:30
2013.03.22
С днем рождения ! 2 июня 2012 суббота


15-1339966494
Jeer
2012-06-18 00:54
2013.03.22
Вело-Вапдай