ColumnByHeader

VCL TMS VCL UI Pack
1

What is the problem:

procedure CellaMasolas0;
var iCol: Integer;
begin
    if Length(FormIndex.sCel01) > 0 then
    begin
      DbModule.DataSourceAk.DataSet.Edit;
      DbModule.DataSourceAk.DataSet.FieldByName(FormIndex.sCel01).AsString := DbModule.sPassValue;
      DbModule.DataSourceAk.DataSet.Post;
      iCol := FormIndex.GridIndex.ColumnByHeader[FormIndex.sCel01];
      FormIndex.GridIndex.Cells[iCol, DbModule.iPassRow] := DbModule.sPassValue;
    end;
  ...
end;
I get this message: [DCC Error] UnitCellaMasolas.pas(28): E2035 Not enough actual parameters

lauri

2

Please use ColumnByHeader(value);

3

Oh! Thanks!

Pál.