当我在我的包(一个 Delphi OTA/IDE 插件)中使用以下代码时:
unit uSplashRegister;
interface
implementation
{$R SPLASHREGISTER.RES}
uses
Classes, Windows, Graphics, ToolsAPI,DesignIntf;
ResourceString
strSplashScreenName = 'MyTestCaption';
procedure AddSplashText;
var
bmp: HBITMAP;
begin
bmp := LoadBitmap(FindResourceHInstance(HInstance), 'LOGO');
if assigned(SplashScreenServices) then
begin
SplashScreenServices.AddPluginBitmap(strSplashScreenName,bmp,false,'Registered');
end;
end;
initialization
AddSplashText;
end.
我在 Delphi XE 和 Delphi 2009 中看到文本“MyTestCaption”。然而,在 Delphi 2007 中,标题不可见。“已注册”一词可见,徽标也可见。
有人知道为什么我看不到标题吗?