Cannot apply ToUpperInvariant to Text property of TEdit: [dcc32 Error] MainFormUnit.pas(29): E2018 Record, object or class type required

MainFormUnit.pas

unit MainFormUnit;

interface

uses
  System.Classes,
  Vcl.Controls,
  Vcl.Forms,
  Vcl.StdCtrls;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    procedure Edit1Change(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

uses
  System.SysUtils;

{$R *.dfm}

procedure TForm1.Edit1Change(Sender: TObject);
begin
  Edit1.Text := Edit1.Text.ToUpperInvariant;
  // the above line generates this error:
  // [dcc32 Error] MainFormUnit.pas(29): E2018 Record, object or class type required
end;

end.