Fórum filtro ´0000000000015´ #198190

Caros colegas estou tentando fazer um filtro por codigo de nota
e estou usando um edit ex:

procedure Tfrm_recepejuri.SpeedButton17Click(Sender: TObject);
begin
edit7.Text:=format(´¬12.12d´,[edit7.text]);
if edit7.Text=´´ then
showmessage(´Preencha o codigo da nota para pesquisa´)
else
if not dm.tbljuridica.Locate(´codnota´,edit7.text,[]) then
Showmessage(´Nota não encontrada´);
edit7.Text:=´´;

end;

O problema é o seguinte e que quando mando filtrar da o seguinte erro
format´¬12.12d´ invalid or incompatible with argument

Acho que deve ser a extencao do edit mas eu não sei qual usar

Se alguem puder me ajudar desde ja agradeço
denis