VCL: Fix Coverity CID183009