Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.16;
Скачать: CL | DM;

Вниз

Переход другую форму с помощью закладок   Найти похожие ветки 

 
CyBeR ©   (2004-04-30 06:16) [0]

Пишу след. код, выводит ListIndex is out of bounds(-1), а в чем именно косяк понять не могу, помогите.

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


 
Sun bittern ©   (2004-04-30 07:11) [1]

TabIndex, как я понимаю отнють не индекс в Objects[]


 
CyBeR ©   (2004-04-30 09:36) [2]

Sun bittern © да, вроде, но тока как быть :-(


 
Cobalt ©   (2004-04-30 09:38) [3]

> out of bounds(-1)
Это вам ни о чём не говорит? Сама ошибка сообщает, на какое число она ругается!


 
Sun bittern ©   (2004-04-30 09:46) [4]

CyBeR ©   (30.04.04 09:36) [2]

Описать подробнее чего сотворяешь (чего хочешь получить). А то по приведенному коду ни чего не понять чего делаешь.


 
CyBeR ©   (2004-05-01 13:25) [5]

У меня есть главная форма MDIForm. Куча MDIChild форм они создаются динамически. Должна создаваться закладка с названием формы. Нужно перемещаться по закладкам, форма есс-но должна делаться активной


 
CyBeR ©   (2004-05-01 13:28) [6]

> out of bounds(-1) Да в том то и дело что понимаю на что тока я не знаю может я дурак, перепробовал все и ничего не получается: то активируются не те формы, то ошибку выдает. Вот я вас и хотел попросить, чтобы подсказали



Страницы: 1 вся ветка

Текущий архив: 2004.05.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.045 c
1-1083213035
Серж
2004-04-29 08:30
2004.05.16
Кто нить смог поставить Bold For Delphi? Пишет нет *.bpl


7-1080772670
Colonel
2004-04-01 02:37
2004.05.16
System menu


1-1083163410
KillOfCats
2004-04-28 18:43
2004.05.16
Работа с файлами


6-1079800088
13-th Warrior
2004-03-20 19:28
2004.05.16
Как отправить файл по сети?


1-1083326814
Ivolg
2004-04-30 16:06
2004.05.16
Линейка