Функция UpperCase ( const S: string ): string;

Модуль: SysUtils

Описание
Функция конвертирует все 7-ми битные ASCII символы строки, лежащие в диапазоне от 'a' до 'z', в прописные (верхний регистр). Для конвертирования 8-ми битных символов используйте функцию AnsiUpperCase.

Пример
var
   S: string;
begin
   S:= UpperCase( 'Компания Intel');      { S := 'Компания INTEL'}
end;