function SetTopmost(const WndCaption, WndClass: string): boolean;
var hWnd: THandle;
Rect: TRect;
begin
Result:=false;
hWnd:=FindWindow(Pchar(WndClass),Pchar(WndCaption));
if hWnd = 0 then Exit;
GetWindowRect(hWnd,Rect);
Result:=SetWindowPos(hWnd, HWND_TOPMOST,
Rect.Left, Rect.Top,
Rect.Right - Rect.Left,
Rect.Bottom - Rect.Top,
SWP_SHOWWINDOW);
end;
Как сделать "чужое" окно поверх остальных?
Зарание спасибо.
Цитата:
Originally posted by Serghei
сделать любое "чужое" окно поверх остальных
сделать любое "чужое" окно поверх остальных
Код:
Чтобы был эффект нужно знать как минимум класс окна, над которым издеваемся.
А если есть хэндл - то FindWindow не нужна