Exibindo imagens bitmap em um DBNavigator
Muitas aplicações utilizam o componente DBNavigator para manipular seus dados. Esta dica permite exibir imagens com extensão .BMP em um DBNavigator possibilitando a construção de uma barra de controle com interface personalizada. Veja o código abaixo:
procedure TForm1.FormCreate(Sender: TObject);
var
c, d: Tbitmap;
begin
c := Tbitmap.Create;
c.LoadFromFile('C:\windows\ondas.bmp');
newtypenav(dbnavigator1).buttons[nbinsert].Glyph := c;
d := TBitmap.Create;
d.LoadFromFile('C:\windows\egito.bmp');
newtypenav(dbnavigator1).buttons[nbdelete].Glyph := d;
end;
Para utilizar esta dica coloque o seguinte código na seção Type:
NewTypeNav = class( TDbNavigator );
É importante lembrar que as imagens devem estar no diretório especificado no código.