[NumLock]

Код:

function AnsiUpperCase(const S: string): string;