openpicture dialog

preciso que ao clicar no botao meu programa abre o local onde esta minha foto para isso preciso utilizar o openpicturedialog porem quando eu clico no botao para abrir a pasta ele trava meu programa e n faz mais nd
utilizo delphi 7
windows 10


if Abrir.Execute then
begin
try
// Carrega a imagem para arquivo binário de memória.
bfoto := True;
fs := TFileStream.Create(Abrir.FileName, fmOpenRead or fmShareDenyWrite);

// Mostra a imagem no Image.
DBImage1.Picture.LoadFromFile(Abrir.FileName);

finally
// libera arquivo de memória.
// fs.Free;
end;
end;