Problemas con las comillas al conformar una consulta SQL

[kman]

Saludos Amigos!

Estoy intentando hacer una actulización de un registro en una tabla y me ha dado la lata:

Código Delphi [-]
procedure TFrLoad.FormCreate(Sender: TObject);
var timer: string;
begin
  edit1.text:= datetostr(now);
  timer:='"%'+edit1.Text+'%"';
With    Module.QrPasswords
Do Begin
Close;
SQL.clear;
SQL.add('SELECT * FROM PASSWORDS where Fecha_Inactiva like '+timer);
SQL.add('UPDATE PASSWORDS SET Status_Password = '0' where Status_Password = '1'');
Open;
end;
end;
end.

Pretendo hacer esto para cuando el programa cargue las claves de usuarios que se han vencido cambien de estado de activo a inactivo y el usuario tenga que cambiar su clave. Pero con '0' me da error de semicolon y si pongo "0" me da error de sintaxis: Falta operador.
La base de datos es de Access, no sé si soporta UPDATE, me gustaría usar Replace, pero leí que no lo soporta.

Agradeciendo sus ayudas de Antemano
Su Amigo Kman.