Error "DatAset not in edit or intert mode" ESTANDO EN MODO INSERT!!!

[Lenny]

Estimados, me tiene de cabeza este error, les dejo el codigo que utilizo en un TButton:

Código Delphi [-]
procedure TOTWizard.Button1Click(Sender: TObject);
begin
BDatos.OCPRODUCTOSTAB.Insert;
BDatos.OCPRODUCTOSTAB.FieldbyName('OC').AsString := DBEdit14.Text;
BDatos.OCPRODUCTOSTAB.FieldbyName('CODIGO').AsString := BDatos.WPRODUCTOSTAB.FieldbyName('CODIGO').AsString;
BDatos.OCPRODUCTOSTAB.FieldbyName('DESCRIPCION').AsString := BDatos.WPRODUCTOSTAB.FieldbyName('DESCRIPCION').AsString;
BDatos.OCPRODUCTOSTAB.FieldbyName('PRODUCTO').AsString := BDatos.WPRODUCTOSTAB.FieldbyName('PRODUCTO').AsString;
BDatos.OCPRODUCTOSTAB.FieldbyName('MAYOR').AsString := BDatos.WPRODUCTOSTAB.FieldbyName('MAYOR').AsString;
BDatos.OCPRODUCTOSTAB.FieldbyName('DETALLE').AsString := BDatos.WPRODUCTOSTAB.FieldbyName('DETALLE').AsString;
BDatos.OCPRODUCTOSTAB.FieldbyName('CANTIDAD').AsString := Edit5.Text;
BDatos.OCPRODUCTOSTAB.FieldbyName('TOTAL').AsString := Edit4.Text;
BDatos.OCPRODUCTOSTAB.Post;
end;

A pesar de estar en modo Insert

Código Delphi [-]
begin
BDatos.OCPRODUCTOSTAB.Insert;

Al precionar el Boton me lanza este error:

Código Delphi [-]
OCPRODUCTOSTAB: Dataset not in edit or insert mode.

Gracias de antemano ante cualqueir ayuda.

Utilizo Delphi 2010, Zeos 7.0.0, MySQL.