resultado de um select no panel delphi

Delphi

27/06/2017

Pessoal , Boa tarde.
Por favor, alguém pode mostrar onde estou errando ?
Tenho este select abaixo , onde o resultado quero que apareça em um panel (ou algo parecido).
Mas sempre que executo ele dá erro de QRY1: Field 'ESTADOROMANEIO' not found , sendo que este campo possui na lista do field

begin
with QRY1 do
begin
CLOSE;
sql.Clear;
sql.Text := 'select codigoromaneio,dataemissao,datamovimento from romaneio where estadoromaneio =' + '1';
open;
Pnldatas.caption :=CurrToStr(FieldByName('ESTADOROMANEIO').AsCurrency);

end;
end;
end;
end;

Quem puder me ajudar agradeço muito
Watson

Watson

Curtidas 0

Respostas

Natanael Ferreira

Natanael Ferreira

27/06/2017

Faltou incluir este campo no select.

Teste assim:

with QRY1 do
begin
CLOSE;
sql.Clear;
sql.Text := 'select codigoromaneio,dataemissao,datamovimento,estadoromaneio from romaneio where estadoromaneio =' + '1';
open;
Pnldatas.caption :=CurrToStr(FieldByName('ESTADOROMANEIO').AsCurrency);
end;
GOSTEI 0
Watson

Watson

27/06/2017

Natanael , Obrigado pelo retorno. Cara acho que estou fazendo algo errado.
O que vc me passou deu certo , mas o resultado era para ser assim, como mostra abaixo :

16024 2017-05-08 00:00:00 2017-05-08 00:00:00
16026 2017-05-08 00:00:00 2017-05-08 00:00:00
15986 2017-05-05 00:00:00 2017-05-05 00:00:00
16042 2017-06-27 00:00:00 2017-06-27 00:00:00

Só que o resultado apareceu o apenas o numero 1 .
Sabe me dizer novamente onde estou errando ?
Muito Obrigado.
GOSTEI 0
Igor Lisboa

Igor Lisboa

27/06/2017

Watson, creio que talvez seu erro esteja aqui:

sql.Text := 'select codigoromaneio,dataemissao,datamovimento,estadoromaneio
[b]from romaneio where estadoromaneio =' + '1'; [/b]
open;
[b]Pnldatas.caption :=CurrToStr(FieldByName('ESTADOROMANEIO').AsCurrency);[/b]


No caption, você está jogando o valor do "EstadoRomaneio", e lá em cima você setou uma condição pra buscar apenas o EstadoRomaneio = 1. Creio que para você exibir como deseja é necessário fazer da seguinte forma:

Pnldatas.caption :=  FieldByName('codigoromaneio').AsString+' '+FieldByName('dataemissao').AsString+' '+FieldByName('dataemissao').AsString;


Caso tenha erro com o AsString, é só ver o tipo do campo na sua tabela e fazer a conversão. Espero que isso dê certo e resolva sua dúvida.
GOSTEI 0
Natanael Ferreira

Natanael Ferreira

27/06/2017

Repare nesta linha do código:

Pnldatas.caption :=CurrToStr(FieldByName('ESTADOROMANEIO').AsCurrency);

Nela você está programando para o Panel receber apenas o conteúdo do campo 'EstadoRomaneio'.

Além disso, irá aparecer apenas o registro corrente (primeiro registro).

Te aconselho a utilizar o DBGrid que para mostrar o resultado que você espera.
GOSTEI 0
Igor Lisboa

Igor Lisboa

27/06/2017

Me desculpe, mas acabei colocando duas vezes o campo "dataemissao", aqui está o correto.

Pnldatas.caption := FieldByName('codigoromaneio').AsString+' '+FieldByName('dataemissao').AsString+' '+FieldByName('datamovimento').AsString;
GOSTEI 0
Watson

Watson

27/06/2017

Natanael/Igor , obrigado pela ajuda !
Natanael , desculpe a persistência, exatamente isso que estou querendo mostra todos os registro desse select .
No DBGRID como eu faço isso ?

Mais uma vez obrigado pela paciência.

Att
Watson
GOSTEI 0
Watson

Watson

27/06/2017

Caso queiram ,posso mostrar o que estou criando , por favor me add no skype rocha325
GOSTEI 0
Watson

Watson

27/06/2017

Pessoal Bom dia. Quem puder me ajudar nesta questão agradeço muito.

Obrigado.

Watson
GOSTEI 0
Natanael Ferreira

Natanael Ferreira

27/06/2017

Natanael/Igor , obrigado pela ajuda !
Natanael , desculpe a persistência, exatamente isso que estou querendo mostra todos os registro desse select .
No DBGRID como eu faço isso ?

Mais uma vez obrigado pela paciência.

Att
Watson


Você vai precisar dos seguintes componentes:

- DBGrid;
- Query;
- Datasource;

Procedimentos:

* Use o Query(QRY) para executar a sua consulta.
* Use o Datasource para ligar ao Query através da propriedade DataSet
* Vincule a propriedade DataSource do DBGrid ao objeto DataSource;

Use o código abaixo:

with QRY1 do 
begin 
CLOSE; 
sql.Clear; sql.Text := 'select codigoromaneio,dataemissao,datamovimento,estadoromaneio from romaneio where estadoromaneio =' + '1'; open; 
end;
GOSTEI 0
Natanael Ferreira

Natanael Ferreira

27/06/2017

Se tiver dúvidas, dê uma olhada neste tópico:

