Busca incremental em campo date

Delphi

11/05/2005

Ola pessoal. Criei um indice para o campo datanascimento, e tento fazer uma busca mas ele não faz. usei este comando:

procedure Tfrmlocalizapessoa.DateEdit1KeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
dmdados.tblfichapessoa.Locate(´datanascimento´,vararrayof([DateEdit1.date]),[lopartialkey])
end;

A busca pelo nome e cpf funciona normalmente, mas é que são campos varchar. Uso interbase 6 e delphi 7.

Agradeço muito qualquer ajuda!

Muito obrigado pela atenção!

Um forte abraço a todos!


Jorgerock

Jorgerock

Curtidas 0

Respostas

Bruno Belchior

Bruno Belchior

11/05/2005

Tente:
Locate(´datanascimento´,DateToStr(DateEdit1.Date),[loopartialkey]) 
pra um argumento só não é preciso usar VarArrayOf...


GOSTEI 0
Jorgerock

Jorgerock

11/05/2005

Muito obrigado pela atençao brunovicenteb.
Estranho. não funcionou. eu digito no dateedit e não faz nada. não dá nenhum erro mas também não acha o registro. Eu gravei a data em um campo varchar, daí eu faço a busca como string, mas eu precisava fazer com date, para se um dia precisar estrair mes dia e ano da data.
Mesmo assim valeu pela ajuda!
Um forte abraço!

O que pode ser que não dá certo?


GOSTEI 0
Rjun

Rjun

11/05/2005

Acredito que não de para fazer busca incremental com campos do tipo date. Quando você digita parte de uma data e tentar converter para o tipo date, dá erro.


GOSTEI 0
Jorgerock

Jorgerock

11/05/2005

Será que não é possivel. quem faz consulta por data de aniversário tem que registrar em string. eu fiz assim e funciona, mas não seria o certo.
Mesmo assim valeu pela atenção!
Se alguém tiver alguma idéia obrigado!
Um forte abraço a todos!


GOSTEI 0
POSTAR