Como fazer o query funcionar?

Delphi

13/09/2009

Boa tarde a todos,

Eu estou tentando colocar em prática [url=https://www.devmedia.com.br/articles/viewcomp.asp?comp=11759&hl=*chat*]ESTE[/url] artigo que ensina como criar um chat estilo MSN com delphi.

Eu estou usando o Delphi 2007, com Indy 10 e Zeos para se ligar ao BD.

Porém no tutorial está ensinando a usar com o dbExpress e estou com problema para entender como eu usaria 

while not qrysuporte.eof do
 begin
   listasuporte.append(´listasuporte||´ +
[u] qrysuporteid_suporte.asstring + ´||´ +
 qrysuporteapelido.asstring + ´||´+
 qrysuporteonline.asstring + ´||´+
 qrysuportestatus.asstring+ ´||´);[/u]
 qrysuporte.next;
 end;


As linhas sublinhadas não funcionam no Zeos, como eu faço pra funcionar?

PS: todos os scripts tão no link que eu postei ali em cima.


Estudante Corrupto

Estudante Corrupto

Curtidas 0

Respostas

Estudante Corrupto

Estudante Corrupto

13/09/2009

Consegui resolver, mas agora estou com uma dúvida...

Eu quero baixar o arquivo desse exemplo
https://www.devmedia.com.br/articles/viewcomp.asp?comp=11759&;hl=*chat*

Mas onde está o link pra baixar??

Obrigado!!!


GOSTEI 0
POSTAR