http://www.activedelphi.com.br/forum/viewtopic.php?p=18268&sid=98813f9a98d9c1a8d02f7e1920e7d2c2
GOSTEI 0
Judithdominguez

Judithdominguez

27/06/2017

OBTENER IELTS, TOEFL Certificados en línea sin exámenes,(ruizgomez990@gmail.com)


Ofrecemos a nuestros clientes exclusivos la posibilidad de obtener certificados IELTS, TOEFL, GMAT, GRE, TOEIC, ESOL AUTODESK sin necesidad de realizar los exámenes. Las regiones que cubrimos son Asia, Emiratos Árabes Unidos, Qatar, Omán, Arabia Saudita, Jordania, Kuwait, Australia, Canadá y Europa.Trabajamos con funcionarios de inspección de "hombres internos" que trabajan en las distintas unidades de base de datos que están a cargo y capaces de garantizar la entrada de su información en la base de datos respectiva sin ningún problema. ¡Los certificados que emitimos son legítimos y verificables !!!!

email us at: (ruizgomez990@gmail.com)
email us at: (ruizgomez990@gmail.com)
whatspp....+237683183167
contact... (+237683183167)

comprar pasaportes, IELTS licencia de conducir, tarjetas de identidad....... whatapp +237683183167
Si usted necesita pasaportes, conduciendo
licencias, tarjeta de identidad, certificados de matrimonio, diplomas,
tarjetas de crédito, facturas, certificados de nacimiento, seguro social
tarjetas de residencia, permisos, certificados de defunción, tarjetas de marinero,
por favor, póngase en contacto con
Somos el real y sólo productores de falsos y reales
pasaporte, licencia de conducir, tarjetas de identidad, sellos, nacimiento
certificados, diplomas y muchos otros


Compre un TOEFL o IELTS completamente verificado por Accredited University
COMPRAR IELTS CERTIFICATES- Calificaciones
Certificado IELTS sin asistir al examen
El certificado IELTS es un paso importante en tu educación
Compre Sistema Internacional de Pruebas de Lenguaje Inglés (IELTS)

Comprar British Council IELTS certificados
Comprar British Council IELTS certificados
Comprar British Council IELTS certificados
Comprar British Council IELTS certificados
Comprar British Council IELTS certificados
Comprar British Council IELTS certificados
Comprar British Council IELTS certificados
Comprar British Council IELTS certificados
Comprar British Council IELTS certificados

Comprar certificado original IELTS sin examen en United Arab Emitates, UAE, DUbai
Comprar certificado original IELTS sin examen en Jordanz
Comprar certificado original de IELTS sin examen en Jordania
Compre certificado original IELTS sin examen en Arabia Saudita
Comprar certificado original IELTS sin examen en DUbai
Comprar certificado original IELTS sin examen en Kuwait
Comprar certificado original de IELTS sin examen en Qatar
Comprar certificado original IELTS sin examen en Singapur

Compre certificado IELTS en espana
Vendemos Certificados IELTS Registrados
Compre certificado IELTS en Australia
Compre certificado IELTS en Dubai
Comprar certificado IELTS en India
Comprar certificado IELTS en Karachi
Comprar certificado IELTS en Malasia
Comprar certificado IELTS en Nepal
Comprar certificado IELTS en uae
Comprar certificado IELTS en Singapur
Comprar certificado IELTS online
Comprar certificado IELTS UK
Compre certificado IELTS sin examen
Comprar certificados IELTS reales qld
Certificado IELTS del British Council
Certificado IELTS del British Council perdido
Comprar British Council IELTS certificados online
Comprar British Council IELTS certificados qld
Comprar British Council IELTS certificados uk
Certificado IELTS del British Council
Certificado IELTS del British Council
Comprar British Council IELTS certificados online
Comprar British Council IELTS certificados qld
Comprar British Council IELTS certificados uk
Comprar certificado IELTS en Australia
Comprar certificado IELTS en dubai
Comprar certificado IELTS en la India
Comprar certificado IELTS en karachi
Comprar certificado IELTS en malasia
Comprar certificado IELTS en nepal

Certificados IELTS en línea en United Arab Emitates, UAE, DUbai
Certificados IELTS Online en Bahrein
Certificados IELTS en línea en Argelia
Certificados IELTS en línea en Arabia Saudi

Comprar certificado original IELTS sin examen en Dubai
Certificado IELTS sin examen en Kuwait
Comprar certificado original IELTS sin examen en Qata
Certificado IELTS sin examen en Singapur
Comprar certificado original IELTS sin examen en singapur

email us at: (ruizgomez990@gmail.com)
email us at: (ruizgomez990@gmail.com)
whatspp....+237683183167
contact... (+237683183167)


Identidad y pasaportes de calidad, certificados de matrimonio y
Licencia de conducir, etc comprar ahora de alta calidad-Tenemos el mejor

Todos nuestros certificados IELTS son originales y están certificados por British Council. ¡No hacemos certificados IELTS falsos!
Si desea viajar, estudiar o trabajar en el extranjero, obtenga nuestro IELTS, TOEFL, ESOL AUTODESK
CERTIFICADOS sin examen de asistencia.
Comuníquese con nosotros directamente con detalles sobre la puntuación de la banda requerida y la fecha de la prueba para la que necesita el certificado y nos pondremos en contacto con usted con los procedimientos.
No dude en ponerse en contacto directamente con nosotros a través del

email us at: ruizgomez990@gmail.com
email us at: (ruizgomez990@gmail.com)
whatspp....+237683183167
contact... (+237683183167)
GOSTEI 0
POSTAR