Re: CreateParented
От: Sergei I. Gorelkin Россия  
Дата: 15.09.05 04:12
Оценка: +1
Здравствуйте, Goffman, Вы писали:

<skipped>
А вот так — появляется?

procedure TForm1.FormCreate(Sender: TObject);
begin
  with TButton.Create(Self) do
  begin
    ParentWindow := Self.Handle;
  end;
end;


Вообще, CreateParented задуман для работы с не-VCL окнами. Этот конструктор запоминает переданное значение ParentWindow и вызывает Create(nil). Сам контрол при этом на экране не появляется — это происходит позже, в момент создания дескриптора окна, т.е. при прямом или косвенном обращении к свойству Handle.
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.