Fórum Digitar o nome da foto em um edit e abri-la em um TImage #240540

Usei este código, mas ainda não é o que estou procurando. Gostaria de digitar em um edit certo nome de uma foto e ele me mostrasse. Tipo: um formulario de colaboradores que quando eu informar o código do mesmo ele me mostre a sua foto. O exemplo abaixo mostra somente a foto especifica.

procedure TFormTeste.edCaminhoFotoKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
var caminhoFotoPadrao:string;
begin

//configurando minha foto padrão
caminhoFotoPadrao := ´C:\lazer1.jpg´;

//verificando se o caminho digitado corresponde ao de um arquivo
if FileExists(edCaminhoFoto.Text) then
imgFoto.Picture.LoadFromFile(edCaminhoFoto.Text) //carrega a foto
else
imgFoto.Picture.LoadFromFile(CaminhoFotoPadrao) //mantém padrão

end;
:lol: :oops: