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

Закрытие TTabSheet   Найти похожие ветки 

← →
Schummi   (2004-05-04 19:27) [0]

Мастаки! Может кто реализовывал закрытие TTabSheet по двойному клику на заголовке таба? Помогите, плиз. Наверное это нужно делать как-то через wm_xxx?

---

← →
Gero ©   (2004-05-04 20:38) [1]

Примерно так:

procedure TSomeForm.SomeTabSheetMouseDown(Sender: TObject;
 Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
 if (Button = mbLeft) and (ssDouble in Shift) then
   SomeTabSheet.Tabs.Delete(SomeTabSheet.TabIndex);
end;

---

← →
TButton ©   (2004-05-05 00:25) [2]

а закрытие и удаление это одно и то же?

---

← →
Dimaxx ©   (2004-05-05 00:30) [3]

Может скрытие, а не закрытие...

---

← →
Schummi   (2004-05-06 07:57) [4]

2Gero Спасибо!

2TButton, Dimaxx - это уже не существенно

---

Страницы: 1 вся ветка

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



Память: 0.45 MB
Время: 0.025 c