Fórum Pesquisa com registros num edit #354385
26/02/2008
0
Olá pessoal,
Como faço para que os emails resultantes de uma pesquisa (SELECT DS_EMAIL FROM CONTATOS) sejam colocados lado a lado separados por virgula num edit? Exemplo: jose@bol.com.br,sandra@gamil.com,antonio@uol.com.br
Luiz
Como faço para que os emails resultantes de uma pesquisa (SELECT DS_EMAIL FROM CONTATOS) sejam colocados lado a lado separados por virgula num edit? Exemplo: jose@bol.com.br,sandra@gamil.com,antonio@uol.com.br
Luiz
L_carlos
Curtir tópico
+ 0
Responder
Posts
26/02/2008
Djjunior
seria isso ?
edit1.text := edit1.text + ResultadoPesquisa + ´,´
ou
edit1.text := edit1.text + ResultadoPesquisa + ´,´
ou
edit1.text := ´´; while not (qry.eof) do begin edit1.text := edit1.text + qryEmail.AsString + ´, ´; qry.next; end; edit1.Text := copy(edit1.text, 1, length(edit1.text) -2);//retira a última virgula
Responder
Gostei + 0
26/02/2008
L_carlos
Vlw DJJUNIOR. Funcionou perfeitamente. Obrigado.
Luiz
Luiz
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)