Показать сообщение отдельно
  #4  
Старый 27.02.2015, 09:47
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

-создаешь bmp картинку 24*24*24bpp с логотипом. MESPLASH.bmp
-создаешь в блокноте файл ресурса MEComponentsReg.rc:
Цитата:
MESPLASH BITMAP "MESPLASH.bmp"
-компилируешь его в MEComponentsReg.res
Цитата:
brcc32 MEComponentsReg.rc
-в модуль где регистрируются компоненты (там где RegisterComponents(...)) добавляешь код:
Код:
unit MEComponentsReg;

interface

{$R *.res}

uses
  ToolsAPI,
...
procedure Register;
var
  Bitmap: TBitmap;
begin
  RegisterComponents('ME', [...]);
  Bitmap:=TBitmap.Create;
  try
    Bitmap.LoadFromResourceName(HInstance, 'MESPLASH');
    SplashScreenServices.AddPluginBitmap('ME Components', Bitmap.Handle);
  finally
    Bitmap.Free;
  end;
end;
-важно соответствие имен модуля и ресурса, либо импортировать ресурс {$R ...} по имени
это работает на Delphi 2010, на старше не могу проверить - нет. т.к. твой лого будет последним, то поймать его будет не всегда возможным - среда запустится.
__________________
Пишу программы за еду.
__________________
Ответить с цитированием