大家好!请问怎么在IE中响应activefrom里面的onpaint事件

Question

请问怎么在IE中响应activefrom里面的onpaint事件,有实例更好,先谢谢了

Answer 1

可能我没有把问题将清楚,我在一个activeXform里面画了一些图 但是在IE里面 如果是缩小再还原,或是挡住activeXform画面就消失,我在activeXform的onpaint里面些代码没有效果,请问怎么解决啊,如果是消息处理 怎么处理 如何获得加载控件的IE的句柄,望高手出现!分虽然不多但是我也就只有这些分了

Answer 2

我是直接把重画代码放到activexform的onpaint事件里面
可是IE在如果是缩小再还原,或是挡住activeXform画面都没有执行ONPAINT事件啊

Answer 3

<script language="javascript" for="activexname" event="onpaint">
  alert('你应该响应我了!');
</script>

Answer 4

谢谢 试了 只是能响应IE ON事件 响应不了 控件里面的ONPAINT事件啊

Answer 5

procedure msg_paint(var msg:TPaintStruct);message wm_paint;begin
 ShowMessage('paint');
 inherited;
end; 试试这个

Answer 6

郁闷发不了图片~在代码块的
procedure Tactiveform.paintenvent ;中加入你想要的

Answer 7

谢谢HeroicDragon和jiap1723  我先试试 成功回来结帖

Answer 8

试了不行  不知道是不是我的问题
procedure msg_paint(var msg:TPaintStruct);message wm_paint; begin 
ShowMessage('paint'); 
inherited; 
end; 
老是提示语法错误 我在前面加了类型名还是一样,不能通过编译.

Answer 9

procedure Tactiveform.paintenvent ;也没有效果 而且我看了里面代码 就是收到事件就执行form的onpiant  所以我想应该是在IE里面控件收不到事件