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

解決

かえで 2004-05-27 22:20:12 No: 9165

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

にしの 2004-05-28 01:20:46 No: 9166

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

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

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

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

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

かえで 2004-05-28 02:32:11 No: 9167

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

にしの 2004-05-28 03:14:28 No: 9168

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

かえで 2004-05-28 03:25:55 No: 9169

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

かえで 2004-05-28 03:26:04 No: 9170

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

かえで 2004-05-28 03:27:05 No: 9171

解決しました。