如何将数字用文字代替

Question

在TDBGRIDEH中某一列的值用文字说明替代字段中的数字(如1为好).
在MDI窗口中最大化打开一个子窗体时,界面有闪烁,如何避免闪烁.
如何将窗体的最大化.最小化按钮失效.

Answer 1

1。添加静态字段，并在相应字段的GetText中写代码procedure TForm1.Table1AreaGetText(Sender: TField; var Text: String;
  DisplayText: Boolean);
begin
  if Sender.AsString = '1' then
    Text := 'abc';
end;2。3。Form1.BorderIcons := [biSystemMenu];

Answer 2

form.bordericons控制最大化.最小化按钮