Delphi - dbGrid Select 所有

Question

我在 TwwdbGrid 上放置了一个复选框字段 select 记录，我想知道是否可以在网格上的字段标签上放置一个复选框以及用户何时单击它，它是 select 所有的字段，有人知道怎么做吗？？？

提前致谢

Answer 1

我能想到的唯一方法是使用 TImageList 并覆盖 DoCalcTitleImage。这是一个精简版，我在其中对网格进行了子类化，并在列上添加了对各种图像的支持。

procedure TRGDBGrid.DoCalcTitleImage(Sender: TObject; Field: TField;
  var TitleImageAttributes: TwwTitleImageAttributes);

begin
  inherited;
  { Get Image Number }
  lAttr := Attribute_Of_Field;
  TitleImageAttributes.ImageIndex := ord(lAttr);
end;

您可以使用两个图像 - 一个未选中的复选框和一个选中的复选框。并且您需要使用 OnTitleClick 事件来处理它。