Delphi OTA接口 - AddPluginBitmap函数不显示标题

时间:2011-09-28 08:17:45

标签: delphi ota

当我在我的包中使用以下代码(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中,标题不可见。 “已注册”一词可见,徽标也是。

任何人都知道我为什么看不到标题?

0 个答案:

没有答案