Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.25;
Скачать: CL | DM;

Вниз

Можно ли в ячейке StringGrid изменить цвет части текста   Найти похожие ветки 

 
jen ©   (2004-02-14 04:20) [0]

Подскадите, можно ли , и если да, то как изменить цвет фонта только части текста в ячейке StingGrig?


 
Defunct   (2004-02-14 05:25) [1]

Можно.

Обрабатывать событие OnDrawCell

Пример:

Procedure TForm1.DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
Begin
// Rect - область перерисовываемой ячейки.
With (Sender as TStringGrid) Do
With Canvas Do
Begin
Pen.Color := clBlue;
Brush.Color := Random(clWhite);
Font.Color := clWhite;
Rectangle(Rect);
TextOut(Rect.Left+2,Rect.Top+2,Cells[ACol,ARow]);
End;
End;


 
Defunct   (2004-02-14 05:33) [2]

> только части текста в ячейке StingGrig?

Надеюсь по работе с Canvas вопросов нет.


 
jen ©   (2004-02-14 23:45) [3]

>Defunct спасибо, попробую,
а по работе canvas я просто ничего не знаю,
из серии "я только учусь".)))


 
jen ©   (2004-02-14 23:53) [4]

Да, только части текста, а так у сеня получились все ячейки разного цвета,
но текст во всех только белый -Font.Color := clWhite;


 
Германн ©   (2004-02-15 00:12) [5]

2 jen © (14.02.04 23:53) [4]
Может на время перестать просто трясти, а остановиться и немного подумать? Или есть проблемы с получением части строки? И стоит заглянуть в справку по TextOut.

2 Defunct (14.02.04 05:25) [1]
В рамках сабжа врядли стоило применять Rectangle(Rect). Лучше FillRect. А уж совсем по сабжу, так и вообще можно обойтись и без того и без другого.
А то видишь (jen © (14.02.04 23:53) [4]) Василий Иванович ответил "Да что там думать? Трясти надо!"


 
jen ©   (2004-02-15 00:15) [6]

Герман, спасибо тебе конечно за комментарии,
но боюсь, что сюда не умничаьт приходят, а с вопросами
и помощью, если тебе конкретно сказать нечего, то не
мути остальных.


 
Германн ©   (2004-02-15 00:33) [7]

2 jen © (15.02.04 00:15) [6]
Во-первых, я не собирался и не собираюсь умничаьт.
Во-вторых, Defunct (14.02.04 05:25) [1] сказал тебе уже все и даже больше, чем ты просил.
В-третьих, перечитай еще раз мой предыдущий ответ и перестань трясти, а подумай, почитай и попробуй разные варианты. А уж если под конкретно сказать нечего ты понимаешь написание для(вместо) тебя готового кода, то уж извини, имхо, форум для ответов на вопросы, а не для работы за тебя.



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

Текущий архив: 2004.02.25;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.048 c
3-79552
ZoKr
2004-01-28 13:38
2004.02.25
Фильтр пустых дата полей


1-79883
Khabibulin
2004-02-13 21:49
2004.02.25
Работа с окнами WINDOWS


14-80264
J_S
2004-02-03 11:52
2004.02.25
MS XML v.2.0 & DTD


7-80336
ed_30
2003-12-06 23:29
2004.02.25
Висит ли процесс?


1-79821
TrogWar
2004-02-11 09:07
2004.02.25
Как создать заставку к проге?