名前
題名
▼ Mr.XRAYさん > ▼ Saraさん > > > SetFpidlSelectFolderの最後に > > > > SHGetPathFromIDList(FpidlSelectFolder, pFullPath); > > FSelectFolder := pFullPath; > > http://mrxray.on.coocan.jp/Delphi/plSamples/947_ExplorerBrowsert.htm#03 > のプログラムにボタンを追加してテストしてみました． > う〜ん．SelectFolderが取得できいるみたいなんですが... > 引き続き調べてみます． > > procedure TForm1.Button4Click(Sender: TObject); > begin > plExplorerFolderTree1.RootFolder := ''; > plExplorerFolderTree1.SelectFolder := 'D:\000\947_ExplorerBrowser'; > end; > > procedure TForm1.Button5Click(Sender: TObject); > begin > ShowMessage(plExplorerFolderTree1.SelectFolder); > end;
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link