El apuntador al TDatamodule viene así:
Código Delphi
[-]
property DataModule : TDatamodule read FDatamodule write SetDAtaModule;
....
procedure TXXX.SetDatamodule(Value:TDatamodule);
begin
if Value <> FDatamodule then
begin
Value := FDatamodule;
if Assigned(Value) then
begin
end;
end;
Yo usaría herencia visual para el datamodule, para al menos tener algunas propiedades ya asígnadas. Será lógico tener el Datamodule principal (donde reside el TDatabase y TTransaction ya configurados) y los nuevos datamodules tendrán un "enlace" a dichos componentes del Datamodule principal.
Para asignar el Datamodule que nos interese, pues como siempre se hace en delphi:
Código Delphi
[-]
UnaClaseDeInteres.Datamodule := dmPepito;
UnaClaseDeInteres.Datamodule := nil;
Saludos