如何在消息里传递接口?(100分)

  • 主题发起人 主题发起人 SeaHawk
  • 开始时间 开始时间
我觉得也是这个问题,在用OLEcontainer的时候如果启动第二个Word实例,就会无法返回,
OLEcontainer无法响应鼠标,我认为是启动第二个实例的时候活动窗口改变了,但是却没
有办法恢复,关掉第二个实例也没办法。你有高招吗?
 
试验一下:
procedure TForm1.ComboBoxEventChange(Sender: TObject;
var ctrl: _CommandBarComboBox);
var cV: olevariant;
begin
PostMessage(Form1.Handle,WB_COMBOBOXCHANGE,0,LongInt(Pointer(ctrl)));

end;

procedure TForm1.WBComboBoxChange(var Msg: TMessage);
var Combo1: IUNKnown;
begin
combo1:=IUNKnown(Pointer(Msg.LParam))
此处转换出现错误!
end;
 
huiZhang兄:
多谢多谢!你的办法可以!给你加分!

seahawk
 
后退
顶部