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

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

Конструкция with...do [D7, WinME]


Chizh ©   (2004-09-13 15:39:00) 

Люди, подскажите пожалуйста, почему после исполнения этого кода:
with TabSheet1, TabSheet2, TabSheet3 do
   TabVisible:=False;

...невидимой становиться только последняя страница(TabSheet3). Почему не работает? Как исправить? Спасибо за внимание.


Chizh   (2004-09-13 19:48:00) [1]

Большое спасибо! Всё, я думаю тему можно закрыть...


Palladin   (2004-09-13 19:38:00) [2]

Имеется в виду что: одно присваивание - один объект, и никак иначе.


Chizh   (2004-09-13 19:34:00) [3]

2 Rem: Извините, не хотел обидеть, просто я наоборот хотел уйти от записи, которую вы предложили, но всё равно спасибо...

2 Digitman: А что такое элемент списка, и как это относится к моей проблеме? Извините за глупый вопрос.


Rem   (2004-09-13 17:26:00) [4]

[4]
 Не поверите: Просто помочь...


miwa   (2004-09-13 17:19:00) [5]


Chizh ©   (13.09.04 16:03) [4]
2 Rem: Удивить хотели?
Подозреваю, что помочь.


miwa   (2004-09-13 17:19:00) [6]


Chizh ©   (13.09.04 16:03) [4]
2 Rem: Удивить хотели?
Подозреваю, что помочь.


Digitman   (2004-09-13 16:07:00) [7]


> 2 All: А ещё есть варианты?


а какие еще могут быть варианты, если TTabSheet есть элемент списка? И всегда был оным ?


Chizh   (2004-09-13 16:03:00) [8]

2 Rem: Удивить хотели?
2 Ega23: Неплохой вариант, я попробую, спасибо.
2 All: А ещё есть варианты?


Ega23   (2004-09-13 15:44:00) [9]

Гы...

for i:=0 to ControlCount-1 do
if (Controls[i] is TTabsheet) then
 TTabSheet(Controls[i]).TabVisible:=False;


VMcL   (2004-09-13 15:40:00) [10]

>> Chizh ©  (13.09.04 15:39)

Delphi Help | Index > "with".


Rem   (2004-09-13 15:40:00) [11]

TabSheet1.TabVisible:=False;
TabSheet2.TabVisible:=False;
TabSheet3.TabVisible:=False;


Читайте учебник по Object Pascal.


Наверх

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