Форум: "Основная";
Текущий архив: 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