Ver Mensaje Individual
  #2  
Antiguo 02-07-2007
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Puedes utilizar el componente "TOpenPictureDialog" y verás que no resulta demasiado complicado, en principio:

Código Delphi [-]
procedure TfrmPrincipal.btnImagenClick(Sender: TObject);
begin
  if dlgImagen.Execute then
    img.Picture.LoadFromFile(dlgImagen.FileName);
end;

Nota: Si no cuentas con el componente mencionado, puedes usar el componente "TOpenDialog"... al fin y al cabo el primer componente añade ciertas características, como una vista previa de la imagen a abrir, pero, por lo demás, "TOpenDialog" puede servirte igualmente.
Archivos Adjuntos
Tipo de Archivo: zip ejemplo.zip (4,3 KB, 68 visitas)
__________________
David Esperalta
www.decsoftutils.com

Última edición por dec fecha: 02-07-2007 a las 05:51:29.
Responder Con Cita