掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
OpenDialogを上位で表示するには (ID:33493)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
2006 + XP で再現しないのでなんとも言えませんが >FormMain に連動しているようです。 とするならば public function OpenDialog: Boolean; end; function TFormMain.OpenDialog: Boolean; begin Result := OpenDialog1.Execute; end; procedure TFormSub.Button1Click(Sender: TObject); begin if FormMain.OpenDialog = True then begin end; end; として FormSub から SubMain の OpenDialog 使用するように したらどうでしょうか？
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.