Ver Mensaje Individual
  #2  
Antiguo 12-02-2007
Avatar de Alcolea
Alcolea Alcolea is offline
Miembro
 
Registrado: abr 2006
Ubicación: Santiago de Cuba, Cuba
Posts: 100
Reputación: 21
Alcolea Va por buen camino
Talking

Prueba con esto:

Parto de supuesto de que tienes un campo Grafic definido con el DataBase Desktop, de cualquier manera revisa el adjunto para que ves los componente usados y sobre todo la propiedad Field del Table1 a la cual se accede con un doble clic sobre el componente, clic derecho sobre la pequeña ventana que aparece y agrega todos los campos. Luego selecciona los campos agregados y arrastralos hasta la Forma, agregas un botón y pon el código que sigue.


Código Delphi [-]
 
procedure TForm1.Button1Click(Sender: TObject);
begin

 //La tabla tiene que estar en modo de edición o nserción
 Table1.Edit;
 if OpenDialog1.Execute then DBImage1.Picture.LoadFromFile(OpenDialog1.FileName);

end;
Archivos Adjuntos
Tipo de Archivo: zip Dibujo.zip (7,3 KB, 39 visitas)

Última edición por Alcolea fecha: 12-02-2007 a las 02:48:27. Razón: Olvidé el adjunto
Responder Con Cita