[delphi-br] Checar data
Olá a todos Estou chegando duas datas se a segunda data for maior que a primeira, ele aborta o lançamento. minha dúvida e que mesmo a segunda data ser anterior a primeira, ele aborta o lançamento estou utilizando sqlserver IF DBEdit19.text DBEdit13.text Then begin ShowMessage('Erro!!!, Nota so podera ser lançada quando a data do estoque estiver em '+ DBEdit19.text + ''); DBEdit17.setfocus; abort; end; Atenciosamente, Sérgio E. Santo Depto. Gestão US - US 001 ges...@premiumalimentacao.com.br Premium - Responsabilidade e Garantia na Pratica Diária de Bem Atender 11 - 3378-4501 35 - 3422-9949 11 - 8498-4582 visite nosso site... www.premiumalimentacao.com.br A Premium é uma concessionária moderna e ágil quando o assunto é solução em alimentação coletiva, atuando em todo o interior dos estados de São Paulo e Minas Gerais desde1998 e pronta para atuar em todas as regiões do país, esta preparada para oferecer produtos e serviços com excelência em qualidade nos segmentos da indústria, saúde, comércio e serviços, educação, agro-negócio e outros onde nossas soluções sejam bem vindas. Possuimos um diversificado e flexível portifólio para soluções completas das necessidades dos Clientes e Consumidores. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Checar data
Olá Faltou a pergunta!!! mas tente usar o exit, outra coisa transforme o data que esta em String para Date para fazer a comparacao. fui.. Jancarlos P. Martins Em 10 de maio de 2010 09:05, Gestão - Premium sergioinf...@yahoo.com.brescreveu: Olá a todos Estou chegando duas datas se a segunda data for maior que a primeira, ele aborta o lançamento. minha dúvida e que mesmo a segunda data ser anterior a primeira, ele aborta o lançamento estou utilizando sqlserver IF DBEdit19.text DBEdit13.text Then begin ShowMessage('Erro!!!, Nota so podera ser lançada quando a data do estoque estiver em '+ DBEdit19.text + ''); DBEdit17.setfocus; abort; end; _ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Checar data
faz o s:eguinte IF DBEdit19.data DBEdit13.date Then begin ShowMessage('Erro!!!, Nota so podera ser lançada quando a data do estoque estiver em '+ DBEdit19.text + ''); DBEdit17.setfocus; abort; end; Em 10 de maio de 2010 09:17, Jancarlos Martins jancarlos.mart...@gmail.comescreveu: Olá Faltou a pergunta!!! mas tente usar o exit, outra coisa transforme o data que esta em String para Date para fazer a comparacao. fui.. Jancarlos P. Martins Em 10 de maio de 2010 09:05, Gestão - Premium sergioinf...@yahoo.com.br sergioinfosp%40yahoo.com.brescreveu: Olá a todos Estou chegando duas datas se a segunda data for maior que a primeira, ele aborta o lançamento. minha dúvida e que mesmo a segunda data ser anterior a primeira, ele aborta o lançamento estou utilizando sqlserver IF DBEdit19.text DBEdit13.text Then begin ShowMessage('Erro!!!, Nota so podera ser lançada quando a data do estoque estiver em '+ DBEdit19.text + ''); DBEdit17.setfocus; abort; end; _ [As partes desta mensagem que não continham texto foram removidas] -- Nazareno Neto #507685 Desenvolvedor Delphi e Firebird http://www.delphisistemas.com.br nazarenon...@delphisistemas.com.br nazareno.nobr...@gmail.com [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Checar data
Bom dia, O problema aí, na minha opinião, é que vc está comparando as datas como String. Tem que compara-las com formato de data mesmo. Pegue o campo que alimenta o DBEdit e coloque o .asdatetime pra fazer a comparação, ou use o StrToDate(DBEdit19).text StrToDate(DBEdit13.text) Espero ter ajudado, Analucia Vardanega Analista/Programadora Stemmann Indústria e Comércio Ltda Porto Feliz - SP PABX: +55 (15) 3261-9190 http://www.stemmann.com.br www.stemmann.com.br _ De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Gestão - Premium Enviada em: segunda-feira, 10 de maio de 2010 09:05 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Checar data Olá a todos Estou chegando duas datas se a segunda data for maior que a primeira, ele aborta o lançamento. minha dúvida e que mesmo a segunda data ser anterior a primeira, ele aborta o lançamento estou utilizando sqlserver IF DBEdit19.text DBEdit13.text Then begin ShowMessage('Erro!!!, Nota so podera ser lançada quando a data do estoque estiver em '+ DBEdit19.text + ''); DBEdit17.setfocus; abort; end; Atenciosamente, Sérgio E. Santo Depto. Gestão US - US 001 ges...@premiumalime mailto:gestao%40premiumalimentacao.com.br ntacao.com.br Premium - Responsabilidade e Garantia na Pratica Diária de Bem Atender 11 - 3378-4501 35 - 3422-9949 11 - 8498-4582 visite nosso site... www.premiumalimentacao.com.br A Premium é uma concessionária moderna e ágil quando o assunto é solução em alimentação coletiva, atuando em todo o interior dos estados de São Paulo e Minas Gerais desde1998 e pronta para atuar em todas as regiões do país, esta preparada para oferecer produtos e serviços com excelência em qualidade nos segmentos da indústria, saúde, comércio e serviços, educação, agro-negócio e outros onde nossas soluções sejam bem vindas. Possuimos um diversificado e flexível portifólio para soluções completas das necessidades dos Clientes e Consumidores. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RE: RES: [delphi-br] Checar data
Mais uma coisa. Valores de campos de um dataset devem ser consultados usando objetos TField ou usando o método FieldByName() do DataSet, pois pode ocorrer de estar havendo alguma operação no dataset que não esteja ainda refletida no controle data-aware. Sds. To: delphi-br@yahoogrupos.com.br From: analu...@stemmann.com.br Date: Mon, 10 May 2010 09:08:40 -0300 Subject: RES: [delphi-br] Checar data Bom dia, O problema aí, na minha opinião, é que vc está comparando as datas como String. Tem que compara-las com formato de data mesmo. Pegue o campo que alimenta o DBEdit e coloque o .asdatetime pra fazer a comparação, ou use o StrToDate(DBEdit19).text StrToDate(DBEdit13.text) Espero ter ajudado, Analucia Vardanega Analista/Programadora Stemmann Indústria e Comércio Ltda Porto Feliz - SP PABX: +55 (15) 3261-9190 http://www.stemmann.com.br www.stemmann.com.br _ De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Gestão - Premium Enviada em: segunda-feira, 10 de maio de 2010 09:05 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Checar data Olá a todos Estou chegando duas datas se a segunda data for maior que a primeira, ele aborta o lançamento. minha dúvida e que mesmo a segunda data ser anterior a primeira, ele aborta o lançamento estou utilizando sqlserver IF DBEdit19.text DBEdit13.text Then begin ShowMessage('Erro!!!, Nota so podera ser lançada quando a data do estoque estiver em '+ DBEdit19.text + ''); DBEdit17.setfocus; abort; end; Atenciosamente, Sérgio E. Santo Depto. Gestão US - US 001 ges...@premiumalime mailto:gestao%40premiumalimentacao.com.br ntacao.com.br Premium - Responsabilidade e Garantia na Pratica Diária de Bem Atender 11 - 3378-4501 35 - 3422-9949 11 - 8498-4582 visite nosso site... www.premiumalimentacao.com.br A Premium é uma concessionária moderna e ágil quando o assunto é solução em alimentação coletiva, atuando em todo o interior dos estados de São Paulo e Minas Gerais desde1998 e pronta para atuar em todas as regiões do país, esta preparada para oferecer produtos e serviços com excelência em qualidade nos segmentos da indústria, saúde, comércio e serviços, educação, agro-negócio e outros onde nossas soluções sejam bem vindas. Possuimos um diversificado e flexível portifólio para soluções completas das necessidades dos Clientes e Consumidores. _ VOCÊ PODE TER 25 GB GRATUITOS PARA ARMAZENAR SEUS ARQUIVOS NA WEB. VEJA AQUI COMO. http://www.windowslive.com.br/public/product.aspx/view/1?cname=skydriveocid=Hotmail:MSN:Messenger:Tagline:1x1:skydrive:- [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html