Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Duda con DBGrid (https://www.clubdelphi.com/foros/showthread.php?t=35576)

alcides 14-09-2006 15:16:02

Duda con DBGrid
 
Hola a todos,

resulta que mediante un Dbgrid introduzco perfectamente los datos

cuenta ---------Debito----------Credito
aaaaaa ---------555.55-----------0.00
ddddd------------40.50-----------0.00
hhhhh-----------120.00-----------0.00
eeeee-------------0.00----------10.50
llllllllllllllll------------0.00----------30.00


totales-----------786.05---------40.50

fuera del DBGrid tengo los total_debito y total_credito

Recorro el DBGrid con la tecla TAB, todo bien mientras la tabla esta en insert, pero cuando llamo el registro para modificar los valores contenido en los campos Debito y Credito si uno de esos valores lo quiero dejar igual tengo que digitarlo porque si solo uso el tab no lo suma en el campo de total.


Gracias mil.


Alcides
Rep.Dom.

Gracias mil

Caral 14-09-2006 20:26:45

Hola
Seria bueno indicaras como llamas al registro de los valores Debito y Credito, tal vez poniendo la sentencia sql, que supongo usas para esto, me ayudaria a entender porque te pasa esto, donde recives esta informacion en un DBEdit o un Edit o que?.
Aproposito siguiendo el buen consejo de mis maestros Dec y Jachguate, usa las etiquetas para el codigo, que la verdad sirven de mucho y tienen toda la razon se aprecia mejor el codigo.
Aprovecho
Gracias Dec y Jachguate por la leccion.
Saludos

alcides 14-09-2006 21:44:13

Gracias Mil, caral

sabes es una relacion master ditail y esos valores los capturos y los modificos en un dbgrid, pero los totales los tengo en DBedit.

Alcides
Rep.Dom.

Caral 14-09-2006 22:01:52

Hola otra vez
Se me ocurre que tal vez en algun evento del DBedit, despues de pasarle el foco, que podria ser en OnChange poner una variable que indique el valor del DBedit y si no se modifica mantenga el mismo valor para que el total no se modifique, tal vez algo asi:
Código Delphi [-]
procedure TForm1.DBEdit1Change(Sender: TObject);
var
  a, b: real;
begin
  a:= StrToFloat(DBEdit1.Text);
  B:= a;
  If a <>  b  then
 // Lo que necesites
 else
 // lo contrario
end;
Recuerda que esta es una explicacion muy somera de algo que desconozco,
solo trato de darte alguna idea.
Saludos

alcides 14-09-2006 22:39:43

Gracias mil, caral

tomare la idea y te hago saber.


Alcides
Rep.Dom.


La franja horaria es GMT +2. Ahora son las 02:54:39.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi