ну, в первую очередь, я бы наверное копнул в сторону UpdateLayeredWindow и WM_NCHITTEST... т.е. с помощью UpdateLayeredWindow создать окно с альфа каналом (просто загрузить 32-битную картинку), а с помощью оконного сообщения WM_NCHITTEST при клике на форме сообщать винде что кликнуто было не на нашу форму (т.е. окно не кликабельно)
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
|