I am using code
CODE
PRocedure Prop(Grd, Col, Prp, Val : String);
Begin
if Prp='Caption' then TNextGrid(FindComponent(Grd)).ColumnByName[Col].Header.Caption := Val else
if Prp='Width' then TNextGrid(FindComponent(Grd)).ColumnByName[Col].Width:=StrToInt(Val);
end;
It is code error ColumnByName
I using code
CODE
PRocedure Prop(Grd, Col, Prp, Val : String);
Begin
if Prp='Caption' then TNextGrid(FindComponent(Grd)).Columns[0].Header.Caption := Val else
if Prp='Width' then TNextGrid(FindComponent(Grd)).Columns[0].Width:=StrToInt(Val);
end;
It is code running
what promlem with ColumnByName ?
Thanks