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