delphi grid 数据显示问题

[zhaozheng821018]

如何通过循环组织出grid中要显示的数据，也就是说：grid中要显示a~e 5列数据，第一个adoquery只能查询出a,b,c三列，在第一个query内依据a,b列循环查询出d,e列的值，放到相应的列中去，如何做到，d,e列的至不被更新到数据库中去。

[windy454]

我也是刚接触delphi还不是很懂。建议你先去看下数据库方面的书。看下数据库的操作

[sparklerl]

在ADOQuery中新增两个计算字段

[zhaozheng821018]

是类似 select a.a,a.b,a.c,'' as d,'' as e from a 这样的写法么
这个写法我试过，它提示d,e不能被修改，是不是那个地方我没有注意到。

[lypzyy]

while not adoquery.eof do
begin
a:=adoquery.fieldbyname('a').asString;
b:=adoquery.fieldbyname('b').asString;
c:=adoquery.fieldbyname('c').asString;
//根据实际情况写d、e的值，这里可以根据a、b值进行判断d、e的值
d:=a+b;
e:=...
//下面写grid的生成语句即可
grid='...';
adoquery.next;
end;

[dinoalex]

建view,主键是a,b

[zhaozheng821018]

[Quote=引用 4 楼 lypzyy 的回复:]
while not adoquery.eof do
begin
  a:=adoquery.fieldbyname('a').asString;
  b:=adoquery.fieldbyname('b').asString;
  c:=adoquery.fieldbyname('c').asString;
  //根据实际情况写d、e的值，这里可以根据a、b值进行判断d、e的值
  d:=a+b;
  e:=...
  //下面写grid的生成语句即可
  grid='...';
  adoquery.next;
end;
[/Quote]
其他的都理解，就是grid的生成语句能说具体点么

[ywbcxq]

动态增加二个字duan，在计算过程中，d :=a+c, e:=..这样 d,e就是不可修改的。

[sparklerl]

双击adoquery,会出来一个Field列表

右键可以新增(new)字段,
新增的字段类型(field type)有data,Calculated,lookup
Calculated就是计算字段

计算字段的计算可以放在adoquery的onCalcFields事件中,当你的非计算字段值变化时,就会触发此事件,open的时候也会触发

procedure TForm1.ADOQueryCalcFields(DataSet: TDataSet);
begin
  with ADOQuery do
  begin
    //你可以在这个地方进行一些判断,再进行对应的计算
    FieldByName('d').Value:= FieldByName('a').AsInteger+ FieldByName(
      'b').AsInteger  ;
    FieldByName('e').Value:= FieldByName('b').AsInteger+ FieldByName(
      'c').AsInteger  ;
  end;
end;

[我的昵称总是存在]

楼上的可以.

[zhaozheng821018]

我搞定了，用8楼的方法，只是把它放在query的open之后，直接就处理了。