Перейти к содержанию
  • 0
Вячеслав

[Windows] Создание Vcl компонентов в run-time

Вопросы

Всем добрый день! Возник вопрос, можно ли при динамическом создании VCL компонента (Vcl.ExtCtrls.TPanel) указать в качестве предка форму FireMonkey?

А то на данный момент приходится поступать так:

procedure TForm1.FormCreate(Sender: TObject);
var
  VCLform: Vcl.Forms.TForm;
  VCLPanel: Vcl.ExtCtrls.TPanel;
begin

 //Создаем родительскую VCL форму для размещения на ней VCL панели
  VCLform := Vcl.Forms.TForm.Create(Self);
  VCLform.Width := 1300;
  VCLform.Height := 500;
  VCLform.Show;

//Создаем VCL панель
  VCLPanel := Vcl.ExtCtrls.TPanel.Create(Self);
  VCLPanel.Parent := VCLform;  // <--- Интересует, по сути, вот эта строчка
  VCLPanel.Left := 0;
  VCLPanel.Top := 0;
  VCLPanel.Width := 640;
  VCLPanel.Height := 480;

end;

Хотелось бы избавится от необходимости создавать VCL форму только для того, чтобы она служила контейнером для VCL панели.

Поделиться сообщением


Ссылка на сообщение

Рекомендуемые сообщения

  • 0

Только не "предок", а "родитель" - Parent.

Это можно сделать через SetParentWindow

Да, ошибся в термине :unsure:

Это что за метод такой? В хелпе RAD Studio не нашел информацию по нему 

Поделиться сообщением


Ссылка на сообщение

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.


  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

×
×
  • Создать...