Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
3-5440
bmt
2003-02-13 14:19
2003.03.03
InterBase


4-5925
Учитель(Ученик)
2003-01-14 06:35
2003.03.03
ХР


14-5790
MAN-In-RED
2003-02-12 00:28
2003.03.03
Нужен компонент для воспроизведения WMV роликов...


14-5850
Ricks
2003-02-14 00:32
2003.03.03
Сильно французы хитрые :-)


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




   Наверх