Hudson Cavazin Postado Junho 12, 2007 Denunciar Share Postado Junho 12, 2007 existe alguma forma de alterar os icones do dbnavigator?grato, Hudson Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 HDELPHI Postado Junho 12, 2007 Denunciar Share Postado Junho 12, 2007 existe alguma forma de alterar os icones do dbnavigator?grato, HudsonPara modificar os icones do dbnavigatortype NewTypeNav = class( TDbNavigator ); No evento OnCreate do form, escreva o seguinte código: var c:Tbitmap;begin c:=Tbitmap.Create; c.LoadFromFile('C:\Insert.bmp'); newtypenav(dbnavigator1).buttons[nbinsert].Glyph:=c; Para mudar os Captions no DBNavigatorDBNavigator não possui uma propriedade para especificar os captions dos botões, então use o codigo abaixo: type TMeuDBNavigator = class(TDBNavigator);procedure TForm1.FormCreate(Sender: TObject);const Legendas: array[TNavigateBtn] of string = ( 'Primeiro', 'Anterior', 'Próximo', 'Último', 'Incluir', 'Excluir', 'Editar', 'Salvar', 'Cancelar', 'Atualizar');var Botao: TNavigateBtn;begin for Botao := nbFirst to nbRefresh do begin with TMeuDBNavigator(DBNavigator1).Buttons[botao] do begin Caption := Legendas[botao]; Layout := blGlyphTop; end; end;end;Espero que solucione o seu problema. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Hudson Cavazin Postado Junho 14, 2007 Autor Denunciar Share Postado Junho 14, 2007 belezavlw:D Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Hudson Cavazin
existe alguma forma de alterar os icones do dbnavigator?
grato, Hudson
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.