본문 바로가기

Delphi/꿀팁

TcxGridTableView에 수동으로 값 추가하기

1. 새로운 Record가 생길 때마다 추가로 값을 넣는 방법입니다.

var
  I: Integer;
  nIndex: Integer;
begin
  with <GridTableView> do begin
    DataController.RecordCount := 0; //Grid 초기화    

    BeginUpdate;
    for I := 0 to RECORD_COUNT - 1 do begin //추가할 레코드 수만큼 반복
      nIndex := DataController.AppendRecord; //새로운 Record의 index 생성.
      DataController.Values[nIndex, 컬럼명.Index] := 'Developist' + I.ToString;
    end;
    EndUpdate;  
  end;
end;

 

2. Grid에 Record를 한번에 설정하고 값을 추가하는 방법입니다.

var
  I: Integer;
begin
  with <GridTableView> do begin
    DataController.RecordCount := 0;
    DataController.RecordCount := RECORD_COUNT; //RecordCount를 한번에 설정.
    
    BeginUpdate;  
    for I := 0 to RECORD_COUNT - 1 do begin //추가할 레코드 수만큼 반복
      DataController.Values[I, 컬럼명.Index] := 'Developist' + I.ToString;
    end;
    EndUpdate;  
  end;
end;

 

반응형