Fórum Mover para o próximo registro #227729

23/04/2004

0

Pessoal estou estudando delphi e mysql, e estou enfrentando problemas, já consegui fazer INSERT UPDATE ADD tudo beleza.

Mas não estou conseguindo fazer a navegação próximo e registro anterior, alguém poderia me ajudar passando um exemplo de como fazê-lo? Já estou a algumas horas tentando sem sucesso.

Eu estou tentando umar o .next

Grato a todos.


Mjs

Mjs

Responder

Posts

23/04/2004

Lucas Silva

Dá algum erro ou simplismente não dá o resultado esperado?


Responder

Gostei + 0

23/04/2004

Sgubert

Olá amigo.....

O delphi ja tem uma barra padraõ de navegação toda pronta, com a navegação, inclui, modifica, elimina, atualiza.......
E vc tb pode constriuir a sua barra utilizando apenas os eventos do TClientDataSet que faz tudo pra vc. é só adicionar o componente TEvents eu acho e adicionar os eventos que vc quer, dai é so manda criar a barra e ta tudu pronto.....
Não sei se fui muito claro, tb estou aprendendo e sem o delphi na frente para fazer passo a passo fica + dificil...hehehe

[]´s
Samuel


Responder

Gostei + 0

23/04/2004

Mjs

[quote:60c6ee3a42=´Lucas Alves Silva´]Dá algum erro ou simplismente não dá o resultado esperado?[/quote:60c6ee3a42]

Dá um erro, na hora que eu vou recuperar os dados pelo FieldByName.

O code tá +/- assim

qr.Active := False;
qr.Sql.Clear;
qr.Sql.Next
qr.Active := True;
if qr.Eof then
begin
MessageDLG(´Você já está no último registro, mtinformation, [mbok], 0);
edcod.Text := ´´;
end
else
begin
ednome.Text := qr.FieldByName(´nome´).Value;
end;
end


Responder

Gostei + 0

23/04/2004

Mjs

[quote:951b6aa089=´Lucas Alves Silva´]Dá algum erro ou simplismente não dá o resultado esperado?


Dá um erro, na hora que eu vou recuperar os dados pelo FieldByName.

O code tá +/- assim

qr.Active := False;
qr.Sql.Clear;
qr.Sql.Next
qr.Active := True;
if qr.Eof then
begin
MessageDLG(´Você já está no último registro, mtinformation, [mbok], 0);
edcod.Text := ´´;
end
else
begin
ednome.Text := qr.FieldByName(´nome´).Value;
end;
end
[/quote:951b6aa089]


Responder

Gostei + 0

23/04/2004

Mjs

Caro não entendi muito bem, mas é que eu gostaria de aprender o código também.

Olá amigo..... O delphi ja tem uma barra padraõ de navegação toda pronta, com a navegação, inclui, modifica, elimina, atualiza....... Samuel



Responder

Gostei + 0

23/04/2004

Lucas Silva

qr.Active := False; qr.Sql.Clear; qr.Sql.Next qr.Active := True;


Você não pode dar um [b:dfd57f2da7]Clear[/b:dfd57f2da7] na query, esse clear limpa o Sql da query...
Tenta tirar esta linha ai...´qr.Sql.Clear;´


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar