// Declare um novo tipo na sua unit:
type
NewTypeNav = class( TDbNavigator );
// Depois é só utilizar:
NewTypeNav( DbNavigator1 ).Buttons[nbInsert].Glyph := ...