关于DELPHI的简单小问题,答对必奖!!!(100分)

  • 主题发起人 主题发起人 LWWANDVB
  • 开始时间 开始时间
L

LWWANDVB

Unregistered / Unconfirmed
GUEST, unregistred user!
HELLO!我在数据库编程中遇到了三个问题,你能为我指点一下吗?
1、在TDBGrid控件中显示数据时如何能显示行号?
例:有一个查询表:
姓名 年龄
ABC 19
DEF 12
GHI 17
… …

我想在TDBGrid控件中作如下显示:
顺序 姓名 年龄
1 ABC 19
2 DEF 12
3 GHI 17
… … …

当上表为一个数据表时又如何做呢?

2、使用QuickReport报表如何能做到动态插入空行?
例:有一个数据表,种类字段是有序的:
产品 种类
AAA 1
BBB 1
CCC 1
DDD 2
EEE 2
… …

我想在报表输出时如下格式:
产品 种类
AAA 1
BBB 1
CCC 1
<<--按种类的不同分类出现了一个空行,如何能做到?
DDD 2
EEE 2
… …

3、DELPHI有什么语句能直接把字串输出到打印机的端口?

 
1、简单。增加一个叫"顺序"的字段不就可以了吗?

2、我以前我为了在QuickRep的打印中能打印满一页,是这样做的:
当行数少于多少行时,让表增加若干个只有序号的空行。
打印。
删除空行。

(仅供参考)

3、writePrinter
 
2.
使用Master/Slave数据控件格式,QuickRep使用DetailBand/SubDetailBand配合

3.
uses printers;
procedure YouPrint;
begin
with printer do
begin
begindoc;
canvas.textout(x, y, yourstring);
enddoc;
end
end;
 
1、增加一个“顺序”字段,可以设计让字段值自动等于当前记录号即 TABLE1.RECNO;
2、3、同意slicker的说法。
 
writePrinter?
你不可以举个简单的例子?THANK YOU!
 
大家好!多谢你们为我的问题作出解答!
DELPHI简单的三条小问题中,第一条的“用加入一个顺序字段”的方法不能很好解决。这是因为如果我在这个表插入新的记录时,新记录之下的顺序字段又要重复更改,删除记录时又是如此,很麻烦,并且这个字段只是给用户看看,没有其它用处,加入这个字段也浪费空间。当这个表如果是查询表时,更是麻烦。

我想最好的办法就是使用TQUERY控件,在TQUERY查询时加入查询生成的顺序字段,这样,插入新记录时,TQUERY就自动更新顺序字段。它比较方便。但TQUERY中的SQL可不可以如下编写:

SET A=0
SELECT INC(A) AS 顺序 , 其它字段… FROM TEST


其中A是一个变量,INC是一个累加函数。能这样写吗?第一个问题就变成了TQUERY的SQL中能使用变量、SET语句和INC函数吗?

第二个问题解决了,谢谢!
第三个问题用printer 对象不能解决!因为我想打印的是连续纸的数据,它不能够有换页,用printer对象打印一定会换页。所以我要把数据直接送到打印机端口,它就象是DOS里的TYPE ABC.TXT >PRN一样,如何?THANK YOU!

 
改用 StringGrid 吧,手工增加你想加的内容,你的问题都可以解决。
 
用字串栅格不行!
如果数据库的内容十分大时,
字串栅格加载不了!
 
>第一条的“用加入一个顺序字段”的方法不能很好解决
>。这是因为如果我在这个表插入新的记录时,
>新记录之下的顺序字段又要重复更改,
>删除记录时又是如此,很麻烦,并且这个字段只是给用户看看,
>没有其它用处,加入这个字段也浪费空间。当这个表如果是查询表时,更是麻烦。
------------用自动增加字段
 
多人接受答案了。
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部