У меня довольно простой и относительно идиотский вопрос, с помощью какого события и как фиксировать нажата ли мышь, суть в том что при удерживании нажатой мышку над кнопкой должна делаться одна команда, при отпускании другая. Расчитываю на скорейшую помощь.
У меня довольно простой и относительно идиотский вопрос, с помощью какого события и как фиксировать нажата ли мышь, суть в том что при удерживании нажатой мышку над кнопкой должна делаться одна команда, при отпускании другая. Расчитываю на скорейшую помощь.
английский надо учить, OnMouseDown, OnMouseUp. если нет такого события то обрабатывать сообщения WM_LBUTTONDOWN, WM_LBUTTONUP
__________________
TAleD = class(TUser) public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList); end;