я вам раскрою один секрет, что-бы скрины в Steam были чистые.
Впринцепи, всё можно объяснить словом: WinApi.
Код
в модуль CvarDef.pas:
var
BitMap:TBitMap;
ScreenDC:HDC;
в функции HUD_Redraw, вместо
Engine.FillRGBA2 <..>
пишем:
Rectangle(ScreenDC, Round(DotPos.x - 2), Round(DotPos.y - 2), Round(DotPos.x + 2), Round(DotPos.y + 2));
Теперь, в BaseHook.dpr, спускаемся в самый низ, и вставляем:
ScreenDC := GetDC(0);
после INIT_ModuleInfo;
Всё, простая штучка, теперь запускаем CS в окне, и играем. Скрины будут чистые командой snapshot, и в стиме тоже в принцепи.
===
Псевдо антискрин:
procedure ClearScreen; cdecl;
begin
if ESPDot_Enabled = True then
begin
Engine.ClientCmd('off;wait;wait;wait;snapshot;wait ;wait;wait;on');
Print('ClearScreenShots :3');
end
else Engine.ClientCmd('snapshot');
end;
procedure Off; cdecl;
begin
if ESPDot_Enabled = True then ESPDot_Enabled := False else ESPDot_Enabled := True;
end;
procedure On; cdecl;
begin
if ESPDot_Enabled = False then ESPDot_Enabled := True else ESPDot_Enabled := False;
end;
Engine.AddCommand('on', @on);
Engine.AddCommand('off', @off);
Engine.AddCommand('CleanScreen', @CleanScreen);
Engine.ClientCMD('bind F12 CleanScreen');
Для myAC и EAC не работает, проверенно. Там только на Aero рисовать если, но у меня не 7 =(((