女武神天使皮肤价格:Delphi里的 DBGrid1 如何计算记录数

来源:百度文库 编辑:高考问答 时间:2024/05/06 18:28:09
我创建了一个扣分表,在扣分表里记录着扣分情况,当查询学生扣分情况,我通过数据库查询,查出某个同学的扣分情况,通过DBGrid1显示出来,请问,怎么计算DBGrid1记录数,然后把扣分表里的 扣除分数 加起来,计算出这个学生扣了多少分,在弹出个窗体把计算出来的分显示出来,??????
谢谢

5月8日 15:28 因为这里使用了with语句。

With语句是一种用于简化代码的语句。如你要访问一个记录类型变量(或一个对象),用With语句就不必每次重复变量的名字。例如对于以下的记录类型代码:

type
Date = record
Year: Integer;
Month: Byte;
Day: Byte;
end;

var
BirthDay: Date;

begin
BirthDay.Year := 1997;
BirthDay.Month := 2;
BirthDay.Day := 14;

可以用with语句改进后半部分代码,如下:

begin
with BirthDay do
begin
Year := 1995;
Month := 2;
Day := 14;
end;

在Delphi程序中,这种方法能用于访问控件和类变量。