Note: You must be registered in order to post a reply. To register, click here. Registration is FREE!
T O P I C R E V I E W
bmesser
Posted - Jan 23 2013 : 03:15:16 Hi
Nice feature that it is I would like to disable zooming with the mouse wheel. I am using the wheel to flip though layers that I have pre-loaded in a TImageEnView component. That works fine I have some code in the OnMouseWheel event and before I come out I set the handled to true, which I would have thought would have cancelled out the zooming. I thought it might be in the MouseInteract properties but I've set them all false and still get the inbuilt zooming.
There must be a way to disable this but I can't find it can anyone help me out here.
Bruce.
2 L A T E S T R E P L I E S (Newest First)
bmesser
Posted - Jan 25 2013 : 08:06:01 Thanks Bill
w2m
Posted - Jan 23 2013 : 06:46:10 Set the TIEMouseWheelParamsAction = (iemwNone, iemwVScroll, iemwZoom) and remove your code in the OnMouseWheel event.
procedure TForm1.FormCreate(Sender: TObject);
begin
ImageEnView1.MouseWheelParams.Action := iemwNone;
end;
Search
