こんにちは。
Delphi 2010 + Windows 7 32bitで開発しています。
複数のフォームがあるWindowsアプリケーションです。
スタートフォーム以外のフォームにあるOnCreateイベントが
アプリケーションを起動すると実行されてしまいます。
OnCreateイベントがあるフォームを開いたときに実行したいのですが
どうすればよういのでしょうか?
プロジェクトのオプションで
自動生成の対象からそのフォームを外せばOnCreateイベントは発生しないと思います。
その代わり自分で生成しないといけません。
take様、早速のお返事をいただきましてありがとうございます。
確かにおっしゃる通り、自動生成対象フォームから外すことができました。
しかし、コード入力でどのように生成すればよいのでしょうか。
初歩的なご質問ばかりでは大変お恥ずかしいのですが
ご指導お願いいたします。
フォームの生成処理を行いたい側で
uses に生成したいフォームを追記します
TForm1 から TForm2を生成して処理したい場合は
クリックイベントで生成するサンプル
※手書きなのでスペルミスあるかも
procedure TForm1.OnButton1Click(Sender: TObject);
var
df : TForm2;
begin
df := TForm2.Create(Self);
try
df.Show(); // 通常
df.ShowModal(); // 閉じるまで処理を戻したくない場合
finally
df.Free;
end
ツイート | ![]() |