代码之家 › 专栏 › 技术社区 › Jamie

将TWebBrowser转换为TWinControl

delphi

Jamie · 技术社区 · 17 年前

var
  WebBrowser: TWebBrowser;
begin
  WebBrowser := TWebBrowser.Create(Self);
  TWinControl(WebBrowser).Parent := Self;
  (WebBrowser as TWinControl).Parent := Self; // fail here
end

TWebBrowser中的Parent是只读IDispatch属性,但为什么第一个强制转换看到TWinControl父属性ok,而第二个则看不到?

1 回复 | 直到 17 年前

Toon Krijthe 17 年前

第一个cast不使用检查,它假定程序员是正确的,然后继续。我认为在这种情况下,编译器会因为相似的命名属性而感到困惑。它甚至可能是一个过于偏执的优化器。

至少

var
  wc : TWinControl;
begin
  wc := (WebBrowser as TWinControl);
  wc.Parent := Self;
end;

作品因此有一种规避。

推荐文章

zeus · 如何在调整数组大小后保持指向动态数组的指针有效?

1 年前

Arthur Araujo · Delphi类层次结构中TCustomXXX类的原因是什么

1 年前

Wolfgang Bures · 如何解决idHTTP中的错误10054

1 年前

IceCold · 由于TStyleManager,消息丢失。尝试设置样式

1 年前

SignalOne · 德尔福(FMX)循环参考

2 年前

Sascha Ott · 如何从线程调用线程的方法?

2 年前

user1580348 · 问题:如何在上次最小化后还原应用程序?

2 年前

user14668421 · 如何在Delphi VCL中将图像从PNG转换为BMP?

2 年前

tua · Delphi的TLinkLabel坏了吗?

2 年前

Frank.Wu · delphi:RGB到HSL不正确

2 年前