Delphi - tipi strutturati e procedure

mi servirebbe creare una procedura che preso in input un tipo di dato prima dichiarato sia in grado di manipolarne i singoli campi.

type
  TForm1 = class(TForm)
    procedure modifica(var app: ???);
type
  coordinate = record
  var x1 :integer;
      x2 :integer;
      x3 :integer;
      x4 :integer;
  end;
var
  rettangolo : coordinate; 

procedure TForm1.Button1Click(Sender: TObject);
begin
  modifica(rettangolo);
end;

procedure TForm1.modifica(var app: ???);
begin
  app.x1 := 2;
  app.x2 := 37; 
end;

per fare ciò, come dovrei dichiarare la variabile app che viene passata alla procedura?

beh se il tipo della variabile app(che poi è uguale a quello di rettangolo) è "coordinate" allora metti

var app: coordinate

fosse stato così facile non l'avrei chiesto XD
questa è stata la prima cosa che ho fatto ma mi da "undeclared identifier" nella riga dove dichiaro la procedura, "identifier redeclared" dove dichiaro il nome del tipo e ancora "undeclared identifier" dove dichiaro il tipo del dato "rettangolo".

togli la parola chiave "var" quando dichiari la struttura "record"

devi mettere per esempio:

rect = record
x1: Integer;
...
end;

non ci va la var per dichiarare le cose in una struttura dati record

e poi la procedura la devi dichiarare DOPO la dichiarazione della record

grazie mille, adesso funziona.