[Himikat]

Msg.WParam
Подскажите пожалуйста что это за свойство и откуда берутся для него значения или от чего они зависят?
Вот процедура на прокрутку scrollbox'a, в которой есть это свойство, хотелось бы узнать про него побольше.

Код:

procedure TForm1.WMMOUSEWHEEL(var Msg: TMessage);
var
  zDelta: Integer;
begin
  inherited;
  if Msg.WParam < 0 then zDelta := -50 else zDelta := 50;
  with ScrollBox1 do
  begin
    if ((HorzScrollBar.Position = 0) and
        (zDelta > 0)) or
       ((HorzScrollBar.Position = HorzScrollBar.Range - ClientWidth) and
        (zDelta < 0)) then Exit;
    ScrollBy(zDelta, 0);
    HorzScrollBar.Position := HorzScrollBar.Position - zDelta;
  end;
end;

Заранее спасибо!

[Bargest]

Читай про WinAPI.
Когда твоей программе передается любое сообщение, то есть параметры MSG, WParam и LParam. Значение WParam и LParam зависит от сообщения.
Дальше открываем гугл, ищем слово WM_MOUSEWHEEL и первой ссылкой получаем что, где, когда и как там передается.

[Himikat]

Сообщение от Bargest

Читай про WinAPI.
Когда твоей программе передается любое сообщение, то есть параметры MSG, WParam и LParam. Значение WParam и LParam зависит от сообщения.
Дальше открываем гугл, ищем слово WM_MOUSEWHEEL и первой ссылкой получаем что, где, когда и как там передается.

Спасибо! Теперь все стало яснее!