TWebBrowser打印不全的问题、屏蔽TWebBrowser控件鼠标右健、其他有关TWebBrowser的问题(100分)

TWebBrowser打印不全的问题、屏蔽TWebBrowser控件鼠标右健、
其他有关TWebBrowser控制的问题

建议用 EmbedDedwb 控件代替Twebbrower控件，
twebbrower使用 ：http://eagleboost.myrice.com/issues/Materials/Articles/TWebBrowser.htm
用 EmbedDedwb 使用 http://www.euromind.com/iedelphi/

屏蔽TWebBrowser控件鼠标右健
自己加一PopupMenu控件，加一个ApplicationEvents控件到

下面IE是EmbedDedwb或者twebbrower控件
将panel中放EmbedDedwb panel的PopupMenu 指向PopupMenu1
procedure TfrmMain.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
var
mPoint: TPoint;
begin
if IsChild(IE.Handle, Msg.Hwnd) and
((Msg.Message = WM_RBUTTONDOWN) or (Msg.Message = WM_RBUTTONUP)) then
begin
GetCursorPos(mPoint);
PopupMenu1.Popup(mPoint.X, mPoint.Y);
Handled := True;
end;
end;

TWebBrowser
EmbedDedwb
在访问SINA网页的时候都会发现严重的问题有时会造成死循环请误必小心！