Показать сообщение отдельно
  #3  
Старый 22.02.2010, 12:14
Аватар для AleD
AleD AleD вне форума
Активный
 
Регистрация: 21.02.2009
Адрес: г.Краснокаменск
Сообщения: 383
Репутация: 91
По умолчанию

В принципе, теоретически это делается так: даблклик во всей системе можно перехватывать хуками (Hooks - ловушки), для этого правда нужна отдельная DLL (хуки только через библиотеки). Затем когда уже можем перехватывать двойной клик при этом самом клике получаем активное окно, если это рабочий стол получаем выделенный объект на рабочем столе, если вы не знаете, то рабочий стол это обычный TListView. Т.е. выделенный объект можно узнать с помощью общения программы с рабочим столом сообщениями.
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
Ответить с цитированием