Replaces last digits with 1
Source position: lclproc.pas line 394
function CreateFirstIdentifier(
const Identifier: string
):string;
For example Name321 becomes Name1