You may use DBAdvGrid ADOEditing Demo.
just add a button with this code:
procedure TForm1.Button3Click(Sender: TObject);
begin
dbadvgrid1.Options := dbadvgrid1.Options + [goColSizing];
dbadvgrid1.AddRating(5, 5, 15, clGreen, clGray);
end;
You'll notice it'll initially light the stars according to the previous field content, and will let you change it, but won't put the datasource in edit mode, nor will update table data.
Not even if you press edit on the navigator, then change the value, and then press post.