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

Вниз

TFrame и не только   Найти похожие ветки 

 
Silver_   (2003-02-19 10:35) [0]

- есть фрейм Frame1, которого используют бог знает скока форм

- есть форма Form1
надо из формы Form1 сделать например ( DBGrid1.Columns.Items[2].Visible:=False;)
в фрейме так чтоб везде где он (фрейм) используется стало так (Enabled...)

- Делаю так Frame1.DBGrid1.Columns.Items[2].Visible:=False;
а Дельфя в ответ ругается ("Undeclared identifier:"Frame1"")
uses uFrame1; имеется
Как быть, вот в чем большой вопрос ???


 
icWasya ©   (2003-02-19 10:43) [1]

var I,J:Integer;
F:TForm;
Fr:TFrame1;

for I:=0 to Screen.FormCount-1 do begin
F:=Screen.Forms[I];
for J:=0 to F.ComponentCount-1 do begin
if F.Components[J] Is TFrame1 then begin
Fr:=TFrame1(F.Components[J]);
Fr.DBGrid1.Columns.Items[2].Visible:=False;
end;// if
end;// for J
end;//for I


 
Silver_   (2003-02-19 10:54) [2]

icWasya ©
а так чтоб напрямую
Fr.DBGrid1.Columns.Items[2].Visible
никак?


 
icWasya ©   (2003-02-19 11:33) [3]

ну так экземпляров фрейма в твоём приложении много - нужно найти все и на всех сделать изменения. Или не так ???


 
Silver_   (2003-02-20 15:32) [4]

icWasya ©

хотел просто без сканированиа всех обьекто видомо низя :(

P.S. воспользовалься твоим примеро (с верху) за это пасиба
взэ полегчало :)



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
1-5643
jiura
2003-02-20 13:31
2003.03.03
Связь с формой


3-5448
Vick
2003-02-13 15:59
2003.03.03
Упаковка БД


3-5383
denis24
2003-02-12 10:38
2003.03.03
создание бд


1-5613
Андрей Овдей
2003-02-20 09:19
2003.03.03
Испектор не видит свойства в потомках TForm


14-5841
rtooo
2003-02-13 20:32
2003.03.03
QReport