Hola,
El código de más arriba no lo acabo de comprender. He tratado de localizar la clase "TD3Application" pero no la encuentro, se ve que no tengo instalados los componentes en que viene. Pero, parece que sí es posible cambiar el valor de una constante, aunque ignoro si esto puede decirse así, propiamente.
Código Delphi
[-]
const
FConstante: string = '¡Hola ';
var
PFConstante: ^string;
begin
PFConstante := @FConstante;
PFConstante^ := PFConstante^ + ' mundo!';
ShowMessage( FConstante );
end;
Algún monstruo de los que hay por aquí nos comentará algo más sobre este tema, seguro.