Когда я использую следующий код в своем пакете (плагин 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.
Я вижу текст «MyTestCaption» в Delphi XE и Delphi 2009. Однако в Delphi 2007 заголовок не виден. Видно слово "Зарегистрировано", логотип тоже.
Кто-нибудь знает, почему я не вижу подписи?