Mostrar arquitectura de programa en caption de form

[[AgustinOrtu]]

A la que esta compilado el programa.

La funcion que se encuentra en el hilo de StackOverflow evalua si el equipo esta corriendo bajo Windows de 64 bits; no evalua tu ejecutable

Osea que lo que queres saber vos es determinar si el sistema operativo es de 32 o 64 bits. Eso lo podes hacer usando la RTL de Delphi

TOSVersion

Código Delphi [-]
uses
  SysUtils;

begin
  if TOSVersion.Architecture in [arIntelX64, arARM64] then
    ShowMessage('Sistema operativo de de 64 bits')
  else
    ShowMessage('Sistema operativo de de 32 bits')
end;