TOpenDialog初始化打开路径

dlgOpen1.InitialDir:='D:\test\';

dlgOpen1.FileName:='';//每次打开前清空filename即可打开初始化路径 
if dlgOpen1.Execute then
begin

end;