Edit checkbox in dbgrid

[Hansvb]

I show data in a dbgrid. I want to add a 'checkbox' column to the dbgrid. Then i want to check / uncheck some rows. From the checked rows i want to retrieve de data from a specific field.

What i got so far is:

Code: [Select]

  TColumn(DBGrid1.Columns.Insert(0)).Title.Caption := 'TESTING'; //create 1 new column: Works fine
  DBGrid1.Columns.Items[0].ButtonStyle:=cbsCheckboxColumn;  //make the new column a  checkbox column : Works fine

The new column is placed in front of the datasource columns.

I can not check / uncheck de new checkboxes.

I tried this. (Doesn't work):

Code: [Select]

  DBGrid1.Columns.Items[0].ReadOnly:=False;
  DBGrid1.ReadOnly:=False;


[jesusr]

This How To addresses this problem: http://wiki.lazarus.freepascal.org/Grids_Reference_Page#Selecting_Records_in_a_DBGrid_using_checkboxes

[Hansvb]

Thanks, it works.

And i get access to a certain field and "export" it to a memo:

export the field ID to a memo from the selected records only:

Code: [Select]

procedure TMain_frm.Button6Click(Sender: TObject);
var
   i: Integer;
begin
  for i := 0 to reclist.Count-1 do  //reclist: see the grid.wiki as mentioned above
    begin
      DBGrid1.DataSource.DataSet.GotoBookmark(Pointer(reclist[I]));
      Memo1.lines.Add (DBGrid1.DataSource.DataSet.FieldByName ('ID').AsString);
    end;
end;