gpt4 book ai didi

api - Delphi 代码示例编译不通过怎么办?

转载 作者:行者123 更新时间:2023-12-03 18:18:57 25 4
gpt4 key购买 nike

<分区>

这是我从 http://delphi.about.com/cs/adptips2004/a/bltip0104_4.htm 下载的代码示例

procedure WBLoadHTML(WebBrowser: TWebBrowser; HTMLCode: string) ;
var
sl: TStringList;
ms: TMemoryStream;
begin
WebBrowser.Navigate('about:blank') ;
while WebBrowser.ReadyState < READYSTATE_INTERACTIVE do
Application.ProcessMessages;

if Assigned(WebBrowser.Document) then
begin
sl := TStringList.Create;
try
ms := TMemoryStream.Create;
try
sl.Text := HTMLCode;
sl.SaveToStream(ms) ;
ms.Seek(0, 0) ;
(WebBrowser.Document as IPersistStreamInit).Load(TStreamAdapter.Create(ms)) ;
finally
ms.Free;
end;
finally
sl.Free;
end;
end;
end;

我正在使用 RAD Studio XE5,编译器提示 WebBrowser 实例的 ReadyState 和 Document 属性。

因此,在我来自的 Java 世界中,当某些 API 功能被 Java 之神弃用时,他们会在 API 中引用我应该做的事情。

这似乎不会发生在 Delphi 世界中。 TWebBrowser 类的 ReadyState 和 Document 属性只是从 API 中删除了。

我相信这里有人可以将这段代码编排好。但是,我需要找到更改 Delphi API 问题的通用解决方案。这不是我第一次遇到这种情况。

另一个例子是 TButton 曾经有一个名为 Caption 的属性,现在称为 Text。那个我不得不自己猜测。

所以我想我正在寻找的是 Delphi API 变更日志,最好是在线提供...

我在哪里可以找到这样的东西?

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com