Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.021 c