Ver Mensaje Individual
  #6  
Antiguo 23-10-2007
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Reputación: 27
Delphius Va camino a la fama
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,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita