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

Дескрипторы дочерних окон   Найти похожие ветки 

← →
citizen ©   (2009-12-28 14:02) [0]

Вопрос:

На форме чужой программы есть TPageControl c тремя TTabSheet. Как получить дескриптор одного из TTabSheet?

Спасибо!

---

← →
clickmaker ©   (2009-12-28 14:29) [1]

FindWindowEx()

---

← →
citizen ©   (2009-12-28 14:40) [2]

procedure TForm1.Button1Click(Sender: TObject);
var a,b,c,d,e: hwnd;
begin
a:=FindWindow("TMainFrm",nil);
b:=FindWindowEx(a,GetWindow(a,gw_Child),"TPageControl",nil);
c:=FindWindowEx(b,GetWindow(b,gw_Child),"TTabSheet","Name-2");
if c<>0 then showmessage("true");
end;

clickmaker, спасибо…

Выше привел пример кода, только есть проблема, когда нужный TTabSheet ‘Name-2’– активный, переменная «с» равна нулю. В чем проблема-то?

---

← →
citizen ©   (2009-12-28 15:23) [3]

Мне необходимо добраться до дескрипторов дочерних окон, родителем которых является TTabSheet, но осуществить это не получается, поскольку дескриптор TTabSheet (при его активности) равен нулю, но и при его неактивном положении дочерние дескрипторы все равно не изымаются… . Почему, что не так?

---

← →
sniknik ©   (2009-12-28 23:03) [4]

> что не так?
почитай справку про смысл второго параметра.

---

← →
citizen ©   (2009-12-29 11:52) [5]

> sniknik ©   (28.12.09 23:03) [4]
> почитай справку про смысл второго параметра.


Что ж, ОГРОМНОЕ СПАСИБО, sniknik, со вторым параметром функции FindWindowEx() я действительно начудил. Объявление его (параметра, который указывает на дескриптор дочернего окна) нулем в данной функции дало результат!

---

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

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



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