Главная страница
    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.076 c
6-1256728864
Usov
2009-10-28 14:21
2013.03.22
Проблема с логином на сайте (Indy)


15-1340220153
Дмитрий С
2012-06-20 23:22
2013.03.22
Посоветуйте алгоритм контрольной цифры.


15-1347821674
Dmitry375
2012-09-16 22:54
2013.03.22
Running Delphi on Mac OS X


15-1344717005
Юрий
2012-08-12 00:30
2013.03.22
С днем рождения ! 12 августа 2012 воскресенье


2-1343902126
Wadimka
2012-08-02 14:08
2013.03.22
Как запись типа record записать в TStream?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский