Vertically drawn text on TCanvas not visible when drawn from initial FormResize

Question

I\'m using the DrawTextRotatedB function from Josef Švejk\'s excellent answer to the question How to draw text in a canvas vertical + horizontal with Delphi 10.2 to