Форум: "Основная";
Текущий архив: 2002.06.10;
Скачать: [xml.tar.bz2];

Вниз

PageControl и TabSheet...   Найти похожие ветки 

← →
Dishar   (2002-05-28 23:20) [0]

Народ, помогите! У меня такая проблема. Никак не могу убрать эти TabSheetы, сделать невидимыми, но чтобы они на самом деле были.
Дело в том, что программа по ходу выполнения сама должна переключаться нанужный Табшит, а юзер должен быть лишен такой возможности. Заранее спасибо!!!!!!

---

← →
AlexMey   (2002-05-28 23:36) [1]

У TPageControl есть такое событие - onChanging()
Оно произходит после того, как пользователь щёлкнул мышью и перед тем, как закладки должны переключиться. Напишите следующий код и всё.

procedure PageControl1Changing(Sender: TObject;
var AllowChange: Boolean);
begin
AllowChange := false;
end;

---

← →
cypher   (2002-05-29 00:11) [2]

Зачем такие сложности, не проще воспользоваться TNotebook ? или как он там завется...

---

← →
jonik pegas   (2002-05-29 08:12) [3]

TabVisible:=false;

---

← →
Song   (2002-05-29 08:24) [4]

TTabSheet.TabVisible

---

← →
Dishar   (2002-05-29 18:20) [5]

Народ, спасибо! Родина Вас не забудет!!!!!

---

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

Форум: "Основная";
Текущий архив: 2002.06.10;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.005 c