Форум: "Основная";
Текущий архив: 2003.01.23;
Скачать: [xml.tar.bz2];
Вниз
TabSheet в PageControle... Найти похожие ветки
← →
Fly` (2003-01-15 10:57) [0]Проблема в следующем : как сделать , чтоб закладка была "задизаблена", т.е. виделась, но при клике на неё активной бы не становилась, а при Ctrl+Tab игнорировалась, т.е. фокус бы попадал на следующую незадизабленную закладку. Да... еще бы конечно хорошо, чтобы текст на закладке был сереньким...
← →
REA (2003-01-15 11:23) [1]Это вредительство. Нужно задизаблить содержимое закладки.
← →
Fly` (2003-01-15 11:39) [2]ты имеешь ввиду TabSheet.Enabled:=false; ?
это не подходит... так я просто все контролы на TabSheet задизабливаю... а мне надо , чтоб на закладку вообще попасть было нельзя...
← →
REA (2003-01-15 11:42) [3]А зачем? Чтобы юзер мышь сломал? Тогда лучше ее спрятать просто.
← →
Fly` (2003-01-15 11:45) [4]нет... просто иногда некоторые закладки надо нажимать, а некоторые нет...
вот если сделать так, чтоб фонт поменять на серенький, то это будет вообще интуитивно понятно...
← →
Игорь Шевченко (2003-01-15 11:53) [5]procedure TForm1.PageControl1Change(Sender: TObject);
var
TabSheet : TTabSheet;
begin
if NOT PageControl1.ActivePage.Enabled then begin
TabSheet := PageControl1.ActivePage;
repeat
TabSheet := PageControl1.FindNextPage(TabSheet, true, true);
until TabSheet.Enabled;
PageControl1.ActivePage := TabSheet;
end;
end;
← →
Fly` (2003-01-15 11:57) [6]так Ctrl+Shift+Tab работать будет неправильно... да и перемаргивание будет... :-)
← →
Игорь Шевченко (2003-01-15 12:02) [7]Я вот пользуюсь...И рисую сам заголовок TabSheet"а серым фоном. На событии PageControl1DrawTab
← →
Fly` (2003-01-15 12:09) [8]ну в принципе как вариант.... Спасибо большое !
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.01.23;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c
