No visualizo registros insertados por codigo

[j_flores3000]

Resulta que estoy insertando en un dbgrid registros por codigo, osea su valor. El registro se agrega pero en el bdgrid no se visualiza ninguno de los valores que le coloque.
[delphi]
With DataModule2 do Begin
QVentas.Open;
QVentas.Insert;
QVentas.FieldByName('IDPRODUCTOS').AsString := DBEdit4.Text;
QVentas.FieldByName('IDCLIENTE').AsString := DbEdit1.Text;
QVentas.FieldByName('IMPORTETOTAL').AsFloat := StrToFloat (DBEDit3.Text);
QVentas.FieldByName('ATENDIDO').AsString := DBedit5.Text;
QVentas.Post;
end;[
/DELPHI]
Esta bien pasarle los valores asi?

[[Caral]]

Hola
Supongo que el dbgrid esta enlazado a un datasource que esta enlazado a QVentas, que parece un table?.
Supongo que los dbedit estan enlazados a otro table?.
Me gustaria saber que base de datos usas y con que componentes la enlazas?.
Saludos

[j_flores3000]

Uso componentes TQuery, y si estan todos enlazados, uso base de datos paradox, BDE.

[[Caral]]

Hola
Bueno, sigo sin saber.
Los DBedit estan enlazados a una tabla y QVentas a otra?.
Son dos tablas diferentes?.
Saludos

[j_flores3000]

No esta todo enlazado a QVentas, pero los datos si los toma de otra tabla. Qventas esta enlazado a la tabla ventas, y los componentes tambien. Ahora el unico dato que si se puede visualizar es el de Atendido (donde aparece un nombre del empleado.)

[[Caral]]

Hola
Sigo sin entender:

Código Delphi [-]
With DataModule2 do Begin
QVentas.Open;
QVentas.Insert;
QVentas.FieldByName('IDPRODUCTOS').AsString := DBEdit4.Text;
QVentas.FieldByName('IDCLIENTE').AsString := DbEdit1.Text;
QVentas.FieldByName('IMPORTETOTAL').AsFloat := StrToFloat (DBEDit3.Text);
QVentas.FieldByName('ATENDIDO').AsString := DBedit5.Text;
QVentas.Post;
QVentas.Close;
QVentas.Open;
end;

Saludos