<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.18702">
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT size=2 face=Arial>1 Millón de gracias.</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Ahora tengo otro problema el evento BeforePost del
TSQLQuery no se me está disparando, esto es un Bug de Lazarus?</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>
<DIV><FONT size=2 face=Arial>Tengo:</FONT></DIV>
<DIV><BR>procedure Tfrmum.dbgumKeyUp(Sender: TObject; var Key: Word; Shift:
TShiftState);<BR>begin<BR> if Key = 13 then<BR> if
length(rsum.FieldByName('um').AsString) = 0
then<BR>
begin<BR>
cmdcerrar.SetFocus;<BR>
key:=0;<BR> end<BR>
else<BR> rsum.Post;<BR>end;<BR></DIV>
<DIV>procedure Tfrmum.rsumBeforePost(DataSet: TDataSet);<BR>begin<BR>
rsum.FieldByName('entidad').AsString := dtm.strentidad;<BR>end;<BR></DIV>
<DIV> </DIV>
<DIV></FONT><FONT size=2 face=Arial>// Lo que sigue es para que sepan
los nombres</FONT></DIV></DIV>
<DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>TSQLQuery.Name := rsum</FONT></DIV>
<DIV><FONT size=2 face=Arial>TDBGrid.name := dbgum</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>=========<BR>|| ISMAEL ||<BR>=========</FONT></DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=xortix@gmail.com href="mailto:xortix@gmail.com">christian Ortiz</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=lazarus-es@lists.lazarus.freepascal.org
href="mailto:lazarus-es@lists.lazarus.freepascal.org">Spanish version of
Lazarus List</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Monday, March 08, 2010 12:39
PM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [Lazarus-es] Conocer el dato
de una celda en un TDBGrid</DIV>
<DIV><BR></DIV><BR><BR>
<DIV class=gmail_quote>2010/3/8 Ismael L. Donis García <SPAN dir=ltr><<A
href="mailto:ismael@citricos.co.cu">ismael@citricos.co.cu</A>></SPAN><BR>
<BLOCKQUOTE
style="BORDER-LEFT: rgb(204,204,204) 1px solid; MARGIN: 0pt 0pt 0pt 0.8ex; PADDING-LEFT: 1ex"
class=gmail_quote>
<DIV bgcolor="#ffffff">
<DIV><FONT size=2 face=Arial>Como puedo conocer el dato que tiene una celda
determinada en un TDBGrid?</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Quiero conocer algo como esto:</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>if TDBGrid.Columns[1].AsString = XXXX
then</FONT></DIV></DIV></BLOCKQUOTE>
<DIV>lo haces con<BR>Query.fieldbyname('tucampo').asstring<BR
clear=all></DIV></DIV><BR>-- <BR>Christian<BR>
<P>
<HR>
<P></P>_______________________________________________<BR>Lazarus-es mailing
list<BR><A
href="mailto:Lazarus-es@lists.lazarus.freepascal.org">Lazarus-es@lists.lazarus.freepascal.org</A><BR>http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es<BR></BLOCKQUOTE></BODY></HTML>