Correct, TAureliusDataset works are object level, not database level.
Thus, your class TDima doesn't have any reference to the TCommessa class. For that you should create do a bidirectional association, by adding the FCommesa field in TDima class and then modifying the ManyValuedAssociation to point to it, removing the ForeignJoinColumn attribute.
Some references:
Once you do that, you can set the parent object in OnNewRecord event by referencing the object, as showed here: