Форум: "WinAPI";
Текущий архив: 2002.05.23;
Скачать: [xml.tar.bz2];
ВнизНе работает SetParent Найти похожие ветки
← →
AFROLOV (2002-03-20 15:06) [0]Всем привет.
Не работает SetParent.
Я хочу посадить своей форме нового родителя.
Вот пример кода:
procedure TListBoxForm.ShowForm(NP:HWND;Main_WND:HWND);
var
OldParent:HWND;
begin
ListBox1.Items.Add("Parent New:="+IntToHex(NP,8));
ListBox1.Items.Add("Parent Old:="+IntToHex(GetParent(ListBoxForm.Handle),8));
OldParent:=Windows.SetParent(ListBoxForm.Handle,NP);//Parent почему то не изменяется :-(
ListBox1.Items.Add("Parent:="+IntToHex(GetParent(ListBoxForm.Handle),8));
Visible:=true;
end;
Форма создается при запуске приложения
..
Application.CreateForm(TListBoxForm, ListBoxForm);
..
← →
MBo (2002-03-20 15:36) [1]ты, может, путаешь Windows - Parent и VCL-Parent.
форме VCL-Parent вообще-то не нужен.
а менять его у любого контрола можно так
AControl.Parent:=NewParent;
Если тебе надо сменить владельца (Owner), который отвечает за освобождение, то не стоит делать этого из собственного обработчика.
← →
AFROLOV (2002-03-20 17:24) [2]Нет, мне мне нужен именно Windows Parent. Я хочу сделать окошко в MSWord типа того в котором в редакторе Delphi после ввода "." появляются свойства объекта. Мне народ присоветовал сделать окно редактора MSWord родительским для моей формы с ListBox.
← →
troits (2002-03-20 19:58) [3]Может это и можно сделать, но для SetParent параметры должны принадлежать одному процессу. Можно попробовать через Hook.
← →
AFROLOV (2002-03-21 15:50) [4]Через Hook слишком много сообщений надо обрабатывать.
И потом ксть такой метод Form1:=TForm1.CreateParented(My_Wnd);
Это работает только надо отслеживать момент закрытия окна My_Wnd иначе возникает ошибка.
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2002.05.23;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c