source: cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/EwbDisableMouseWheelFix.pas@ 1725

Last change on this file since 1725 was 541, checked in by Kevin Toppenberg, 15 years ago

TMG Ver 1.1 Added HTML Support, better demographics editing

File size: 582 bytes
Line 
1(*
2
3This unit's purpose is to disable the MouseWheelFix even if Enable_AutoMouseWheelFix
4is defined in EWB.inc.
5
6EwbControl.MouseWheelFix is activated in the initialization section of the
7EmbeddedWB unit.
8To disable it, put this unit before the first form
9unit in your DPR 'uses' clause.
10
11Example:
12
13program Project1;
14
15uses
16 //..
17 EwbDisableMouseWheelFix,
18 Forms,
19 Unit1 in 'Unit1.pas' {Form1};
20 //..
21
22*)
23
24unit EwbDisableMouseWheelFix;
25
26interface
27
28uses
29 EWBMouseHook;
30
31implementation
32
33initialization
34 EWBEnableMouseWheelFix := False;
35
36end.
Note: See TracBrowser for help on using the repository browser.