Source position: GPCStrings.pas line 289
procedure Str15IntoStr27(
const s: Str15;
var theResult: Str27
);