起動時にボタンを無効にするには？ (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; このような事がしたいのです。 これでは当然ですがボタンが押された後無効になります。 起動時にフォルダが無ければ無効にする方法を教えてください。