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?