Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Как правильно описать конструктор

Автор: umen 24.1.2007, 11:21

Есть программа, в одном из модулей описан класс TMyForm, наследник TForm.
При создании экземпляра этого класса в него нужно передать массив.
Для реализации этого я описал конструктор TMyForm следующим образом:

Код


constructor Create(AOwner: TComponent; PArray:PMyArray); override;

всё работает прекрасно, однако при компиляции выдаётся предупреждение,
что мой конструктор прячет виртуальный сонструктор предка
(дословно не помню сообщение, но смысл такой).

Вопрос:
1. правильно ли я переопределил конструктор?
2. как избавиться от этого предупреждения компилятора?
3. может можно каким-то другим способом передать переменную
в экземпляр класса при его создании?

Автор: Snowy 24.1.2007, 11:44

Не нужно пихать массив при создании.
Сделай для этого отдельную пропертю.

Автор: CatATonik 24.1.2007, 11:56

1. То как написано вообще компилится не должно, если скомпилилось значит код привели не правильный. Потому как override должен соответствовать по параметрам методу базового класса.
2. Директива reintroduce
3. Если именно при создании, то ни как. Если есть возможность, то лучше сделать свойство или метод устанавливающий параметры формы.

Учтите что
1. при создании из ресурса, все равно будет вызван предыдущий конструктор.
2. для создания руками существует конструктор CreateNew, у него есть параметр Dummy попробуйте использовать его, хотя тоже не лучший вариант:

Код


  TMyForm = class(TForm)
  private
    FArray: PMyArray;
  public
    constructor CreateNew(AOwner: TComponent; Dummy: Integer = 0); override;
  end;

constructor TMyForm.CreateNew(AOwner: TComponent; Dummy: Integer = 0); override;
begin 
  inherited;
  FArray := PMyArray(Dummy);
end;

MyForm := TMyForm.CreateNew(Application, PMyArray(A));

Автор: umen 24.1.2007, 16:16

1. Упс... неправильно написал, у меня в коде

Код


constructor Create(AOwner: TComponent; PArray:PMyArray); virtual;

Думаю что допустил ошибку уже
на этапе проектирования.
Переделаю так чтобы массив передавался уже
после создания, через свойства.

спасибо за советы.