動的に生成するフォームに引数を渡すには？

解決

---

こんにちは。
動的に生成するフォームに引数を渡したいのですが、どういう方法がありますでしょうか？
どうぞよろしくお願いします。

編集    削除

---

Createをオーバーロードします。
overloadをヘルプで調べてみてください。

constructor Create(AOwner: TComponent; AWidth, AHeight: Integer); overload;

というように定義します。

実装は、
constructor TForm1.Create(AOwner: TComponent; AWidth, AHeight: Integer);
begin
  inherited Create(AOwner);

{ 追加処理 }
end;
というようにします。

編集    削除

---

にしのさん、どうもありがとうございます。
おかげさまで引数を渡すことができたのですが、コンパイルすると、
'Create' メソッドが基本型 'TCustomForm' の仮想メソッドを隠しました
という警告が出てしまいます。
この警告を出ないようにするにはどうすればよろしいでしょうか？

編集    削除

---

出ないだけでよいのであれば、
constructor Create(AOwner: TComponent; AWidth, AHeight: Integer); reintroduce; overload;
です。
詳しくはヘルプを参照してください。

編集    削除

---

reintroduceを使えばよいのですね。
とても勉強になりました。
どうもありがとうございました。

編集    削除

---

reintroduceを使えばよいのですね。
とても勉強になりました。
どうもありがとうございました。

編集    削除

---

解決しました。

編集    削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。