скрола на мишке

← →
Oleg_teacher © (2007-07-23 15:32) [0]

Как можна обрабатывать сообщения скрола на мишке допустим для scrollboxa. Если можна то с примером

← →
Хельг © (2007-07-23 15:49) [1]

procedure TForm1.ScrollBox1MouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); begin //здесь пишеш что хочеш end;

← →
любитель поорать (2007-07-23 16:03) [2]

> [1] Хельг © (23.07.07 15:49)

Не, не так.

procedure TForm1.ScrollBox1BearWheel(Sender: TObject; Shift: TShiftState;
WheelDelta: Integer; BearPos: TPoint; var Handled: Boolean);
begin
//здесь пишеш что хочеш
end;

← →
MOO (2007-07-24 13:03) [3]

Удалено модератором

скрола на мишке Найти похожие ветки