[DUG] descending from TWebModule

[David Brennan]

Phil,

Neither do TForm or TDataModule - they aren't meant to. TCustomModule is (to
my knowledge) a helper class used by DsgnIntf to provide the design time
interface used for Forms, DataModules, Frames, etc. 

TWebModule is a descendent of TDataModule. You should therefore be able to
use the standard TDataModuleDesignerCustomModule. That is:

 RegisterNoIcon([TPhilsWebModule]);
 RegisterCustomModule(TPhilsWebModule, TDataModuleDesignerCustomModule);

You could also make your own descendent of TDataModuleDesignerCustomModule
if you wanted but I doubt you actually want to change the designer
behaviour.

That should work fine unless TWebModules have a special designer (I don't
use them myself so I wouldn't know). If they do then you will need to try to
work out which unit contains the designer for TWebModule (which is a matter
of guessing since Delphi doesn't include the source code for most of these
design interface units). 

Unless of course I am misunderstanding what you are trying to do?

David.

-----Original Message-----
Unfortunately that didn't work since the TWebModule does not descend 
from TCustomModule.

Phil.

David Brennan wrote:

>Phil,
>
>....
>  
>
>procedure Register;
>begin
>  RegisterNoIcon([TDbbDataModule]);
>  RegisterCustomModule(TDbbDataModule, TDataModuleDesignerCustomModule);
>  RegisterNoIcon([TDbbForm]);
>  RegisterCustomModule(TDbbForm, TDbbFormCustomModule);
>
>  // Note: DON'T call RegisterNoIcon for TDbbFrame. This will disable copy
>and
>  // paste of TDbbFrame descendents and make it impossible to place a new
>  // TDbbFrame descendent on a form.
>  RegisterCustomModule(TDbbFrame, TDbbFrameCustomModule);
>
>end;
>
>
>...
>
>  
>
_______________________________________________
Delphi mailing list
Delphi at ns3.123.co.nz
http://ns3.123.co.nz/mailman/listinfo/delphi