ShellExecute関数で出来ると聞いて、
usesにShellAPIを追加して、
procedure TForm1.runnotepadClick(Sender: TObject);
begin
ShellExecute(Handle, nil, 'notepad.exe', '', nil, sw_Show);
end;
とゆー感じで実行してみたんですが、
指定された引数で呼び出すことのできるオーバーロード関数 'ShellExecute' が定義されていません
と怒られたのですが、まだ何か定義が必要なのでしょうか?
お願いします!!
あ、目的を書き忘れてました(笑)
ボタンをクリックしたら、メモ帳を開くみたいな事をしたいのですが。
ShellExecute(Handle, 'open', 'notepad.exe', nil, nil, SW_SHOW);
としてみてください。
できました!!
ありがとうございましたっ!!
ツイート | ![]() |