Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Algo mas sobre DBGRID (https://www.clubdelphi.com/foros/showthread.php?t=18496)

alcides 14-02-2005 17:15:55

Algo mas sobre DBGRID
 
Hola a todos(a),

en el key down del dbgrid esto es lo tengo:

Código PHP:

 if (Key VK_DOWN) or
    ( (
Key VK_TAB) and
    (
DBGrid1.SelectedIndex DbGrid1.Columns.Count+1) ) then
    begin
      with 
(Sender as TDbGrid).DataSource.DataSet do
      
begin
        DisableControls
;
        
Next;
        if 
EOF then Key := else Tbl_Detalle.Next;
        
EnableControls;
      
end

y en el on key press de la form, tengo lo siguiente:
Código PHP:

   if Key #13 then
      
if not (ActiveControl is TDBGridthen begin
      Key 
:= #0;
      
Perform(WM_NEXTDLGCTL00);
      
end
   
else
   if  (
ActiveControl is TDBGrid)         then
   with TDBGrid
(ActiveControl)            do
   if 
selectedindex < (fieldcount -1)   then
      selectedindex 
:= selectedindex +1
   
else
   
begin
      selectedindex 
:= 0;
      
Dts_Detalle.DataSet.Next;
   
end

y resulta que cuando estoy adicionando se oculta la linea anterior, si por favor me pueden dar una manito


Alcides
Rep.Dom.

alcides 15-02-2005 16:47:34

Hola a todos,

esto es lo que hacia falta:
el on enter del dbgrid, despues de darle un post poner en edit mi tabla de encabezado y entonces en el dbgrid que es donde manejo los detalles, dejo de ocultarse la linea anterior.


Alcides
Rep.Dom.


La franja horaria es GMT +2. Ahora son las 07:47:45.

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