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