Fórum Deixar o Último Registro Inserido com o Foco #261521
11/12/2004
0
Eu tenho uam tela de visualização de revistas.. elas sao listadas depois que eu seleciono um grupo e um subgrupo específico.. faço uma pesquisa sql pra me listar somente as revistas daquele grupo e subgrupo selecionado.. essa pesquisa pra listar eu tb boto no evento onShow pra, quando eu inserir uma revista, ele me atualize o grupo/subgrupo e liste certinho.. mas sempre q ele faz isso, ele me seta na grid o 1º registro da lista.. e eu gostaria q ele me setasse o último cadastrado.. independente da posiçao q ele tiver, já q vai ser listado em ordem alfabética...
estou usando delphi 7 + firebird 1.5 + dbexpress..
grato pela atençao..
Allan Elias Ramos :roll:
Aersoftware
Curtir tópico
+ 0Post mais votado
12/12/2004
If DataModule.ClientDataSet.Eof then
begin
DbGrid.SetFocus;
end;
???
Allan Elias Ramos :roll:
Aersoftware
Gostei + 1
Mais Posts
11/12/2004
Gandalf.nho
Gostei + 0
12/12/2004
Ariovaldo
Crie uma variável publica:
Ex.: RegistroNac : TbookMark;
No comando de inserir vc coloca a seguinte linha:
RegistroNac := DmPrincipal.qry_clienteNac.GetBookmark;
if DmPrincipal.qry_clienteNac.state dsInsert then
RegistroNac := DmPrincipal.qry_clienteNac.GetBookmark;
if DmPrincipal.qry_clienteNac.BookmarkValid(RegistroNac) Then
Begin
DmPrincipal.qry_clienteNac.GotoBookmark(RegistroNac);
DmPrincipal.qry_clienteNac.FreeBookmark(RegistroNac);
End;
Espero ajudar
Gostei + 0
15/12/2004
Luiz_aquino
select * from tabela order by codigo MAX
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)