No entiendo bien lo que estás haciendo, si quieres comprobar si existe un dorsal:
Código Delphi
[-]q.close;
q.sql.text := 'select * from tabla where dorsal= :numero';
q.params[0].asinteger = StrToInt(edit1.text); q.execsql;
if q.recordcount>0 then begin
end
else begin
end;