Fórum Locate com chave composta com Data #342638
15/06/2007
0
Alguem saberia me dizer porque o locate abaixo nunca encontra um registro que já existe?
- gridDias.Cells[1,F] é uma data no formato texto
- gridDias.Cells[2,F] é uma hora no formato texto
- tbAgenda é um TIBDataset
- ... PK_AG_APONT PRIMARY KEY (CODIGO, TIPO, DATA, HORA);
Delphi5, Firebird1.5, IBX
if tbAgenda.locate(´codigo;tipo;data;hora´, VarArrayOf([mCodigo, mTipo, StrToDate(gridDias.Cells[1,F]), StrToTime(gridDias.Cells[2,F])]), [loPartialKey]) = true then begin // Achou, então edita ... end else begin // Não achou, então inclui ... end;
- gridDias.Cells[1,F] é uma data no formato texto
- gridDias.Cells[2,F] é uma hora no formato texto
- tbAgenda é um TIBDataset
- ... PK_AG_APONT PRIMARY KEY (CODIGO, TIPO, DATA, HORA);
Delphi5, Firebird1.5, IBX
Aerreira
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)