Erro desconhecido por mim...
Boa noite pessoal, estou tentando executar o seguinte comando:
FormAtendimento.IBQLocados.SQL.clear;
FormAtendimento.IBQLocados.SQL.Add(´update locados set data_loc=´+QuotedStr(data)+´ where cod_titulo=´ + QuotedStr(FormAtendimento.IBQAtivo.FieldValues[´cod_titulo´]) + ´ and cod_cliente= ´ + QuotedStr(FormAtendimento.EdCodCliente.Text));
porém está dando um erro:
´Conversion erro from string: 17/05/06´
Alguém pode me ajudar?
FormAtendimento.IBQLocados.SQL.clear;
FormAtendimento.IBQLocados.SQL.Add(´update locados set data_loc=´+QuotedStr(data)+´ where cod_titulo=´ + QuotedStr(FormAtendimento.IBQAtivo.FieldValues[´cod_titulo´]) + ´ and cod_cliente= ´ + QuotedStr(FormAtendimento.EdCodCliente.Text));
porém está dando um erro:
´Conversion erro from string: 17/05/06´
Alguém pode me ajudar?
Flaviobrazuca
Curtidas 0
Respostas
Weber
17/05/2006
SQL.Add(´update locados set data_loc=´+QuotedStr(FormatDateTime(´mm/dd/yyyy´,StrToDate(data)))+´ where ...
GOSTEI 0
Flaviobrazuca
17/05/2006
Simples... descobri ontem tb...
É só colocar o código de exibição no evento ondatachange do dataset que seleciona os valores da tabela.
Ex.:
Valew...
É só colocar o código de exibição no evento ondatachange do dataset que seleciona os valores da tabela.
Ex.:
procedure TFormClientes.DsClientesDataChange(Sender: TObject;
Field: TField);
begin
edit1.text:=ibquery1.fieldvalues[´nome´];
...
end;
Valew...
GOSTEI 0