Defines a procedure to be called when a TDataModule class is created.
AddDataModule: procedure (DataModule: TDataModule) of object = nil;
procedure (DataModule: TDataModule) of object AddDataModule = nil;
Classes
If the AddDataModule variable is set, both Create and CreateNew will invoke the procedure it defines, passing itself in the Sender parameter.
Copyright(C) 2008 CodeGear(TM). All Rights Reserved.
|
What do you think about this topic? Send feedback!
|