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=skydrive&ocid=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


Responder a