下面显示了“命令”下的“你好”类别:
unit Unit1;
interface
uses
SysUtils, Classes, ActnList, ImgList, Controls;
type
TDataModule1 = class(TDataModule)
ActionList1: TActionList;
ImageList1: TImageList;
ActionHello: TAction;
procedure ActionHelloExecute(Sender: TObject);
private
public
end;
var
DataModule1: TDataModule1;
implementation
{$R *.dfm}
uses
ToolsAPI, Dialogs;
procedure TDataModule1.ActionHelloExecute(Sender: TObject);
begin
ShowMessage('Hello, world!');
end;
var
Index: Integer = -1;
initialization
DataModule1 := TDataModule1.Create(nil);
Index := (BorlandIDEServices as INTAIDEInsightService).AddActionList(DataModule1.ActionList1);
finalization
if Index <> -1 then
(BorlandIDEServices as INTAIDEInsightService).RemoveActionList(Index);
FreeAndNil(DataModule1);
end.
dfm 只是一个带有动作列表、图像列表和动作的数据模块:
object DataModule1: TDataModule1
OldCreateOrder = False
Left = 218
Top = 134
Height = 215
Width = 306
object ActionList1: TActionList
Images = ImageList1
Left = 24
Top = 16
object ActionHello: TAction
Category = 'Hello'
Caption = 'Hello, World!'
ImageIndex = 0
OnExecute = ActionHelloExecute
end
end
object ImageList1: TImageList
Left = 88
Top = 16
Bitmap = {
494C010101000C000C0010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
0000000000003600000028000000400000001000000001002000000000000010
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000800080008000800086868600000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000008000800080008000FFFFFF00FFFFFF00C0C0C000868686000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000008000
800080008000FFFFFF00FFFFFF000000000000000000C0C0C000C0C0C0008686
8600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000868686008000800080008000FFFF
FF00FFFFFF000000000000000000800080008000800000000000C0C0C000C0C0
C000868686000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000008686860080008000FFFFFF000000
000000000000800080008000800080008000800080008000800000000000C0C0
C000C0C0C0008686860000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000008686860000000000000000008000
800080008000800080000080800000FFFF008000800080008000800080000000
0000C0C0C000C0C0C00086868600000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000008686860080008000800080008000
8000800080008000800080008000008080008000800080008000800080008000
800000000000C0C0C00000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080008000FFFFFF008000
80008000800080008000800080008000800000FFFF0000FFFF00800080008000
8000800080000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000080008000FFFF
FF0080008000800080008000800080008000800080000080800000FFFF0000FF
FF00800080008000800000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000008000
8000FFFFFF00800080008000800080008000008080008000800000FFFF0000FF
FF00800080008000800080008000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000080008000FFFFFF00800080008000800000FFFF0000FFFF0000FFFF008000
8000800080008000800000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000080008000FFFFFF00800080008000800080008000800080008000
8000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000080008000FFFFFF008000800080008000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000800080008000800000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000424D3E000000000000003E000000
2800000040000000100000000100010000000000800000000000000000000000
000000000000000000000000FFFFFF00FFFF000000000000FE3F000000000000
F81F000000000000E00F00000000000080070000000000000003000000000000
0001000000000000000000000000000000010000000000008001000000000000
C001000000000000E000000000000000F000000000000000F803000000000000
FC0F000000000000FE3F00000000000000000000000000000000000000000000
000000000000}
end
end
在这里,我将可选参数Description
和方法Category
的AddActionList
默认空字符串保留为“命令”和Category
操作列表中的值,但您可以指定自己的值,这些值将覆盖这些默认值。