вот что я нашёл
было написано что эти стили которые выводяться поверх игр:
Window Styles:
WS_POPUP
WS_VISIBLE
WS_CLIPSIBLINGS
Extended Styles:
WS_EX_LEFT
WS_EX_LTRREADING
WS_EX_RIGHTSCROLLBAR
WS_EX_TOPMOST
WS_EX_TOOLWINDOW
WS_EX_LAYERED
куда мне название стиля вводить?
делал так но поверх игры нечего невыводиться:
Код:
procedure TForm1.Btn1Click(Sender: TObject);
var
Style : Longint;
begin
{старый стиль окна}
Style:=GetWindowLong(Btn1.Handle,WS_VISIBLE);
{меняем стиль окна}
Style:=Style or WS_OVERLAPPEDWINDOW;
SetWindowLong(Btn1.Handle,WS_VISIBLE, Style);
{обновление окна (Invalidate не сработает)}
SetWindowPos(Btn1.Handle, HWND_TOP, 0, 0, 0, 0,
SWP_NOMOVE or SWP_NOSIZE or SWP_NOZORDER or SWP_DRAWFRAME
or SWP_NOACTIVATE);
end;