Amigo Roman,
A funcion que voce me passou funcionou perfeitamente!! Gracias!!
Agora em consequencia da mudança do campo data está dando uma problema com uma sentença no Delphi. Vou postar em OFF aqui no foro de MySQL. Desculpe-me se isso es contra as regras do forum.
"empresa:=BdGlobal.QyEmpresaCodigo.Value;
data:= Strtodate(DbEdit2.text);
If not QyDiario.Locate('Empresa;Data',VarArrayOf([empresa, data]),[loCaseInsensitive]) then
"
Quando é executado esta retornando o erro "INVALID VARIANT TYPE CONVERSION"
Ja tentei varias coisas e nao sei porque se passa este erro...
Gracias,
Abraços para todos!
WaRRanT