[[Caral]]

Hola
Y si usas esta sentencia no necesitas especificar mas cosas de la cuenta:

Código Delphi [-]
 with TOpenPictureDialog1.Create(nil) do  // aqui creas el componente
  try
      if Execute then  // aqui esta el detalle, no ocupas el que estas usando
      TAgenda.edit;
      DBImage1.Picture.LoadFromFile(FileName);// no ocupa la repeticion
      TAgenda.Post;
  finally
    Free;// libera el componente de la memoria
  end;

Nada mas por ampliar un poco esto.
Me alegro de que te funcione.
Saludos