Цитата:
Сообщение от praeeo
Здравствуйте!
Интересует вопрос, как назначить для правого щелчка мышью на каждой из кнопок не общую, а СВОЮ команду, как в случае со щелчком левой клавишей? Знаю, что можно на OnMouseDown и OnMouseOn свои команды повесить, но если кнопок много?
Спасибо!
|
Всмысле? Одно действие для множество кнопок? Если так то просто в поле Event'а прописать имя той же функции, ну можно конечно ещё отдельный компонент сделать... но это уже совсем. Это нужно?
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
|