Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

VISIBLE


Страницы:   1 2

ankazh ©   (2012-06-17 19:04:00) 

Есть ли возможность сделать 1. все компоненты на форме невидимыми 2. сделать невидимыми компонеты определенного класса.


ankazh   (2012-06-17 20:05:00) [21]

спасибо огромное!


Inovet   (2012-06-17 20:02:00) [22]

> [8] Anatoly Podgoretsky ©   (17.06.12 19:57)
> Какой смысл проверять по Components, если там может не быть
> всех контролов.

Ну хорошо. Тогда ещё так:
(Components[i] as TControl).Visible := false;


Anatoly Podgoretsky   (2012-06-17 19:57:00) [23]

> Inovet  (17.06.2012 19:53:07)  [7]

Какой смысл проверять по Components, если там может не быть всех контролов.
Да и невизуальные компоненты никого не интересуют


Inovet   (2012-06-17 19:53:00) [24]

> [6] Anatoly Podgoretsky ©   (17.06.12 19:50)
> Поскольку речь об визуальных компонентах, то надо по Controls

Ну да, в вопросе как бы неявно подразумевалоиь Controls. Но вдруг не только.


Anatoly Podgoretsky   (2012-06-17 19:50:00) [25]


> Inovet ©   (17.06.12 19:47) [5]

Поскольку речь об визуальных компонентах, то надо по Controls


Inovet   (2012-06-17 19:47:00) [26]

procedure TForm1.Button1Click(Sender: TObject);
var
 i: Integer;
begin
 for i := 0 to ComponentCount - 1 do
 begin
   if Components[i] is TEdit then
   begin
     (Components[i] as TEdit).Visible := false;
   end;
 end;
end;


Inovet   (2012-06-17 19:42:00) [27]

1. Пройтись в цикле по
Components
ComponentCount
2. проверять на принадлежность к классу


ankazh   (2012-06-17 19:31:00) [28]

эээээ затруднение.... Form1.(надо что-то вроде allcomponents).visible:=false;


Anatoly Podgoretsky   (2012-06-17 19:24:00) [29]

Да
Да
При условии, что это видимые компоненты.


Virgo_Style   (2012-06-17 19:22:00) [30]

да, есть.
что именно вызывает затруднения?


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо