Class TGUIDWizard (unit GUIDWizardExpt) |
Inherits from
TIExpert
Simple expert for inserting a GUID.
This is a useful demonstration of the usefulness of the
Open Tools API.
Copyright © 1997 Tempest Software, Inc.
constructor Create;
destructor Destroy;
procedure Execute;
The remaining methods are stubs.
function GetAuthor: string;
function GetComment: string;
function GetGlyph: HICON;
function GetIDString: string;
function GetMenuText: string;
function GetName: string;
function GetPage: string;
function GetState: TExpertState;
function GetStyle: TExpertStyle;
Error: no file, wrong number of views, etc.
procedure OnClick(Sender: TIMenuItemIntf);
fMenuItem : TIMenuItemIntf;
constructor Create;
destructor Destroy;
procedure Execute;
The remaining methods are stubs.
function GetAuthor: string;
function GetComment: string;
function GetGlyph: HICON;
function GetIDString: string;
function GetMenuText: string;
function GetName: string;
function GetPage: string;
function GetState: TExpertState;
function GetStyle: TExpertStyle;
Error: no file, wrong number of views, etc.
procedure OnClick(Sender: TIMenuItemIntf);
fMenuItem : TIMenuItemIntf;