Source position: syshelph.inc line 622
public function TShortStringHelper.ToUpper: ShortString; overload;