Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.01.04;
Скачать: 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 вся ветка

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

Наверх




Память: 0.49 MB
Время: 0.011 c
15-1226091244
Petr V. Abramov
2008-11-07 23:54
2009.01.04
принтер godex ez-2200


3-1212556635
девушка
2008-06-04 09:17
2009.01.04
bigint и @@identity


15-1225662065
Сатир
2008-11-03 00:41
2009.01.04
США начинают информационную войну в Рунете


15-1225940622
axd
2008-11-06 06:03
2009.01.04
мячик


2-1227180191
Андрей Алекс.
2008-11-20 14:23
2009.01.04
Отправка почты