Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "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
3-73005
sergey32
2002-04-25 10:55
2002.05.23
Как в Interbase числовое поле с атрибутами NOT NULL


14-73376
Михалыч
2002-04-10 16:40
2002.05.23
Для умных


1-73096
krion_
2002-05-12 15:55
2002.05.23
Как в StringGrid организовать свою прокрутку.


7-73416
Hokum
2002-02-18 16:39
2002.05.23
Скрыть элементы рабочего стола


3-73030
Helenka
2002-04-25 12:32
2002.05.23
связывание таблиц





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский