HanDs
NO.2

[Delphi文章] 鸽子Plugin SDK 





学习中请遵循国家相关法律法规,黑客不作恶。没有网络安全就没有国家安全

本站需要登陆后才能查看

library test;

uses
Windows;

var
PluginRun: Boolean;   //当前插件状态

//获取插件当前运行状态
function GetPluginRun(): Boolean; stdcall;
begin
//MessageBox(0, '
获取插件运行状态!', 'By x140d4n[FAM]', 0);
Result := PluginRun;
end;

//插件停止运行
procedure PluginStop();
begin
//MessageBox(0, '插件停止运行!', 'By x140d4n[FAM]', 0);
PluginRun := False;
end;

//获取插件信息
function GetPluginInfo(): Pchar; stdcall;
begin
//MessageBox(0, '获取插件版本信息!', 'By x140d4n[FAM]', 0);
Result := '测试插件 0.1 By x140d4n[FAM]';
end;

//返回插件运行结果
function GetPluginResult(): Pchar; stdcall;
begin
//MessageBox(0, '获取插件返回信息!', 'By x140d4n[FAM]', 0);
Result := '运行成功!附加:我们要把老鼠送到异次元空间去';
end;

//插件运行主过程
procedure PluginFunc();
begin
//MessageBox(0, '插件执行主过程!!', 'By x140d4n[FAM]', 0);
PluginRun := True;   //设置插件执行状态
end;

exports
GetPluginRun, GetPluginResult, PluginStop, PluginFunc, GetPluginInfo;

begin
end.


学习中请遵守法律法规,本网站内容均来自于互联网,本网站不负担法律责任
鸽子
#1楼
发帖时间:2016-7-9   |   查看数:0   |   回复数:0
游客组