carga de un gráfico desde un OpenPictureDialog

[serg]

Hola de nuevo, este es un extracto de mi código:

procedure TForm1.presentacion1Click(Sender: TObject);
begin
OpenPictureDialog1.Execute;
end;
procedure TForm1.OpenPictureDialog1Close(Sender: TObject);
var
ns:tfilename;
begin
if OpenPictureDialog1.Execute then
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;

Donde: presentacion1Click es una opción del menú principal.
La intención es que al seleccionar esta opción en el menú se abra el cuadro de diálogo OpenPictureDialog y en el momento que de aceptar se cambie la figura de fondo.
El hecho es que así no me funciona, si alguién pudiera proponerme algo, le estaría muy agradecido. De antemano muchisimas gracias.

[[Delphius]]

Hola serg,
Estas interpretando incorrectamente el código que te han expuesto.

Debes colocar el código que amablemente expone Dec dentro del evento de algún control en que deseas que se ejecute la acción.
Por ejemplo en tu caso debe ser así:

Código Delphi [-]
procedure TForm1.presentacion1Click(Sender: TObject);
begin
// Excecute se encarga de mostrar el cuadro de díalogo. Devuelve
// TRUE si se aceptó o FALSE si se canceló el díalogo
if  OpenPictureDialog1.Execute // ¿Se aceptó abrir el archivo?
    then Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;

Espero que ahora esté más claro.
Como consejo tu sugiero que uses la etiquetas [ DELPHI ] [ /DELPHI ] (sin los espacios) para que el código que expones se entienda mejor.

Saludos,

[serg]

Muchas gracias a todos, ya resolví el problema con sus consejos.