掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
起動時にボタンを無効にするには？ (ID:33876)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Delphi始めたばかりです。 よろしくお願いします。 EXE起動時に自身のパスを取得 ↓ そのパスに特定の文字列を追加してフォルダの存在判定 ↓ フォルダが存在しない時フォーム上のボタンを無効に という処理をしたいのですが、記述位置？がわかりません 処理的には procedure TForm1.kyuBtnClick(Sender: TObject); begin try strFolname := ExtractFilePath(Application.Exename); showmessage(strfolname); if direxists(strfolname + kyuname) then showmessage(strfolname + kyuname + #13#10 +'あり') else kyubtn.Enabled := False; showmessage('なし'); finally end; end; このような事がしたいのです。 これでは当然ですがボタンが押された後無効になります。 起動時にフォルダが無ければ無効にする方法を教えてください。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.