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

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

Переключение между формами с помощью набора закладок [D6, WinXP]


CyBeR ©   (2004-04-28 16:04:00) 

Добрый день!
Как создавать закладку при создании формы, а потом по TabSet.Change активировать именно это окно и чтобы при закрытии формы закладка удалялась есс-но.


CyBeR   (2004-04-28 17:45:00) [1]

>>clickmaker ©
Косяк в том, что при создании формы пишет ListIndex out of bounds(-1). Я прекрасно понимаю что это значит, но как вылечить ума не приложу, перепробовал уже все


clickmaker   (2004-04-28 17:25:00) [2]


> CyBeR ©   (28.04.04 17:19) [2]

А в чем косяк проявляется?


CyBeR   (2004-04-28 17:19:00) [3]

ExamForm.OnCreate:
addedindex:=ParentFM.TabSet.Tabs.AddObject('MyForm',ExamForm);
ParentFM.TabSet.TabIndex:=addedindex;

ParentFM.TabSet.Change:
if (Sender is TTabSet) then
   with (Sender as TTabSet) do
   TForm(TabSet.Tabs.Objects[TabSet.TabIndex]).Show;

напишите, пожалуйста, в чем косяк???


clickmaker   (2004-04-28 16:28:00) [4]

Form.OnCreate - TS := TTabSet.Create(Application)
TabSet.OnChange - Form.BringToFront или Form.Visible := true;
Form.OnDestroy - TS.Free


Наверх

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