TechTips

Olá pessoal, resolvi colocar uma dica bacana para quem desenvolve pacotes de componentes.

Quem utiliza o BDS já reparou que alguns packages, depois de carregados, exibem um pequeno bitmap de 24×24 px. com a descrição do pacote de ferramentas e a empresa desenvolvedora na tela de inicialização da IDE. Podemos citar entre eles o JediVCS, RemObjects, TMS Component Pack entre outros.

Neste pequeno artigo quero mostrar como é fácil e rápido personalizarmos nossos pacotes de componentes com este recurso que a IDE nos oferece.

Primeiramente devemos criar o nosso arquivo de recurso (.RES) com a imagem bitmap que irá ser apresentada na inicialização da IDE. Para isso você pode utilizar qualquer ferramenta de edição de recursos, até mesmo na linha de comando, compilando um arquivo texto com o aplicativo que a Code Gear nos disponibiliza, o BRCC32. Eu recomendo o XN Resource Editor(XRE), desenvolvido por Colin Wilson (Xana News), que além de ser muito bom é FREE. Para baixá-lo acesse o site: http://www.wilsonc.demon.co.uk/delphi.htm (vou utilizar ele como base para terminar este artigo mas você pode criar o arquivo da maneira que bem entender, desde que o recurso possua o mesmo nome deste exemplo ou você adapte este exemplo).

Criando o arquivo de recurso:

1. Dentro do XRE clique no menu “Resource” e selecione a opção “Import Image Resource”. Escolha uma imagem Bitmap de 24×24 px;
2. Após inserir esta imagem o XRE a adicionará no grupo “Bitmap” e o nome dela será “1″;
3. Clique no nome “1″ e renomeie para “SPLASH_TECHTIPS”;
4. Salve o arquivo com o nome SPLASH_TESTE.RES na pasta do seu projeto de componentes.

Criando a unit de registro do seu splash:

Crie uma unit em branco e adicione ao seu pacote de componentes com a seguinte estrutura:

unit SplashTeste;

interface

{$R SPLASH_TESTE.RES} 

implementation

uses
  Graphics, ToolsAPI;

procedure AddSplash;
var
  bmpAux : TBitmap;
begin
  bmpAux := TBitmap.Create;
  try
    bmpAux.LoadFromResourceName(HInstance, 'SPLASH_TECHTIPS');

    {$IFDEF VER180}
      SplashScreenServices.AddPluginBitmap('Meus componentes',
        bmpAux.Handle,
        False,
        'Licenciado para TechTips', '');
    {$ENDIF}

  finally
    bmpAux.Free;
  end;
end;

begin
  AddSplash;

end.

Agora recompile seu pacote de componentes e instale-o novamente.

Reinicie a sua IDE e veja o resultado!