Функция UpperCase — преобразует все символы текстовой строки в верхний регистр. Функция входит в состав библиотеки SysUtils и имеет один входной параметр — текстовую строку.
Синтаксис функции: UpperCase (const S: string): string;
С помощью данной функции возможно преобразовать только 7-битные ASCII-символы в диапазоне между ‘A’ и ‘Z’.
Для преобразования 8-битных международных символов, используйте функцию Ansi UpperCase.
Пример использования функции UpperCase:
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption := UpperCase (Edit1.Text);
end;