activex form 在浏览器中,滚屏即显示混乱,好象 Repaint 又问题,救我!(100分)

  • 主题发起人 主题发起人 win1998
  • 开始时间 开始时间
W

win1998

Unregistered / Unconfirmed
GUEST, unregistred user!
activex form 在浏览器中,滚屏即显示混乱,好象 Repaint 又问题,救我!
env:
delphi 5.0
winnt 4.0 iis4.0
win2000 iis4.0
ie5.0
 
我也有同样的问题,有一位高手给我说。现已解决如下:
1:打开 delphi 下source/vcl/axctrls.pas
2: 到:
function TActiveXControl.SetObjectRects(const rcPosRect: TRect;
const rcClipRect: TRect): HResult;
var
WinRect: TRect;
begin
try
IntersectRect(WinRect, rcPosRect, rcClipRect);
// 原行 FWinControl.BoundsRect := WinRect;
// 修改如下 modify by xuan 2000.08.09
FWinControl.BoundsRect := rcPosRect
//〈--- n=modify this word
Result := S_OK;
except
Result := HandleException;
end;
3: save it
4: new project application
add axctsls.pas to this project, and then compile project,
late, copy axctrls.dcu to ..lib and overwirte old file axctrls.dcu !


宣舟灿
win1998@21cn.com

 
IE 5。O的问题换成5。01即可
 
多人接受答案了。
 
后退
顶部