Como cargar una image desde un OpenPictureDialog1

[Salnhack]

Hola tengo un TImagen y un OpenPictureDialog1 necesito que la imagen selecionada se me cargue en el TImagen lo hago de la sgte forma

Código Delphi [-]
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);

Pero el problema es que me dice que la extención del archivo que estoy cargando es desconocida y estoy cargando un .ICO que es una de las extenciones validad para un TImagen

Ayuda Please

[ecfisa]

Hola Salnhack.

Si la selección del archivo es correcta, tu código no debería dar ningún problema. ¿ Has probado si sucede lo mismo con otros archivos .ICO ?

Saludos.

[[nlsgarcia]]

Salnhack,

Revisa este código:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
   OpenPictureDialog : TOpenPictureDialog;
begin
   OpenPictureDialog := TOpenPictureDialog.Create(Self);
   OpenPictureDialog.InitialDir := GetCurrentDir;
   OpenPictureDialog.Options := [ofFileMustExist];
   OpenPictureDialog.Filter := 'Icons Files|*.ico|Bmp Files|*.bmp';
   OpenPictureDialog.FilterIndex := 1;
   if OpenPictureDialog.Execute then
      Image1.Picture.LoadFromFile(OpenPictureDialog.FileName);
   OpenPictureDialog.Free;
end;

El código anterior funciona correctamente con archivos de tipo ICO y BMP.

Verifica que tus archivos con extensión ICO correspondan al tipo que sugiere la extención y no presenten problemas en su estructura.

Espero sea útil

Nelson.

[Salnhack]

Empezado por nlsgarcia

Salnhack,

Revisa este código:
Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); var OpenPictureDialog : TOpenPictureDialog; begin OpenPictureDialog := TOpenPictureDialog.Create(Self); OpenPictureDialog.InitialDir := GetCurrentDir; OpenPictureDialog.Options := [ofFileMustExist]; OpenPictureDialog.Filter := 'Icons Files|*.ico|Bmp Files|*.bmp'; OpenPictureDialog.FilterIndex := 1; if OpenPictureDialog.Execute then Image1.Picture.LoadFromFile(OpenPictureDialog.FileName); OpenPictureDialog.Free; end;

El código anterior funciona correctamente con archivos de tipo ICO y BMP.

Verifica que tus archivos con extensión ICO correspondan al tipo que sugiere la extención y no presenten problemas en su estructura.

Espero sea útil

Nelson.

Ok, gracias