请问各位大虾？下面的语句大概是什么意思？谢谢

Question

property ChuUser: Boolean read FChuUser write SetChuUser default False;
 

Answer 1

这是定义一个boolean类型的property（属性）
该属性就是Field FChuUser的值，写的时候用方法SetChuUser来写，默认值为false

Answer 2

定义了一个属性啊；从FCHUUSER中得到，通过SETCHUUSER付值；这样当你访问这个属性的时候，对象会自动的处理该属性是GET还是SET；
比如：
  FORM。CAPTION：=‘ASDF’；设置FORM的CAPTION；其实调用WRTIE；
  STRTMP：=FORM。CAPTION；将FORM的CAPTION给STRTMP；其实是调用READ

Answer 3

定义一个属性：chuuser是boolean的，
这个属性的取值是在FChuUser,设置这个属性在SetChuUser函数中向Form的Caption，当你对Caption赋数值的时候，就会调用它的写方法，
读取Caption的时候就会调用它的读方法，或是变量。
private
    FDataSet:TDataSet;
    procedure SetDataSet(ADataSet:TDataSet);
public
property Snake_DataSet:TDataSet read FDataSet write SetDataSet;
。
procedure TFinder.SetDataSet(ADataSet: TDataSet);
var
  I:Integer;
begin
  FDataSet := ADataSet;
  with FDataSet do
  begin
    for I := 0 to FieldCount - 1 do
    begin
      if not Fields[I].Visible then Continue;
      if not CanFind(Fields[I]) then Continue;
      FieldNameComboBox.Items.AddObject(Fields[I].DisPlayLabel, Fields[I]);
    end;
    FieldNameComboBox.ItemIndex:=0;
    CurField:=TField(FieldNameComboBox.Items.Objects[0]);
  end;end;