Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Refresh a un Grid (https://www.clubdelphi.com/foros/showthread.php?t=13295)

JorgeBec 13-08-2004 00:38:56

Refresh a un Grid
 
Hola de Nuevo! Mi pregunta es Tengo un DbGrid, al cual se le asigna un data source y a su vez se conecta con un set de datos de la tabla Ventas.dbf, ahora con un boton yo hago un update a esa misma tabla, pero los datos no se actualizan, como actualizo el DbGrid???

marto 13-08-2004 00:40:38

Código Delphi [-]
  DbGrid.DataSource.DataSet.Refresh;

JorgeBec 13-08-2004 00:57:11

Compañero Marto, ya probe el codigo, pero sigue sin actualizar el Grid...que podra ser???

marto 13-08-2004 09:14:33

Wop!

¿Por que no nos pones el código que usas para escribir en la tabla y para conectar el grid?

JorgeBec 13-08-2004 16:38:52

Aqui va

este es el proceso...

Código:

procedure TfrmGastos.BitBtn1Click(Sender: TObject);
begin
  try
    if edGastos.Value = 0 then
        showmessage('Falta ingresar los gastos de fabricación...')
    else
    begin
      qryTotalizado.First;
      qryUpdate.Params[0].asfloat := qryTotalizadoUni.value;
      qryUpdate.Params[1].asfloat := edGastos.value;
      qryUpdate.ExecSQL;
    end;

    showMessage('Proceso Terminado...');
  except
    on E:Exception do Errores(E.Message);
  end;

end;

este proceso es el de Actualizar el Grid...

Código:

procedure TfrmGastos.BitBtn3Click(Sender: TObject);
begin
    GridGtos.DataSource.DataSet.Refresh;
end;


y este lo que tiene el componente llamado qryUpdate...

Código:

UPDATE Ventas V
SET
    impgtosfab = (V.unidades / :pTotal) * :pTotGtos
WHERE
        V.codigoprod = (SELECT codigoprod FROM Producto P WHERE P.codigoprod = V.codigoprod AND P.gtosfab = '*')



La franja horaria es GMT +2. Ahora son las 08:55:55.

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