Digo como el amigo mamcx. No se entiende muy bien lo que necesitas.
Para empezar, 'NameHack' tiene toda la pinta de ser una cadena constante que se le pasa a la variable. ¿Qué necesidad tienes de hacer un casting de una constante?
Otra cosa es que necesites que la variable Address no fuera Unicode, con lo cual yo creo que sería mejor definirla como AnsiString, con lo que te evitarías hacer ese casting de PString:
Código Delphi
[-]
var
Address : AnsiString;
begin
...
Address := 'NameHack';
...
end
Pero ya te digo, no está muy claro lo que necesitas
Saludos