Wop!
O mucho me estoy atontando o aquí todo el problema radica en que estás intentado acceder como parámetro a lo que, en realidad, es un campo. Prueba con esto:
Código Delphi
[-]
with DMPrimitiva.Qinsertarjueves do
begin
Sql.Clear;
Sql.Add('select count (*) from reserva');
Sql.Add('where num_sorteo=:num_sorteo2');
ParamByName('num_sorteo2').AsInteger := StrToInt(Edit1.text);
Open;
Edit2.Text := Fields[0].AsInteger;
Close;
end;