[Lazarus-es] Uso de TSQLQuery y TDBGrid

[Ismael L. Donis García]

Cuando doy rsum.edit o rsum.append me da error de la clase External SIGSEGV

La verdad que no encuentro la forma.

Hay algún miembro de la lista que le pueda pasar un pequeño ejemplo a ver si 
me puede depurar donde tengo el problema.

GRACIAS a to2s
=========
|| ISMAEL ||
=========
----- Original Message ----- 
From: "JoshyFun" <joshyfun en gmail.com>
To: "Spanish version of Lazarus List" 
<lazarus-es en lists.lazarus.freepascal.org>
Sent: Wednesday, March 03, 2010 11:53 AM
Subject: Re: [Lazarus-es] Uso de TSQLQuery y TDBGrid


Hello Ismael,

Monday, March 1, 2010, 8:00:01 PM, you wrote:

ILDG> Muchas gracias, me has dado un pequeño empujón, ya que ahora si entra 
en
ILDG> modo edición, pero no inserta nada aun en la tabla, se de hecho que 
tengo
ILDG> que agregar código.
ILDG> Ahora tengo 2 dudas más:
ILDG> 1.- Como le introduzco valores a una columna dada por código?
ILDG> Por ejemplo algo como esto:
ILDG> dbgum.Columns[1].Text:=dtm.strentidad;

Los valores se los tienes que dar al registro, cuando se actualizan en
el registro aparecen en el dbgrid (o deberían).

ILDG> Estoy tratando de hacer:
ILDG> procedure Tfrmum.rsumBeforeInsert(DataSet: TDataSet);
ILDG> begin
ILDG>   dbgum.Columns[1].Text:=dtm.strentidad;
ILDG>   rsum.Params.ParamByName('sEntidad').AsString:=dtm.strentidad;
ILDG>
ILDG> rsum.Params.ParamByName('sUm').AsString:=dbgum.Columns[0].Text;
ILDG> end;

rsum.edit;
rsum.parambyname.......
rsum.post;

Ahora deberías ver el registro actualizado en el dbgrid.

ILDG> 2.- No se me está disparando en evento OnKeyPress del TDBGrid, será 
esto un
ILDG> problema de Lazarus?. Como resolver tal problema?
ILDG> procedure Tfrmum.dbgumKeyPress(Sender: TObject; var Key: char);
ILDG> begin
ILDG>   if Key = #13 then
ILDG>     cmdcerrar.SetFocus;
ILDG> end;

Es un bug del dbgrid con la tecla enter, para solventarlo al menos
temporalmente comprueba la tecla en el onkeyup, y creo que no tendrás
problema. Ojo, onkeyup diferencia entre enter e intro.

ILDG> Eso es solo una prueba porque aun me falta una línea donde pregunte si 
la
ILDG> primera columna está vacía, que más bien esa sería la tercer duda.

No entiendo la pregunta.

-- 
Best regards,
 JoshyFun


_______________________________________________
Lazarus-es mailing list
Lazarus-es en lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es