Delphi - база знаний


Как узнать, присутствует ли мышка?


Как узнать, присутствует ли мышка?




function MousePresent : Boolean; 
begin 
if GetSystemMetrics(SM_MOUSEPRESENT) <> 0 then   
  Result := true   
else   
  Result := false;   
end

Взято с Исходников.ru



Содержание раздела