dbgrid에서 Column수를 동적으로 조절하고 싶습니다.
dbgrid에 기본 10개의 column을 만들어 놓고
조건에 따라 Column수를 8개 또는 6개 또는 10개로
dbgrid내의 column을 Visible을 True/False하고 싶습니다.
<!--CodeS-->
procedure TUCSPA008Form.Button1Click(Sender: TObject);
var
i,j : integer;
begin
inherited;
for i := 0 to 9 do
begin
if j = 5 then dbgrid2.columns.items[i].field.visible := true
else dbgrid2.columns.items[i].field.visible := False;
end;
end;
<!--CodeE-->
위와 같은 형태로 코딩을 했는데 구문 에러나 실행시 에러는 없는데
Column수의 변화가 없습니다.
고수님 가르켜주세요.
급하거든요..
else dbgrid2.columns.items[i].visible := False
field 를 빼고.....