[Lazarus-es] Conocer el dato de una celda en un TDBGrid

Ismael L. Donis García ismael en citricos.co.cu
Lun Mar 8 19:35:20 CET 2010


1 Millón de gracias.

Ahora tengo otro problema el evento BeforePost del TSQLQuery no se me está disparando, esto es un Bug de Lazarus?

Tengo:

procedure Tfrmum.dbgumKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if Key = 13 then
    if length(rsum.FieldByName('um').AsString) = 0 then
      begin
        cmdcerrar.SetFocus;
        key:=0;
      end
    else
      rsum.Post;
end;

procedure Tfrmum.rsumBeforePost(DataSet: TDataSet);
begin
  rsum.FieldByName('entidad').AsString := dtm.strentidad;
end;


// Lo que sigue es para que sepan los nombres

TSQLQuery.Name := rsum
TDBGrid.name := dbgum



=========
|| ISMAEL ||
=========
  ----- Original Message ----- 
  From: christian Ortiz 
  To: Spanish version of Lazarus List 
  Sent: Monday, March 08, 2010 12:39 PM
  Subject: Re: [Lazarus-es] Conocer el dato de una celda en un TDBGrid





  2010/3/8 Ismael L. Donis García <ismael en citricos.co.cu>

    Como puedo conocer el dato que tiene una celda determinada en un TDBGrid?

    Quiero conocer algo como esto:

    if TDBGrid.Columns[1].AsString = XXXX then
  lo haces con
  Query.fieldbyname('tucampo').asstring


  -- 
  Christian



------------------------------------------------------------------------------


  _______________________________________________
  Lazarus-es mailing list
  Lazarus-es en lists.lazarus.freepascal.org
  http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20100308/23288790/attachment-0002.html>


More information about the Lazarus-es mailing list