![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TabSheet в PageControle... [D6]
Fly` © (2003-01-15 10:57:00)Проблема в следующем : как сделать , чтоб закладка была "задизаблена", т.е. виделась, но при клике на неё активной бы не становилась, а при Ctrl+Tab игнорировалась, т.е. фокус бы попадал на следующую незадизабленную закладку. Да... еще бы конечно хорошо, чтобы текст на закладке был сереньким...
Fly` (2003-01-15 12:09:00) [1]ну в принципе как вариант.... Спасибо большое !
Игорь Шевченко (2003-01-15 12:02:00) [2]Я вот пользуюсь...И рисую сам заголовок TabSheet"а серым фоном. На событии PageControl1DrawTab
Fly` (2003-01-15 11:57:00) [3]так Ctrl+Shift+Tab работать будет неправильно... да и перемаргивание будет... :-)
Игорь Шевченко (2003-01-15 11:53:00) [4]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:45:00) [5]нет... просто иногда некоторые закладки надо нажимать, а некоторые нет...
вот если сделать так, чтоб фонт поменять на серенький, то это будет вообще интуитивно понятно...
REA (2003-01-15 11:42:00) [6]А зачем? Чтобы юзер мышь сломал? Тогда лучше ее спрятать просто.
Fly` (2003-01-15 11:39:00) [7]ты имеешь ввиду TabSheet.Enabled:=false; ?
это не подходит... так я просто все контролы на TabSheet задизабливаю... а мне надо , чтоб на закладку вообще попасть было нельзя...
REA (2003-01-15 11:23:00) [8]Это вредительство. Нужно задизаблить содержимое закладки.