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

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

Как удалить из TabControl


Idx ©   (2005-10-21 09:38:00) 

В общем, не могу удалить “предпоследние” элементы
Например, есть четыре элемента (4 - tabs) вот первые
“три” не получается.

Почему?

Добавляю так:
TabControl1.Tabs.AddObject(StrPas(buff),TObject(Wnd));

Удаляю так:
For idx := 0 to TabControl1.Tabs.count-1 do
If Wnd  =  THandle(TabControl1.Tabs.Objects[idx]) Then
TabControl1.Tabs.Delete(idx);

Idx возвращает правильный TabIndex.


clickmaker   (2005-10-21 15:14:00) [1]

for idx := TabControl1.Tabs.count- 2downto 0 do


Silver...   (2005-10-21 15:06:00) [2]


> For idx := 0 to TabControl1.Tabs.count<B >-1do


и че удаляются все?

[- 2]   надо


stone   (2005-10-21 12:08:00) [3]


> Удаляю так:
> For idx := 0 to TabControl1.Tabs.count-1 do

for idx := TabControl1.Tabs.count-1 downto 0 do


Idx   (2005-10-21 11:35:00) [4]

нееееееее не подходит :(


GLFox   (2005-10-21 09:55:00) [5]

Попробуй так
while idx<((TabControl1.Tabs.count-1)-1) do ...


Наверх

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