🚀 go-pugleaf

Linces wrote:
> How i create a Main Menu item in the Delphi IDE "Like GExperts do", i do 
> like code below, but dont work, plz look:

When reporting problem, it is best to provide more information about what 
isn't working.  For example, is there a menu item but it is disabled, do you 
get a crash, or do you get no menu item at all?  Have you set breakpoints in 
your code to see what is failing?  If so, where does it fail?

> type
>   TADPCHStickerWizard = class(TNotifierObject, IOTAWizard, IOTAMenuWizard)

IOTAMenuWizard is only meant to create a help menu item for your addin.  It 
isn't designed to add menu items anywhere in the main menu.

> procedure Register;

Set a breakpoint here, and be sure your addin is loading.

> procedure TADPCHStickerWizard.Execute;

This only runs when the user selects your help menu item, which probably 
isn't what you want.

> procedure InitWizard;

You probably don't want this to be an empty method.

If you have access to Delphi 7, look at the "D7IOTA.HLP" file for help on the 
OTA.  Also, see here for some examples:
http://www.gexperts.org/opentools/

Erik