Some help with old customized components

rbuser

Hi all,

I'm trying to upgrade/update some old components that where used by an
old app that used to use RB 7.x. As I have upgraded almost everything
with RB 10.x this is most probably one of that last old comps that I
need to upgrade.

It has 2 protected declarations and 1 public one that gives some errors.

TSpecDBImage = class (TppCustomImage)
...
protected
procedure CreatePopupMenu(aOwner: TComponent; var aPopupMenu:
TppPopupMenu); override;

procedure PaintDesignControl(aCanvas: TCanvas); override;

and

TSpecImage = class(TppImage)
...
procedure PopupMenuClick(Sender: TObject); override;

all of these give a:

Method 'CreatePopupMenu' not found in base class
Method 'PaintDesignControl' not found in base class
Method 'PopupMenuClick' not found in base class

Could I get some help on where these methods went?

Thanks a lot
Andrew S. Vaz

nicocizik

Hi Andrew,

Take a look at the custom component example located in the
\RBuilder\Demos\RCL directory for an example of the new architecture changes
with later versions of ReportBuilder. The popup menus and design controls
have been separated out to provide a cleaner design.

---------------------------------------
Article: RB 9 Architecture Changes
---------------------------------------

ReportBuilder 9 includes architecture changes to more cleanly separate
Designer code from Report code. The code related to component popup menus
and design controls has been broken out into separate classes.

For an example, check out RBuilder\Demos\RCL.


The myChkBox.pas unit contains the component classes....


TppCustomComponent

|
|

TMyCustomCheckBox

|
|-- TmyCheckBox
|
|-- TmyDBCheckBox


The myChkBoxDesign.pas unit contains popup menu and design control classes.
These are compiled into a separate package.


A. Popup Menu classes....

TppComponentPopupMenu

|
|

TmyCustomCheckBoxPopupMenu

|
|-- TmyCheckBoxPopupMenu
|
|-- TmyDBCheckBoxPopupMenu


B. Design Control classes.....



TmyCustomCheckBoxControl

|
|

TmyCustomCheckBoxPopupMenu

|
|-- TmyCheckBoxControl
|
|-- TmyDBCheckBoxControl

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com