Actualizar un ListBox relacionado con una base de datos

[SMTZ]

Por cierto, el insert lo hago de la siguiente manera (por si pudiera causar algún error en el posterior refresco del listbox):

//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:

With MiListBox Do
Begin

   DataSource := NIL;
   DataSource := MiDataSet;
   DataMember := Tabla.Columna;
   Refresh;

End;