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

解決

かえで  2004-05-27 13:20:12  No: 9165  IP: 192.*.*.*

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

編集 削除
にしの  2004-05-27 16:20:46  No: 9166  IP: 192.*.*.*

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-27 17:32:11  No: 9167  IP: 192.*.*.*

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

編集 削除
にしの  2004-05-27 18:14:28  No: 9168  IP: 192.*.*.*

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

編集 削除
かえで  2004-05-27 18:25:55  No: 9169  IP: 192.*.*.*

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

編集 削除
かえで  2004-05-27 18:26:04  No: 9170  IP: 192.*.*.*

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

編集 削除
かえで  2004-05-27 18:27:05  No: 9171  IP: 192.*.*.*

解決しました。

編集 削除