Win32APIのGetOpenFileName関数のDelphi用サンプルコードって意外と少ないね。
VCLで用が足りちゃうから需要がないのかな？
VB用なら腐るほどあるんだけど。

ttp://halbow.cool.ne.jp/Chap18.html