Hola,<br><br>Yo creo que es mejor guardar en la bbdd el nombre de la imagen y la imagen en una carpeta, Si gaurdas la imagen en la bbdd esta crecerá de forma casi exponencial.<br>LoadFromFile y SaveFromFile te permitirán manejar la imagen como quiereas.<br>
<br>Un saludo.<img goomoji="330" style="margin: 0pt 0.2ex; vertical-align: middle;" src="cid:330@goomoji.gmail"><br><br><div class="gmail_quote">El 4 de febrero de 2011 14:42, Paola Bruccoleri <span dir="ltr"><<a href="mailto:pbruccoleri@adinet.com.uy">pbruccoleri@adinet.com.uy</a>></span> escribió:<br>
<blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">El 04/02/2011 11:04 a.m., David Enamorado escribió:<div class="im"><br>
<blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">
Buenos dias lista,  amigos estoy  desarrollando un proyecto con lazarus pero he tenido un problema con la insercion de imagenes en la base de datos ( postgres). la a accion de grabar registro la realizo de la forma Tabla.fieldbyname('campoTipoString').asstring:= edit.tex; , de esta forma funciona bien para campos que no sean tipo imagen, mi pregunta es ¿como es la forma correcta para ingresar una imagen a la base de datos utilizando esta tecnica?, la imagen la tengo un un componente Timage. <br>

</blockquote></div>
Hola David..<br>
<br>
te pego un mail de José Mejuto de hace un tiempito, con una respuesta que puede servirte..<br>
<br>
Hello Christian,<br>
<br>
Saturday, December 11, 2010, 9:37:31 PM, you wrote:<br>
<br>
CO>        SQL.Add('select ' + sImageField );<br>
CO>        SQL.Add('from '+ sTable);<br>
CO>        SQL.Add('where '+ sCondicion);<br>
CO>        Open;<br>
CO>        Edit;<br>
CO>  TBlobField(FieldByName(sImageField)).LoadFromStream(TheImage);<br>
CO>        Post; ///Probe con ApplyUpdates y fue lo mismo/<br>
CO>        FreeAndNil(TheImage);<br>
CO>  *end;<br>
CO>  end; *<br>
<br>
Sin ver "sCondition" es un poco difícil. Si tabla tiene un primary<br>
key, seleccionala también en el select, por que aparenta un bug en<br>
el query al generar el update sql sin un campo "primary key".<br>
<br>
De todos modos, lo lógico sería hacer eso son un EXECSQL no con un<br>
Open :-?<br>
<br>
SQL.Text:='Update :pTable Set :pfield=:pfieldvalue where '+sCondition;<br>
ParamByName('pTable').asString:=sTable;<br>
ParamByName('pField').asString:=sImageField;<br>
ParamByName('pField').LoadFromStream(TheImage);<br>
<br>
ExecSQL;<br>
<br>
<br>
<br>
<br>
_______________________________________________<br>
Lazarus-es mailing list<br>
<a href="mailto:Lazarus-es@lists.lazarus.freepascal.org" target="_blank">Lazarus-es@lists.lazarus.freepascal.org</a><br>
<a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es" target="_blank">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es</a><br>
</blockquote></div><br>