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

Вниз

Видимость компонент на форме   Найти похожие ветки 

 
kerkonst ©   (2003-01-21 14:05) [0]

Здраствуйте !
И снова глупому мне требуется помощь...

Имеется формочка. На ней много PageContol-ов, некоторые из них
вложенные, куча закладок. На некоторых из закладок имеются
помимо прочего DBGrid-ы. Юзеру всегда одновременно виден только один DBGRid. Надо в любой момент времени знать, какой DBGrid видит юзер.

Пытался так. Вешал таймер и в нем:
for i:=0 to MainForm.ComponentCount-1 do
if MainForm.Components[i] is TDBGrid then
if (MainForm.Components[i] as TDBGrid).Visible then
begin
Ура ! Я нашел его !
...
Break;
end;

Но, у всех DBGid-ов visible=true.
Насколько я понял, visible работает "с точностью" до контейнера. Т.к. pagecontrol виден, то и все гриды типа видны.

Спрашивается, а как же всетки узнать, какой DBGrid видет юзер ?


 
MBo ©   (2003-01-21 14:08) [1]

if DBGridX.Parent=PageControl1.ActivePage


 
kerkonst ©   (2003-01-21 14:23) [2]

Эээ.. Идея интересная, но мне немного неясно, как конкретно ее реализовывать. PageControl-ов несколько, причем некоторые из них вложены друг в дружку.


 
MBo ©   (2003-01-21 14:28) [3]

может, проще будет по событию активации страниц проверять, есть ли на ней dbgrid и класть указатель на него в глоб. переменную?


 
kerkonst ©   (2003-01-21 14:34) [4]

сначала я примерно так и сделал.
Но, 1) некрасиво
2) при программном переключении pagecontrol.oncange не происходит.Если же каждый раз и здесь тоже сие делать, то это будет уже совсем некрасиво...

Хотя, счас с tabsheet.onenter попрубую...


 
kerkonst ©   (2003-01-21 14:55) [5]

OnEnter работает. Странно, что я сразу до него не допер, а возился с onchange.

Всем спасибо за участие...



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
3-96524
Flagman
2003-01-10 17:37
2003.01.30
Maximum


1-96742
borg
2003-01-22 09:10
2003.01.30
Смещение


1-96835
Info
2003-01-21 00:51
2003.01.30
Текст из WebBrowser в Memo


7-97060
LexusU
2002-11-20 11:46
2003.01.30
Как узнать нажата ли Caps Lock и какой язык ?


1-96677
Opryshok
2003-01-19 23:39
2003.01.30
Если я унаследовал одну форму от другой, то ...