-создаешь 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, на старше не могу проверить - нет. т.к. твой лого будет последним, то поймать его будет не всегда возможным - среда запустится.