Поплавок в Delphi

[Guest]

Люди хелп.
Надо в Delphi вывести не главную форму поверх всех окон системы (не только приложения).
Хочется что-то типа корзина flashget'а.
Идеи?

 

[Barmutik]

Сам решал когда-то такой вопрос ...

Перекрой CreateParams и всё должно работать:

procedure TXXX.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
with Params do begin
 ExStyle := ExStyle or WS_EX_TOPMOST;
 WndParent := GetDesktopwindow;
end;
end;

Если возникнут проблемы спрашивай дополнительно...