Модуль: SysUtils

Описание
Функция преобразовывает все символы строки S в прописные (верхний регистр). Данная функция поддерживает многобайтовые наборы символов (MBCS).

Пример
var
   S: string;
begin
   S:= 'c:\windows';
   S:= AnsiUpperCase (S);     { S := 'C:\WINDOWS' }
   MessageDlg(S, mtInformation, [mbOk], 0);
end;