Hiding UniDbGrid Columns

[MOGSY]

Hi

How is possible to hide columns in UniDbGrid? I have tried the following and is not working.

         for II := 0 to unidbgrid.Columns.Count - 1 do begin
          if (unidbgrid.Columns.Items[II].FieldName = 'ABC') or (unidbgrid.Columns.Items[II].FieldName = 'EFG') then
            unidbgrid.Columns.Items[II].Visible := True
          else
            unidbgrid.Columns.Items[II].Visible := True;
         end;

Thanks

[x11]

9 minutes ago, MOGSY said:

unidbgrid.Columns.Items[II].Visible := True
          else
            dbgAtoZ.Columns.Items[II].Visible := True;

True or True?

 

unidbgrid or dbgAtoZ ?

[MOGSY]

sorry about the copy paste!

[irigsoft]

I Use this to create and setup Columns:

 

          MyColumn := TuniDBGrid (SelDBGrid).Columns.Add;
          MyColumn.Font.Size := uniMainModule.ControlsFontSize;
          MyColumn.Title.Font.Size := uniMainModule.ControlsFontSize;
          MyColumn.Title.Alignment := taCenter;
          MyColumn.Title.Caption := FieldsData [0];
          MyColumn.Sortable := True;
          MyColumn.ReadOnly := True;
          MyColumn.ShowSummary := True;

          ------- --- this is it ------------------------
          IF FieldsData.Count > 1 then begin
              if FieldsData [1] > '-1' then
                  MyColumn.Width := StrToInt (FieldsData [1])
              else MyColumn.Visible := False;
          end;

 

I use file with settings for every grid and dinamically create it. If Lenght in file is biger of 0 then set up a column width from file else hide column.

[MOGSY]

Thanks