Текущий архив: 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.017 c
