N�o sei se ajuda se � o que precisa, mas eu fa�o da seguinte maneira.
Coloca um ActionList da paleta Standard, clique duplo nele, clique com o direito do mouse na caixa que abriu (Editing...qq coisa) selecione "New Standar Action (CRTL + INS), seleciona os "Actions" pr� definidos (os caras da classe DataSet), l� vai ter datasetPrior, First, Next.... A LISTA DE ACTION que vc selecionou vc liga no seu DataSorce, clicando no action e mudando sua propriedade DataSource, depois � s� ligar os SpeedBotons a suas a��es, ou seja, a propriedade "Action" de cada SpeedBoton vc liga a uma a��o... Moleza..... Ah, vc ainda pode mudar os captions dos Actions, imagens (utilizando um image list).....inclusive, os actions se encarregam de habilitar e desabilitar os bottons pra ti, desta forma vc pode criar um "DBNavigator" inteiro personalizado e muito mais xiki....falow ?? Odair ----- Original Message ----- From: Alex Le�o To: [email protected] Sent: Wednesday, April 13, 2005 9:29 AM Subject: Re: [delphi-br] DBNavegator Personalizado Charlles, Verifique se � o final do arquivo (EOF) ... If not Table1.EOF Then Table1.next; Espero ter ajudado, Alex Le�o ----- Original Message ----- From: Charlles Ferdinand To: Delphi-Br Sent: Wednesday, April 13, 2005 9:13 AM Subject: [delphi-br] DBNavegator Personalizado Pessoal, Bom Dia, Estou presisando de uma ajuda de vcs, pois estou querendo implementar uma rotina no meu projeto. � o seguinte, coloquei 4 EspeedButton para controlar o posicionamento na tabela, como acontece no dbnavegator (primeiro, anterior, proximo e �ltimo), mas estou querendo fazer uma verifica��o. TfrmDependentes.click(Sender.......); If Dm.QryDependentes.Last Then SpeedButtonProximo.Enabled := DataSourceControle.State In [dsinactive]; Resumo estou querendo que ao se clicar no speed pr�ximo, ele corra uma posi��o dentro da tabela e verifique se � o ultimo registro, se for (verdadeiro) ent�o speedproximo e speedultimo fique inativo, como funciona o dbnavegator. Atenciosamente Charlles Ferdinand Analista Cont�bil [As partes desta mensagem que n�o continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um servi�o oferecido por: ------------------------------------------------------------------------------ Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que voc� faz do Yahoo! Grupos est� sujeito aos Termos do Servi�o do Yahoo!. [As partes desta mensagem que n�o continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um servi�o oferecido por: PUBLICIDADE -------------------------------------------------------------------------------- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que voc� faz do Yahoo! Grupos est� sujeito aos Termos do Servi�o do Yahoo!. [As partes desta mensagem que n�o continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que voc� faz do Yahoo! Grupos est� sujeito aos: http://br.yahoo.com/info/utos.html
