[DiegoPucho]

Hola de Nuevo... Aquí mi consulta... Tengo un formulario conectado a una base de datos en el varios Edit y DBLookupComboBox, el problema que no puedo guardar los datos que tiene el DBLookupComboBox.
Dejo aquí el código donde guardo los Edit.

Código Delphi [-]
procedure TTFormNuevoProducto.BtnGuardarClick(Sender: TObject);
begin
FrmModArt.ABSQProductos.Insert;
   try
   FrmModArt.ABSQProductos.FieldByName('Codigo').Text:= EditCodigo.Text;
   FrmModArt.ABSQProductos.FieldByName('CodigoProv').Text:= EditCodProv.Text;
   FrmModArt.ABSQProductos.FieldByName('Descripcion').Text:= EditDescripcion.Text;
   FrmModArt.ABSQProductos.FieldByName('Rubro').Text:= ComboBoxRubro.Text;
   FrmModArt.ABSQProductos.FieldByName('Unidad').Text:= ComboBoxUnidad.Text;
   FrmModArt.ABSQProductos.Post;
   TFormNuevoProducto.EditCodigo.Clear;
   TFormNuevoProducto.EditCodProv.Clear;
   TFormNuevoProducto.EditDescripcion.Clear;
   //// TFormNuevoProducto.ComboBoxRubro.Create;
   TFormNuevoProducto.EditCodigo.SetFocus;
   except
     on E:Exception do begin
      MessageDlg('Error: ' + E.Message, mtWarning, [mbOK], 0);
     end;
   end;
  Image1.Visible:=False;
end;

En //// TFormNuevoProducto.ComboBoxRubro.Create; no me corre el programa... Agradecería su ayuda...