FormStyle = fsStyaOnTop
で設定したフォームにボタンをつけ
このボタンのイベントを以下のようにすると
if SelectDirectory('', '', Dir) then GetS := Dir;
フォルダ選択のメニューが、現状のフォームの下に
隠れてしまいます。このような場合の対処方法は
どうすればよいのですか?
現状
MainFormから呼び出したSubForm上のボタンから
上記の処理を行っており、MainFormも、SubFormも
FormStyle = fsStyaOnTopにしています。
WindowsVista, Delphi2007です。
よろしくお願いします。
直前でStayOnTopを外して、ダイアログを閉じたらまた付ければ?
やはり、そのように小細工しなければいけないんですね。
もともと、D7で作っていたのですが
D2007にそのまま移植しました。
D6では下に出ないで上に出ていたのですが、
CODEGEAR RAD STUDIOでは下に出るようになってしまいました。
どうしてこうなるのか知りたいのですが
わかる方がいれば教えていただけませんか?
D7 と CodeGearRADStudio との違いの原因のほかに、
あと、もう一つ質問があるのですが
SelectDirectory のメニューを StayOnTop のように
最上位で表示できるように対応できないのでしょうか?
こちらのほうもよろしくお願いします。
これは
https://www.petitmonte.com/bbs/answers?question_id=6136
ありがとうございました。
以下で、無事解決しました。
https://www.petitmonte.com/bbs/answers?question_id=6136
ツイート | ![]() |