Por cierto, el insert lo hago de la siguiente manera (por si pudiera causar algún error en el posterior refresco del listbox):
Código:
//Se entiende que el Adapter ya está activo y el dataset relacionado
Conexion.Open; // Conexión es del tipo Borland.Data.Provider.BdpConnection;
ComandoSQL := 'insert into usuarios (Campo1,Campo2) values ('Dato1','Dato2'); //ComandoSQL es un String;
ComandoInsertar.CommandText := ComandoSQL; //ComandoInsertar es una variable tipo Borland.Data.Provider.BdpCommand
Transaccion := EcodomesticaConexion.BeginTransaction; //Transaccion es del tipo Borland.Data.Provider.BdpTransaction
ComandoInsertar.ExecuteNonQuery;
Transaccion.Commit;
Conexion.Close;
Este código se abre en una ventana modal (dialog) que, al cerrarse, debe actualizar el listbox de otra ventana ya abierta, tal y como he puesto en el mensaje anterior, pero no funciona. Tampoco ha funcionado lo siguiente:
Código:
With MiListBox Do
Begin
DataSource := NIL;
DataSource := MiDataSet;
DataMember := Tabla.Columna;
Refresh;
End;