📄 testplugin.dpr
字号:
library TestPlugIn;
uses
SysUtils,
Forms,
windows,
Classes,
frmTest in 'frmTest.pas' {TestForm};
{$R *.res}
procedure PlugInName(var PlugInName: Pchar);stdcall;
begin
PlugInName := '显示窗体';
end;
procedure PlugInDescribe(var PlugInDescribe: Pchar);stdcall;
begin
PlugInDescribe := '显示一个窗体';
end;
procedure PlugInNode(var PlugInNode: Pchar);stdcall;
begin
PlugInNode := '其它';
end;
procedure RunPlugIn();stdcall;
begin
with TTestForm.Create(nil) do
try
ShowModal;
finally
Close;
Free;
end;
end;
exports PlugInName,
PlugInDescribe,
PlugInNode,
RunPlugIn;
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -