Delphi Formular mit Timage und scrollbar

Thema durchsuchen

Ansicht

Themen-Optionen

Formular mit Timage und scrollbar

Ein Thema von Kralle · begonnen am 9. Jul 2009 · letzter Beitrag vom 9. Jul 2009

Vorheriger Beitrag

Nächster Beitrag

BrunoT

Registriert seit: 23. Jan 2003
Ort: Sandbeiendorf
360 Beiträge

Delphi 8 Professional

Re: Formular mit Timage und scrollbar

9. Jul 2009, 18:20

Hallo Kralle,

ich habe nun mal TScrollbox gegen TJvScrollbox von Jedi ausgetauscht. Somit ist zumindestens das Scrollen mit Maus möglich

markieren

Delphi-Quellcode:

			procedure TForm1.ScrollBox1MouseWheel(Sender: TObject; Shift: TShiftState;

  WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);

begin

   label1.Caption:=inttoStr(WheelDelta);

   if  WheelDelta>0 then

   ScrollBox1.ScrollBy(0,-5);

   if  WheelDelta<0 then

   ScrollBox1.ScrollBy(0,5);

end;