uses System.SysUtils;

var
  Str, Lower, Upper: string;
begin
  Str := 'Lower and upper';

  Lower := LowerCase(Str);
  //Lower is 'lower and upper'

  Upper := UpperCase(Str);
  //Upper is 'LOWER AND UPPER'

  //for non-ASCII letters use
  //AnsiLowerCase / AnsiUpperCase

  WriteLn('lower is ''', Lower, '''');
  WriteLn('upper is ''', Upper, '''');
end.