Скачать: CL | DM;

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

← →
Владимир Макарович   (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;

---

← →
Virgo_Style ©   (2007-07-22 17:18) [2]

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.019 c