| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
StringGrid [D6, Win95/98, WinME, NT4, Win2k, WinXP]
Дмитрий Иванов © (2002-07-04 20:33:00)Добрый вечер всем!
Как сделать так, чтобы когда StringGrid теряла фокус на неё не "нападала" синяя полоса.
Дмитрий Иванов (2002-07-05 03:28:00) [1]
> ^Sanya (05.07.02 01:05)
> Типа так:
> procedure RemoveSelection;
> var
> MyGrid:TGridRect;
> begin
> // убираем синее выделение в TStringGrid-е
> with
> MyGrid.Top:=-1;
> MyGrid.Left:=-1;
> MyGrid.Right:=-1;
> MyGrid.Bottom:=-1;
> StringGrid1.Selection:=MyGrid;
> end;
ну я так и сделал ... только вот проблема, если потом где-нибудь встретится StringGrid.Row:=какое-то число, то произойдет exception class EInvalidGridOperation... обойти это, конечно,можно, но всё равно как-то не приятно ...
А ДРУГИХ НИКАКИХ СПОСОБОВ НЕТ, МОЖЕТ КТО ЗНАЕТ?
^Sanya (2002-07-05 01:05:00) [2]Типа так:
procedureRemoveSelection;
var
MyGrid:TGridRect;
begin
// убираем синее выделение в TStringGrid-е
with
MyGrid.Top:=-1;
MyGrid.Left:=-1;
MyGrid.Right:=-1;
MyGrid.Bottom:=-1;
StringGrid1.Selection:=MyGrid;
end;
Дмитрий Иванов (2002-07-04 21:51:00) [3]
> MBo © (04.07.02 20:56)
Всё, догнал! Спасибо!
Дмитрий Иванов (2002-07-04 21:19:00) [4]
> DeMoN-777 © (04.07.02 21:12)
> или переводи фокус на др. компонент
так тогда как раз и будет эта синяя полоса ...
Дмитрий Иванов (2002-07-04 21:16:00) [5]Пишу: Stringgrid1.Selection.Bottom:=-1;
Ответ компилятора:Left side cannot be assigned to
Может я тебя не правильно понял?
DeMoN-777 (2002-07-04 21:12:00) [6]или переводи фокус на др. компонент
MBo (2002-07-04 20:56:00) [7]установить по OnExit Selection, например, -1,-1,-1,-1
| |
