질문자분께 도움드리고자 차돌이님의 설명을 조금 보충하겠습니다.

형이 정의된 상수를 선언하려면

const
  X: ShortInt = 127;

와 같이 할수있습니다.

uses
  System.Rtti;

procedure TForm33.FormCreate(Sender: TObject);
const
  X: Integer = 127;
begin
  Caption := Format('%d is %s', [X, TValue.From(X).TypeInfo.Name]);
end;

형별 상수선언은
http://docwiki.embarcadero.com/RADStudio/XE6/en/Declared_Constants
를 참고하세요.

차돌이 님이 쓰신 글 :
: const
:  CST_INTEGER = 2;  Integer 타입 상수로 선언
:  CST_STRING = '2'; 스트링 타입 상수로 선언
:  CST_DOUBLE = 2.2; Double 타입 상수로 선언
:
: 대충 이런식입니다.
:
: 후쿠루 님이 쓰신 글 :
: : const 는 정수 사용할때 사용하잔아요??
: :
: : 예를 들어
: :
: : const
: : a = 2;
: :
: : 이렇게 선언이 가능한가요??
: :
: : 변수같은거 선언할때 ver 쓰고 변수 타입 a : string;
: :
: : 이렇게 정의 하잔아요
: :
: : 소스에서 interface 에
: : const
: : a = 2;
: :
: : 라고 정의되어있는데 무슨뜻인지 잘몰라서요;;; 타입도 없고 ver도 없어서요
: :
: : 그리고 저거 해석할때 변수처럼 해석해도 되나요?? a라는 정수에 2값이 저장되어있다 값은 변할수 없다
: :
: : 이렇게 해석해도 되나요??