source: cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/EWB.inc@ 541

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

TMG Ver 1.1 Added HTML Support, better demographics editing

File size: 4.4 KB
Line 
1//*************************************************************
2// EWB.inc - Embedded Webbrowser definitions *
3// *
4// For Delphi 5, 6, 7 , 2005, 2006 & Turbo, *
5// 2007, 2009 *
6// Freeware unit *
7// by *
8// Eran Bodankin (bsalsa) *
9// bsalsa@bsalsa.com *
10// *
11// Documentation and updated versions: *
12// http://www.bsalsa.com *
13//*************************************************************
14{*******************************************************************************}
15{
16
17LICENSE:
18
19THIS SOFTWARE IS PROVIDED TO YOU "AS IS" WITHOUT WARRANTY OF ANY KIND,
20EITHER EXPRESSED OR IMPLIED INCLUDING BUT NOT LIMITED TO THE APPLIED
21WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A PARTICULAR PURPOSE.
22YOU ASSUME THE ENTIRE RISK AS TO THE ACCURACY AND THE USE OF THE SOFTWARE
23AND ALL OTHER RISK ARISING OUT OF THE USE OR PERFORMANCE OF THIS SOFTWARE
24AND DOCUMENTATION. [YOUR NAME] DOES NOT WARRANT THAT THE SOFTWARE IS ERROR-FREE
25OR WILL OPERATE WITHOUT INTERRUPTION. THE SOFTWARE IS NOT DESIGNED, INTENDED
26OR LICENSED FOR USE IN HAZARDOUS ENVIRONMENTS REQUIRING FAIL-SAFE CONTROLS,
27INCLUDING WITHOUT LIMITATION, THE DESIGN, CONSTRUCTION, MAINTENANCE OR
28OPERATION OF NUCLEAR FACILITIES, AIRCRAFT NAVIGATION OR COMMUNICATION SYSTEMS,
29AIR TRAFFIC CONTROL, AND LIFE SUPPORT OR WEAPONS SYSTEMS. VSOFT SPECIFICALLY
30DISCLAIMS ANY EXPRESS OR IMPLIED WARRANTY OF FITNESS FOR SUCH PURPOSE.
31
32You may use, change or modify the component under 4 conditions:
331. In your website, add a link to "http://www.bsalsa.com"
342. In your application, add credits to "Embedded Web Browser"
353. Mail me (bsalsa@bsalsa.com) any code change in the unit
36 for the benefit of the other users.
374. Please, consider donation in our web site!
38
39{*******************************************************************************}
40{$A+,B-,C-,E-,F-,G+,H+,I+,J+,K-,L+,M-,N+,O+,P+,Q-,R-,S-,T-,U-,V+,W+,X+,Y+,Z1}
41
42
43{$I EWB_jedi.inc}
44
45// Specify the modules to include:
46// To remove the extras, just put a dot in front of the $DEFINE. E.g. "{.$DEFINE USE_EwbTools}"
47// To include an extra, remove the dot.
48// Then re-compile the package.
49
50
51//---- EmbeddedWB.pas: ---------------------------------------------------------
52
53// ** Activated by default:
54
55// Use functions from EwbTools.pas as methods in EmbeddedWB
56{$DEFINE USE_EwbTools}
57
58// Enable Subclassing of TEmbeddedWB Child windows (focus issues, ActiveControl, TAB and ActiveControl)
59{$DEFINE Enable_SubClassChildWindows}
60
61// Enable Mouse Hook to catch WM_MOUSEWHEEL and set Focus on TEmbeddedWB while not active
62{$DEFINE Enable_AutoMouseWheelFix}
63
64// Enable FocusControl to catch CM_ACTIVATE (EWB focus issue when switching back to the application)
65{$DEFINE Enable_AutoFocusControl}
66
67// Enable FormWndProc "Hooking" to handle Dialog Boxes / Popups
68{$DEFINE Enable_HookParentFormWndProc}
69
70
71// ** Deactivated by default:
72
73
74// Enable DDE Support EwbDDE.pas
75{.$DEFINE USE_EwbDDE}
76
77// Enable MSHTML events (MSHTMLEvents.pas)
78{.$DEFINE Enable_EwbMSHTMLEvents}
79
80// Enable Mouse (OnEnter, OnLeave) Events in TEmbeddedWB (D5, D6, D7 only)
81{.$DEFINE Enable_MouseEnterLeaveEvents}
82
83// Enable OleCtrls Fix (experimental)
84{.$DEFINE USE_OleCtrlsFix}
85
86// Enable Debugging
87{.$DEFINE Enable_Debug}
88
89
90//---- EwbCore.pas ---------------------------------------------------------
91
92{$DEFINE USE_IOLECOMMANDTARGET}
93
94{.$DEFINE GETKEYPATH_HANDLERS}
95
96{.$DEFINE RESEARCH_MODE}
97
98//-------------------------------------------------------------------------
99
100
101//---- TEwbControl (EwbControlComponent.pas)-------------------------------
102
103 // Enable Property InternetFeatures in the Object Inspector.
104 {$DEFINE Enable_InternetFeatures}
105
106//-------------------------------------------------------------------------
107
108
109// Do not change:
110
111{$IFDEF Enable_AutoFocusControl}
112 {$DEFINE AutoUse_EwbControl}
113{$ENDIF Enable_AutoFocusControl}
114
115{$IFDEF Enable_AutoMouseWheelFix}
116 {$DEFINE AutoUse_EwbControl}
117{$ENDIF Enable_AutoMouseWheelFix}
Note: See TracBrowser for help on using the repository browser.