Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.03.03;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.55 MB
Время: 0.034 c
1-5635
Aleksandr
2003-02-20 11:49
2003.03.03
Истчо один баг в Делфи?


1-5552
JohnKorsh
2003-02-21 14:50
2003.03.03
Как правильно вызвать процедуру ?


14-5866
Axis_of_Evil
2003-02-14 09:12
2003.03.03
IIS


7-5881
GIL
2003-01-03 06:36
2003.03.03
Работа с модемом


3-5411
T{}r(l-l
2003-02-11 16:15
2003.03.03
Grid с Editom с поиском(типа Locate)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский