Скачать: CL | DM;

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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c