在显示之前修改DBGrid单元格内容

Question

我想在加载数据库时修改dbgrid控件中特定单元格的内容.例如,假设我不希望dbgrid中的任何数据库字段等于"forbidden".有什么方法可以做到吗？

Answer 1

转到你原来的问题:

使用OnGetText字段事件提供与存储在数据库中的内容不同的值以用于演示目的.

在DisplayText是否需要值要呈现给用户,如果需要用于其他目的的值将是假布尔参数将是True.

procedure TForm1.SQLQuery1Field1GetText(Sender: TField; 
  var Text: string; DisplayText: Boolean);
begin
  if (Sender.AsString = 'forbidden') and (DisplayText) 
    and (PrivilegeLevel(CurrentUser) < 10) then
    Text := '********'
  else
    Text := Sender.AsString;
end;