[Delphi]퀀텀그리드 동적배열 속성

uses  cxCurrencyEdit; // 필수 추가사항

 

aColumn : array[1..10] of TcxGridColumn;  // 동적생성할 컬럼수를 배열로 선언

 

 i := 1;
while not Eof do
begin

   //퀀텀그리드 컬럼 동적 생성
   aColumn[ i ]                                       := cxTv3.CreateColumn;   //컬럼 생성
   aColumn[ i ].Caption                           := FieldByName('manu_line').AsString; //컬럼 이름
   aColumn[ i ].Width                              := 120;            //컬럼 넓이
   aColumn[ i ].HeaderAlignmentHorz       := taCenter;     //컬럼정렬
   aColumn[ i ].DataBinding.ValueType     := 'Float';        //컬럼 데이터 타입 
   aColumn[ i ].PropertiesClass               := TcxCurrencyEditProperties;   //속성지정
   aColumn[ i ].Properties.Alignment.Horz := taRightJustify;     //가로정렬   
   aColumn[ i ].Options.Editing                := false;                //수정금지
   aColumn[ i ].Options.Filtering               := false;               //필터링 해제
   (aColumn[ i ].Properties as TcxCurrencyEditProperties).DisplayFormat := '#,0';    //정렬

 

   Inc( i );
   Next;