Форум: "Начинающим";
Текущий архив: 2009.01.04;
Скачать: [xml.tar.bz2];
Внизсмена цвета в 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;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.005 c