델파이 배열 상수

델파이 배열 상수

 

다목적 웹 프로그래밍 언어 인 Delphi에서  

배열 은 개발자가 일련의 변수를 동일한 

이름으로 참조하고 숫자 (인덱스)를 사용하여 

분할 수 있도록합니다.

대부분의 시나리오에서 배열을 변수로 선언하여 

런타임에 배열 요소를 변경할 수 있습니다.

그러나 때때로 상수 배열 (읽기 전용 배열)을 선언해야합니다. 

상수 또는 읽기 전용 변수의 값을 변경할 수 없습니다. 

따라서 상수 배열 을 선언하는 동안 이를 초기화해야합니다.

 

세 개의 상수 배열 선언 

이 코드 예제는 

Days , CursorMode 및 Items 라는 

세 개의 상수 배열을 선언하고 초기화 합니다.

Days 는 6 개 요소로 구성된 string 형 배열입니다. 

Days [1]은 Mon 문자열을 반환합니다.

CursorMode 는 두 요소 의  배열이며 

CursorMode [false] = crHourGlass 및 CursorMode = crSQLWait 선언입니다. 

"cr *"상수를 사용하여 현재 화면 커서를 변경할 수 있습니다.

항목 은 세 개의 TShopItem 레코드 배열을 정의  합니다 .

type 
    TShopItem = 레코드 
      이름 : 문자열; 
      가격 : 통화; 
    종료; 

  
const 
    Days : array [0..6] of string = 
    ( 
      'Sun', 'Mon', 'Tue', 'Wed', 
      'Thu', 'Fri', 'Sat' 
    ); 
 
    CursorMode : TCursor의 array [boolean] = 
    ( 
      crHourGlass, crSQLWait 
    ); 
 
    아이템 : TShopItem의 array [1..3] = 
    ( 
      (이름 : '시계', 가격 : 20.99), 
      (이름 : '연필', 가격 : 15.75), 
      (이름 : '보드', 가격 : 42.96) 
    );

 

 

상수 배열의 항목에 값을 할당하려고하면 

"왼쪽을 할당 할 수 없습니다"컴파일 시간 오류가 발생합니다. 

예를 들어 다음 코드는 성공적으로 실행되지 않습니다.

아이템 [1] .Name : = 'Watch'; // 컴파일되지 않습니다.

 

다시 정리하자면

 

첫번째
const
       MY_SITE: array[0..2]of String = ('구글', '다음', '네이버');

 

사용 ->  edit1.text  := MY_SITE[1];

 

두번째 
type
TSiteType = (stGoogle, stDaum, stNaver);

 

const
         MY_SITE: array[TSiteType] = ('구글', '다음', '네이버');

 

사용 -> edit1.text  := MY_SITE[stDaum];