Вопросы по программированию

← →
Владимир Макарович (2007-07-22 14:12) [0]

Доброе время суток.
Подскажитете, пожалуста как колёсиком мыши прокрутить компонент TScrollBox?
Как сделать всплывающую форму (наподобие панели Пуск в Windows)?
С уважением, Владимир

← →
Tack © (2007-07-22 15:04) [1]

procedure TForm1.ScrollBox1MouseWheel(Sender: TObject; Shift: TShiftState;
WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
with ScrollBox1.VertScrollBar do
begin
Position := Position - WheelDelta div 3;
end;
end;

Владимир Макарович (22.07.07 14:12)
Как сделать всплывающую форму (наподобие панели Пуск в Windows)?

Хм. А как и откуда она всплывает?

Вопросы по программированию Найти похожие ветки