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

Вниз

всем привет. как можно раскраситьгрид одну строку разными цветом   Найти похожие ветки 

 
corte ™   (2003-06-09 13:35) [0]

всем привет. как можно раскраситьгрид одну строку разными цветом.
Можно не грид можно мемо или ричь едит но луть ше грид


 
Skier   (2003-06-09 13:37) [1]

OnDrawCell


 
Александр из Минска   (2003-06-09 13:57) [2]

Я делаю так:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if gdFixed in State then Exit;
if (ARow = 1) and (ACol <> 0) then
begin
StringGrid1.Canvas.Brush.Color := clBlack;
StringGrid1.Canvas.Brush.Style := bsSolid;
StringGrid1.Canvas.FillRect(Rect);
end;
end;

Но тогда надо еще менять цвет шрифта, т.к. его очень плохо будет видно.
StringGrid1.Canvas.Font.Color := clWhite;
StringGrid1.Canvas.TextRect(Rect, Rect.Left+2, Rect.Top+2, StringGrid1.Cells[ACol, ARow]);


 
corte ™   (2003-06-09 14:54) [3]

не нетак в одной ячеке разным цветом


 
Song   (2003-06-09 15:03) [4]

А переделать слабо что ли по написанному?


 
Skier   (2003-06-09 15:03) [5]

>corte ™ (09.06.03 14:54)
Rect: TRect; тебе в руки !


 
corte ™   (2003-06-09 15:27) [6]

to Skier

А примерчик есть ?


 
Skier   (2003-06-09 15:31) [7]

Нет.


 
corte ™   (2003-06-09 15:49) [8]

Мне нудно среди слов нужно выделить другим цветом одно.


 
Song   (2003-06-09 16:45) [9]

Нам тоже "нудно" это делать, если ты не хочешь хоть пальцем шевельнуть


 
corte ™   (2003-06-09 17:05) [10]

Уже сделал. а то что ошибки в русском это уж траб каждого программера.


 
Song   (2003-06-09 17:39) [11]

Я не про ошибки. А про то, что нам действительно НУДНО помогать человеку, который ничего не хочет сделать сам же для себя.


 
corte ™   (2003-06-09 18:00) [12]

нудно это есть нужно.

если ты про это.



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

Форум: "Основная";
Текущий архив: 2003.06.26;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.029 c
14-84738
killer
2003-06-06 00:54
2003.06.26
TBLODStream


3-83908
oLn
2003-06-03 12:49
2003.06.26
Index is read only


14-84721
Atum
2003-06-05 16:37
2003.06.26
Как сделать


1-84144
Comp
2003-06-02 13:06
2003.06.26
Как заставить ScroolBar прокручиваться от ролика мыши?


3-83983
sergei12r
2003-05-30 06:51
2003.06.26
нужно перекинуть dbaseские даные на parabox програмно





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