Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];

Вниз

Фон 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.068 c
15-1343313724
waveOutXXX
2012-07-26 18:42
2013.03.22
Как правильно работать с waveOutXXX?


2-1343932360
Drowsy
2012-08-02 22:32
2013.03.22
Какой таблице принадлежит запись со значением ключа?


15-1330882741
alexdn
2012-03-04 21:39
2013.03.22
Выборы 2012


2-1337107123
Валерий
2012-05-15 22:38
2013.03.22
Экспорт отчетов Fast Report в Open Office из Delphi


15-1340687560
AV
2012-06-26 09:12
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский