掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
フォームの表示に関するコーディング (ID：20113)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
早速、ありがとうございます（環境はＤ５です）。 以下のようにやってみましたが、Form2, のところで 「変数実パラメータと変数仮パラメータとは同一の型でなければなりません 」 というエラーが出ます。 procedure TForm1.Button1Click(Sender: TObject); var Form2: TForm2; begin hogehoge(Form2, TForm2); end; そこで、 procedure TForm1.hogehoge(var FormX: TCustomForm; 〜 の var を削除したところ、エラーは出なくなりました。 しかし、自動作成の対象から外しているにもかかわらず、 しょっぱなから nil と判断されず、else begin 以下が実行され、 何故か Button1 が消えてしまいます（訳が分かりません？？？）。 ならばと思い、 var Form2: TForm2; を削除してみたところ、 １回目のクリックではForm2が無事に表示されました。 しかし、２回目のクリックでも２個目のForm2が表示され、 期待した通り（Closeして欲しい）にはなりません・・・ どうすればいいのでしょうか？
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.