Con este proceso almaceno un dato en la tabla "Centro", .. esto lo hago en el Form "Ccostos"
Código Delphi
[-]
IBQ_Edit.SQL.Clear;
IBQ_Edit.SQL.Add('Insert Into "Centro" ("Cen_Codigo","Cen_Detalle")');
IBQ_Edit.SQL.Add('Values (:P1, :P2)');
IBQ_Edit.Params[0].AsString := vCod.Text;
IBQ_Edit.Params[1].AsString := vDet.Text;
IBQ_Edit.ExecSQL;
IBT_Edit.Commit;
para cerrar el Form le pongo solamente "close"
luego voy al Form "Cargos" y cuando este se abre me ejecuta el siguiente código, en donde todos los datos que estan en la tabla "Centro" me los pasa al Combo_Box "CB_Centro" para agregarlos
Código Delphi
[-]
procedure TAsig_Costos.FormActivate(Sender: TObject);
begin
IBQ_Cargos.Close;
IBQ_Cargos.SQL.Clear;
IBQ_Cargos.SQL.Add('Select * From "Centro"');
IBQ_Cargos.SQL.Add('Order By "Cen_Codigo"');
IBQ_Cargos.Open;
CB_Centro.Items.Clear;
While IBQ_Cargos.Eof=False Do
Begin
CB_Centro.Items.Append(IBQ_Cargos['Cen_Detalle']);
IBQ_Cargos.Next;
End;
lo que pasa es que cuando agrego un registro en la tabla "centro" y sin salir del sistema ingreso al Form "Cargos", este no aparece registrado.. pero si salgo del sistema e ingreso de nuevo.. lo actualiza y si aparece
espero haberme explicado bien....