if com campo e data

Delphi

11/06/2004

Bom dia,

Minha duvida é a seguinte como que eu faço um if pegando um campo de uma query1 que é o campo [b:461fd7e00d]vendedor[/b:461fd7e00d] e outro campo de uma query que é o campo [b:461fd7e00d]data[/b:461fd7e00d]. Seria +- assim queria que fizesse o if do Vendedor [b:461fd7e00d]Francis[/b:461fd7e00d] e data [b:461fd7e00d]atual[/b:461fd7e00d].


agradeço


Coppola

Coppola

Curtidas 0

Respostas

Lucas Silva

Lucas Silva

11/06/2004

Você pode fazer assim:
if (vendedor = Francis) and (StrToDate(edit1.text) = Now) then // supondo que a data esteja em um edit.
// now é a data atual


Qualquer dúvida pode me dar o toque...

Até mais,
Lucas.


GOSTEI 0
Coppola

Coppola

11/06/2004

Se eu coloca dessa maneira dar erro:

if query1[´vendedor´]=´Adão´ and query1[´data´]=(StrToDate(edit1.text)) then
showmessage(´achou´)
else
showmessage(´nap achou´)

mas se colocar por parte nao dar erro, como poderia resolve isso?

agradeço


GOSTEI 0
Lucas Silva

Lucas Silva

11/06/2004

mas se colocar por parte nao dar erro, como poderia resolve isso?


if (query1.FieldByName(´vendedor´).AsString = ´Adão´) and
(query1.FieldByName(´Data´).AsDateTime = (StrToDate(edit1.text)) ) then



GOSTEI 0
Xanatos

Xanatos

11/06/2004

Se voce adicionar os campos no fields Editor faça assim:

if (query1vendedor.asString=´Adão´) and (query1data.Value=StrToDate(edit1.text)) then
showmessage(´achou´)
else
showmessage(´nap achou´)

Pode usar o FieldByName tambem!

E assim? :arrow:


GOSTEI 0
POSTAR