Constructing k-Schmidt witnesses for infinite-dimensional systems