Главная страница
    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.46 MB
Время: 0.063 c
15-1338455782
Варрра
2012-05-31 13:16
2013.03.22
Что означает ваш ник?


15-1334521803
Юрий
2012-04-16 00:30
2013.03.22
С днем рождения ! 16 апреля 2012 понедельник


2-1332437524
sasha198407
2012-03-22 21:32
2013.03.22
ошибка Exception EAccessViolation in module Project1.exe


15-1342301646
silver
2012-07-15 01:34
2013.03.22
icfpc 2012


15-1346349689
alexdn
2012-08-30 22:01
2013.03.22
Теория чисел





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский