用一個超全局變量控制一下,代碼邏輯如下:

GLOBALVARIABLE : MySend = 0;
if ISLASTBAR THEN
begin
   IF 條件 AND MYSend <> TIME THEN
   BEGIN
       MYSEND := TIME;
       //QQ發送代碼
   END;
end;