TDBGRID能否自己拼一个而不用数据源？

Question

所有的都是计算字段？？？
用stringgrid
用ehlib

Answer 1

例如打打一个表,显示在TListView中
procedure TForm1.ShowData;
begin
  Table1.Open;
  while not Table1.Eof do
  begin
    with Table1,ListView1 do
    begin
      Items.Add;
      Items[Items.Count-1].Caption:=FieldByname('name').AsString;
      Items[Items.Count-1].SubItems[0]:=FieldByName('sex').AsString;
      Items[Items.Count-1].SubItems[1]:=FieldByName('birthday').AsString;
    end;     
    Table1.Next;
  end; 
end;