OpenDialog Delphi trava a aplicação

Delphi

14/02/2017

Olá a todos,
Estou com uma grande dificuldade de resolver a seguinte situação.

Tenho um sistema que em um certo momento abre um Dialogo para abrir uma foto.
com o seguinte código
procedure TfrmCadFuncionarios.btnBuscarFotoClick(Sender: TObject);
begin


dlgFoto.Execute; //esse é o componente OpenDialog... 



end;


Quando clico nesse botão, o sistema para de responder.
Já criei um form novo, sem nada, e assim o opendialog funciona.
Já apaguei o botão e criei outro com outro opendialog... mas quando está dentro dste projeto, simplesmente não funciona.

Desde já agradeço a ajuda
Vinicius Apolinário

Vinicius Apolinário

Curtidas 0
POSTAR