フォルダ(ディレクトリ)を開くには

解決


たろー  2004-03-27 05:55:34  No: 7934  IP: [192.*.*.*]

すいません、ボタンで任意のフォルダを開きたい場合はどのようにすればよいのでしょうか?(普通にショートカットを開くような感じにしたいのですが・・)
よろしくお願いします

編集    削除
jok  2004-03-27 06:27:01  No: 7935  IP: [192.*.*.*]

こんな感じですか?

uses
  ShellAPI;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle,'explore','C:\',nil,nil,SW_SHOWNORMAL);
end;

編集    削除
たろー  2004-03-27 09:44:19  No: 7936  IP: [192.*.*.*]

jokさんありがとうございました、無事できました!
exploreを使うとは気がつきませんでした、
助かりましたありがとうございました

編集    削除