すいません、ボタンで任意のフォルダを開きたい場合はどのようにすればよいのでしょうか?(普通にショートカットを開くような感じにしたいのですが・・)
よろしくお願いします
こんな感じですか?
uses
ShellAPI;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle,'explore','C:\',nil,nil,SW_SHOWNORMAL);
end;
jokさんありがとうございました、無事できました!
exploreを使うとは気がつきませんでした、
助かりましたありがとうございました
ツイート | ![]() |