type mismatch in expression

[noe]

Saludos a todos los compañeros del foro de delphi.
Mi problema es el siguiente:
Cuando realizo una consulta me manda el siguiente error:
"type mismatch in expression"

Tengo el siguiente codigo:

Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('select *');
Query1.SQL.Add('from Cobranza.db');
Query1.sql.Add('Where upper(UltSem) =:Ultima and');
Query1.sql.Add('upper(Semana) =:Sem and');
Query1.sql.Add('upper(Concepto) like :Concep');
Query1.ParamByName('Ultima').AsInteger:=strtoint(Edit1.Text);
Query1.ParamByName('Sem').AsString:=Edit2.text;
Query1.ParamByName('Concep').AsString:=Edit3.text;
Query1.Open;

El campo en la tabla cobranza llamado "UltSem" es de tipo Numerico.
Utilizo tablas paradox de Delphi 5.0

Bueno gracias por la ayuda
Saludos
Atte Noe