Fórum Consulta usando Query #175790

18/08/2003

0

Em minha tabela Paradox tenho um campo chamado “inicio&8221; do tipo &8220;date&8221;. Como faço uma consulta nesse campo de modo que o resultado apareça num DBGrid?
Usei o seguinte código:

QRAluno.Close;
QRAluno.SQL.Clear;
QRAluno.Sql.Add(´SELECT Malun,Nome,Cpf,Dvenc,Hora,Ini,Ter FROM Aluno´);
QRAluno.Sql.Add(´WHERE Ini = :VDDtaInc´);
QRAluno.Params[0].AsDateTime := StrTodate(Edit1.Text);
QRAluno.Open;

Mas ele fica só dando o erro. Ele está certo. Tem alguma outra forma de se fazer está consulta usando Query?

Denysk


Denysk

Denysk

Responder

Posts

18/08/2003

Rjanuzzi

Olá Denysk,

tente aí:

QRAluno.Params[0].[b:53b5578dc3]AsDate[/b:53b5578dc3] := StrTodate(Edit1.Text);


Responder

Gostei + 0

18/08/2003

Profjohnny

Olá Denysk, tente aí: QRAluno.Params[0].[b:20010e1acd]AsDate[/b:20010e1acd] := StrTodate(Edit1.Text);


Se naum der ceto tente usar uma formatação para data como FormatDateTime para inverter a data...
se eu naum estou enganado em sql a data é invertida assim
mes/dia/ano e naum como estamos acostumado dia/mes/ano

até mais colega...


Responder

Gostei + 0

19/08/2003

Vander Batista

Declare ua variável Data1 tipo TDateTime;


Passe o valor para ela de um edit:
Data1:=StrToDate(Edit1.Text);

Depois na Consulta chame:

QrAluno.Params[0].Value:=Data1;
ou
QrAluno.Params[0].AsDate:=Data1;


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar