Edit checkbox in dbgrid
lazarus / 16-Databases

----------------------------------------------------------------------
Hansvb · 2014-08-20 19:41

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 · 2014-08-28 17:24

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

----------------------------------------------------------------------
Hansvb · 2014-08-29 19:19

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;