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

смена цвета в StringGrid   Найти похожие ветки 

← →
Андрей (начинающий)   (2008-11-22 11:14) [0]

Помогите, плиз.
Как в StringGrid одновременно с выделенной ячейкой закрасить вторую по моему желанию и текст в них вывести на новом фоне?
При смене фокуса на другую ячейку эти должны вернуть свой фон к первоначальному, а вторая пара сменить на новый фон.

---

← →
AIK ©   (2008-11-22 11:22) [1]

Свойства onDrawCell + TCanvas (если что ещё F1 + google)

---

← →
AIK ©   (2008-11-22 11:24) [2]

> одновременно с выделенной ячейкой


Ах да чуть незабыл свойства onSelectCell.

---

← →
Андрей (начинающий)   (2008-11-22 11:58) [3]

где здесь у меня ошибка?

procedure Tfrm1.sgSG1DrawCell(Sender: TObject; ACol,
 ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
 if (gdSelected in State) then begin
   sgSG1.Canvas.Brush.Color := clSkyBlue;
   sgSG1.Canvas.FillRect(Rect);
 end;
end;

procedure Tfrm1.sgSG1SelectCell(Sender: TObject; ACol,
 ARow: Integer; var CanSelect: Boolean);
var
 vGridRect : TGridRect;
begin
// выделяю вторую ячейку
 vGridRect.Left:=ARow;
 vGridRect.Right:=ARow;
 vGridRect.Top:=ACol;
 vGridRect.Bottom:=ACol;
 sgSG1.Selection:=vGridRect;
end;


---

← →
AIK ©   (2008-11-22 12:53) [4]

Ошибок вроде нет есть только не понятки
  1. Кто тебя надоумил StrinGrid назвать sgSG1?
  2. Процедура  OnSelectCel здесь не имеет не какова смысла, все координаты выделенных ячеек обратно же присваиваются компоненту

---

← →
Leonid Troyanovsky ©   (2008-11-22 13:19) [5]

> Андрей (начинающий)   (22.11.08 11:58) [3]

http://groups.google.com/group/borland.public.delphi.objectpascal/msg/b3374ec7d7299990

--
Regards, LVT.

---

← →
Андрей (начинающий)   (2008-11-22 13:23) [6]

> 1. Кто тебя надоумил StrinGrid назвать sgSG1?

В программе они наз. по-другому.

Решил проблему обработкой значения ячеек в OnSelectCell и последующей прорисовкой в OnDrawCell.

Спасибо за отклики.

---

← →
Андрей (начинающий)   (2008-11-22 13:28) [7]

> Leonid Troyanovsky ©

Там, насколько я понял из задаваемого вопроса, приводится пример сортировки StringGrid по щелчку на заголовке?
К моему вопросу, вроде, не относится. Правда, я не просмотрел весь код ...

---

← →
AIK ©   (2008-11-22 13:38) [8]

> Leonid Troyanovsky ©   (22.11.08 13:19) [5]
> > Андрей (начинающий)   (22.11.08 11:58) [3] http://groups.
> google.com/group/borland.public.delphi.objectpascal/msg/b3374ec7d7299990


Это про сортировку

---

← →
Leonid Troyanovsky ©   (2008-11-22 13:47) [9]

> Андрей (начинающий)   (22.11.08 13:28) [7]

> К моему вопросу, вроде, не относится. Правда, я не просмотрел
> весь код ...

Ну, посмотри такой
http://groups.google.com/group/fido7.ru.delphi.chainik/msg/4b0da536f2681ffd

Вся сила в InvalidateCell, брат.

--
Regards, LVT.

---

← →
Андрей (начинающий)   (2008-11-22 21:37) [10]

> Leonid Troyanovsky

спасибо

---

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

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



Память: 0.47 MB
Время: 0.006 c