Generischer Setter mit Basistypen möglich

[ConstantGardener]

Hallo zusammen,

ich spiele gerade mit Generics rum und wundere mich, daß so etwas nicht funktioniert.

Delphi-Quellcode:

procedure GenericSetter<T> (var APropValue : T; const AValue : T);
begin
 if APropValue<>AValue then    // nicht möglich
  begin
   APropValue:=AValue;
   FChanged:=True;             // Datenbankrecord geändert ?
  end; 
end;

Für komplexe Typen verstehe ich das ja noch. Hier muss ich einen TComparer definieren, aber für Basistypen?

//Edit : Fehler in Deklaration beseitigt