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

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
1-30888
Great DAN
2002-05-29 11:37
2002.06.10
Записи типа RECORD


4-31037
GrandGEO
2002-04-07 15:59
2002.06.10
Печать в Delphi


4-31038
SPeller
2002-04-05 13:07
2002.06.10
О контекстах


14-30980
mimino
2002-05-06 20:42
2002.06.10
Константы


1-30821
undo
2002-05-29 18:03
2002.06.10
возможно ли запустить процесс асинхронно с помощью Create procces