Simplemente declara el read sin el write:
Código Delphi
[-]
type
TTuClase = class
private
FLaPropiedad: UnTipoDeDatos;
public
property LaPropiedad: UnTipoDeDatos read FLaPropiedad;
end;
La clase siempre podrá asignar valores usando directamente el campo FLaPropiedad.
// Saludos