Ver Mensaje Individual
  #11  
Antiguo 02-11-2012
PauloMeno PauloMeno is offline
Miembro
NULL
 
Registrado: ago 2012
Posts: 12
Reputación: 0
PauloMeno Va por buen camino
Cita:
Empezado por marcoszorrilla Ver Mensaje
Yo concretamente, hago lo siguiente, almaceno las fotos en la BD y entonces solamente tengo que mostrarla en un control de base de datos para imágenes, pongamos un DbImage, no hay que hacer nada especial pues por cada persona existe una foto en el mismo registro.

almaceno las fotos en una carpeta, mas propio para productos que para personas, en el registro tengo un campo que indica el nombre de la foto en el disco y la ubicación, simplemente la cargo:

Código Delphi [-]
procedure TfrPVP.pg1Change(Sender: TObject);
begin
 if (pg1.ActivePage = TbFoto) and (DmPrix.IBDtsPVPFOTOPRODUCTO.AsString <>'' )then
 begin
  try
  fotoproducto.Picture.LoadFromFile('\\servidor\xx\datosfb\fotos\'+DmPrix.IBDtsPVPFOTOPRODUCTO.AsStrin  g+'.jpg');
  except
  ShowMessage('Atención:La imagen no existe o no pudo cargarse.');
  end;
 end
 else
 fotoproducto.Picture.LoadFromFile('\\servidor\xx\datosfb\fotos\Nohay.jpg');
end;

Nohay, es una imagen que yo mismo he construido con una x en tamaño grande y color rojo.

Un Saludo.


Muchas gracias por tu aporte.. Lo voy a analizar bien ya que mucho no entendi.. Soy muy nuevo en el uso y manejo de Base de Datos.. Muchas gracias!
Responder Con Cita