Buenas.
Hago una idea general... tenemos el form Clientas... y uno llamado Ventas. Al pulsar el botón de compra en el form Clienta, sale la ventana Ventas para pedir los datos y tal...
Pues bien, en frmDatosClientas (el form este) tengo un DBGrid.. donde muestro todas las ventas mediante una consulta SQL. Se muestran perfectamentes al cargar el form. El problema está después de dar de alta o modificar algo en la tabla Ventas, que el puñetero TAdoQuery o algo se me desconecta, y el DBGrid no pilla... ¬¬'
El código que uso para la consulta en el OnCreate del frmDatosClientas o después de hacer el post o edit..
Código Delphi
[-]
procedure TfrmDatosClienta.Consultar();
begin
dm.VentasSQL.Close;
dm.VentasSQL.SQL.Clear;
dm.VentasSQL.SQL.Text := 'SELECT Cantidad, Fecha, Vendedora FROM Ventas WHERE Clienta='+QuotedStr(eNombre.Text);
dm.VentasSQL.Active := True;
dm.DVentasSQL.Enabled := True;
dm.VentasSQL.Open;
DBGrid1.DataSource := dm.DVentasSQL;
DBGrid1.Columns.Items[0].Width := 50;
DBGrid1.Columns.Items[1].Width := 100;
DBGrid1.Columns.Items[2].Width := 150;
end;
Pego unos cuantos screenshots aclaratorios
DataModule:
frmDatosClienta:
frmVentas: