Cita:
|
Empezado por Piratta
Esta propiedad se asigna a mano antes de utilizar el navegador, de manera que apunte a un TDataSource ya existente (bien en un TDataModule o bien en la misma ficha donde esté el TFrame).
|
Guarda un apuntador conel posible evento que ya esté asignado, antes de asignar el tuyo. Luego cuando vayas a ejecutar tu evento preguntas si el anterior estaba asignado y en ese caso usas el apuntador para ejecutarlo...
Código Delphi
[-]
OldActiveDataSet := TMyDataSet(Self.DataSource).OnActive;
TMyDataSet(Self.DataSource).OnActive := _OnActiveDataSet;
Luego cuando ejecutes el tuyo deberás hacer:
Código Delphi
[-]
...
if Assigned(OldActiveDataSet) then
OldActiveDataSet(parametros_segun_tipo);
end;
...