求助啊，万能的Delphi帝来瞅瞅呗！

annson 发布于 2009-09-27 16:26， 852 次点击

本人现在做一个小需求，就是读取xml文件的内容，然后显示在grid中，问题主要是如何在grid中显示一个打勾或者问号呢？
通过clientdataset，xmltransformprovider，datasource，进行连接，如果想要在clientdataset增加一个字段，并直接对这个字段赋值来达到这个效果的话，又该怎么做呢？
万能的delphi帝来救救我把。。。

1 回复

mohao1632009-09-28 08:49

程序代码：

procedure TForm2.Button1Click(Sender: TObject);
var
    f:TStringField;
begin
  cds1.Active  :=false;
  f:=TStringField.Create(cds1);
  f.Name  :='e';
  f.FieldName  :='e';
  f.DataSet  :=cds1;
  f.Visible  :=true;
  f.FieldKind  :=fkdata  ;
  cds1.CreateDataSet;
  cds1.Active  :=true;
end;

这里有个例子是clientdataset增加字段的