Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.04;
Скачать: CL | DM;

Вниз

TStringGrid и DrawFocusRect   Найти похожие ветки 

 
Comp ©   (2004-03-17 14:55) [0]

Ребята, кто знает, как убрать выделение ячейки методом DrawFocusRect в StringGrid? Событие onDrawCell не помогает...


 
alless ©   (2004-03-17 15:51) [1]

Ia tut nashel ctoto (ne moe, i napisano dela StringGrid):
...если я щелкаю на любой ячейке StringGrid2, последняя выбранная ячейка в StringGrid1 становится синей...
Создайте обработчик (если он отсутствует) события сетки OnDrawCell и включите в него следующий код:

--------------------------------------------------------------------------------
   procedure TForm1.StringGrid3DrawCell(Sender: TObject; vCol, vRow: Longint; Rect: TRect;   State: TGridDrawState);
begin
IF Sender = ActiveControl THEN Exit;
IF NOT (gdSelected IN State) THEN Exit;
WITH Sender AS TStringGrid DO
BEGIN
Canvas.Brush.Color := Color;
Canvas.Font.Color  := Font.Color;
Canvas.TextRect(Rect, Rect.Left+2, Rect.Top+2,
Cells[vCol, vRow]);
END;
end;

Имейте в виду, что в обработчике события OnDrawCell я переименовал параметры Col и Row на vCol и vRow, чтобы избежать путаницы со свойствами StringGrid, имеющими те же имена. Данный метод выполняется немедленно после того, как сетка становится неактивной, и после того как запрошенная ячейка становится НЕвыбранной. В любом из этих случаев вы должны нарисовать невыбранную ячейку для НЕАКТИВНОЙ сетки - т.е. в тех случаях, когда у вас получается "неправильный" цвет. Вы просто берете работу Delphi по закрашиванию ячеек на себя, пропуская defaultDrawing (отрисовку по умолчанию), для таких ячеек, но в то же время разрешая Delphi поработать за вас во всех остальных случаях.



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
3-1078210812
aga123
2004-03-02 10:00
2004.04.04
GUID в поле таблицы DBF


6-1075220897
*partizan*
2004-01-27 19:28
2004.04.04
Сетевые компоненты в Delphi7


1-1079080186
Tornado
2004-03-12 11:29
2004.04.04
Перенос кода


9-1063985504
Ландграф Павел
2003-09-19 19:31
2004.04.04
Проверка столкновений прямоугольников в 2D игре


14-1078768130
ChcngerMan
2004-03-08 20:48
2004.04.04
Компьютерные клубы :)