Нажатие кнопки мыши, Builder 6.0 Опции

[Fanat]

Как описать событие которое должно рабатывать при нажатии кнопки мыши в окне формы?..
Если написать через OnMouseDown на форме то не отрабатывает при нажатии на любую кнопку...
а в задумке должно...и событие для каждого компонента отдельно писать не хочеться...(да и не нужно наверно)..

[volvo]

Не понял, а что ты хочешь чтоб делалось при нажатии на кнопку на форме? И фиксировалось событие нажатия (где-то централизованно) И нажималась кнопка?

[Fanat]

Не понял, а что ты хочешь чтоб делалось при нажатии на кнопку на форме? И фиксировалось событие нажатия (где-то централизованно) И нажималась кнопка?

Да, именно так...

[volvo]

Используй ApplicationEvents:

void __fastcall TForm1::ApplicationEvents1Message(tagMSG &Msg, bool &Handled)
{
	switch(Msg.message) {
		case WM_LBUTTONDOWN:
		{
			Memo1->Lines->Add("Left mouse button pressed...");
			break;
		}
	}
}

(Handled не установлен в true - сообщение "пропускается" дальше)...

[Fanat]

Создал новый проект...вставил туда эту функцию...описал её в TForm1...сохранил...щелкую...ничего не происходит...(Handled = false, нашёл в примере....на так тоже ничего не происхожит)...

[volvo]

Ты ApplicationEvents положил на форму? И что, ничего не появляется в Memo?

[Fanat]

Ты ApplicationEvents положил на форму? И что, ничего не появляется в Memo?

Во...спасибо...не положил...да и ещё надо была два раза по нему чтобы он её признал..