OnMouseWheel

JaketheSnake · Beiträge: 149 XP D5 Prof.

Hallo erstmal

ich hab frolegnden code asuzug mitgebracht

Delphi-Quelltext

1:
2:
3:
4:
5:

procedure TSample3DForm.FormMouseWheelUp(Sender: TObject;
  Shift: TShiftState; MousePos: TPoint; var Handled: Boolean);
begin
     Tempo := 0.6;
end;

So ich will aber jetzt das wenn das Mausrad gedreht wird es immer um + 0.3 geht also
am anfang hab ich null , dann einmal drehen 0.3 , dann nochmal drehen 0.6 und so weiter

Ich weiß leider nicht wie ich das machen kann , könnt ihr mir vielleicht helfen ?

_________________
Good, better , best

JaketheSnake · Beiträge: 149 XP D5 Prof.

ok danke hat sich erledigt : www.delphi-forum.de/...ghlight=onmousewheel

_________________
Good, better , best

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme