tms [TMS] TAdvStringGrid 기능소개 - 데이터와 연동된 아이콘 이미지 셀에 그리기.

[c2design]

 

 

TAdvStringGrid 각 셀에 데이터와 연동된 이미지를 넣는 방법입니다.

사용하려는 이미지는 먼저 TImageList에 등록을 시켜 놓습니다.

그리고 TAdvStringGrid 이벤트의 GetImages 항목에 TImageList를 연결 합니다.

이후에 AddDataImage 메소드를 이용해서 셀과 연결 하면 됩니다.

셀 데이터 값에 연결된 ImageList Index 에 해당하는 이미지가 표시 됩니다.

procedure TMvForm.Button1Click(Sender: TObject);
var
 i : integer;
begin
  for i := 1 to advstringgrid1.rowcount - 1 do
    advstringgrid1.Cells[ 5, i ] :=  Random( 6 ).ToString;
end;

procedure TMvForm.Button2Click(Sender: TObject);
var
  i : integer;
begin
  for i := 1 to advstringgrid1.rowcount - 1 do
    advstringgrid1.AddDataImage(5, i, 0, TCellHAlign.haCenter , TCellVAlign.vaCenter);
end;

 

데모영상