如何将数据库表中前几条记录合并显示

Question

有一个数据库表有4个字段，第一个字段是ID，第二、三、四都是字符字段如：
ID  str1   str2  str3 
1    Z      L      M
2    L      M      N
3    L      M      N
4    L      M      N
     .....
我在程序中显示的时候，准备加一个字段，这样来进行显示
ID  str1    str2  str3   addstr
1    Z      L      M
2    L      M      N
3    L      M      N
4    L      M      N
5    N      N      L      ZLMLMNLMNLMNNNL
6    L      N      O      LMNLMNLMNNNLLNO
   .....
也就是说，新添加的字段的内容就是前5条（包括自己本身的那条）记录1，2，3字段的合并显示，各位大侠想个招。

Answer 1

if exists(select 1 from sysobjects where id = object_id(N'testTable'))
drop table testTable create table testTable 
(id int primary key identity(1,1),
str1 varchar(1),
str2 varchar(1),
str3 varchar(1),
addstr varchar(100)
)insert into testTable values('Z','L','M','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','T','')
go
alter procedure mytestProcedure
@FCurrentid int
asdeclare
  @FieldStr varchar(100),
  @MaxId int,
  @CurrentID intset @Fieldstr = ''
set @CurrentID = @FCurrentid + 1
select @Maxid = max(id) from testtable
 
select @FieldStr =  @FieldStr + str1 +str2 +str3 from testtable where id <= @FCurrentidupdate testtable set addstr = @FieldStr where id = @FCurrentid
while @CurrentID < @MaxID +1
begin
  select @FieldStr = right(@FieldStr,len(@FieldStr)-3*len(str1)) + str1+str2+str3 from testtable where id = @CurrentID
  update testtable set addstr = @FieldStr where id = @CurrentID
 
  set @CurrentID = @CurrentID + 1
end
gogoexec mytestprocedure 5select * from testtable

Answer 2

执行结果
－－－－－－－－－－－－－－－－－－
1 Z L M
2 L M N
3 L M N
4 L M N
5 L M N ZLMLMNLMNLMNLMN
6 L M N LMNLMNLMNLMNLMN
7 L M N LMNLMNLMNLMNLMN
8 L M N LMNLMNLMNLMNLMN
9 L M T LMNLMNLMNLMNLMT

Answer 3

中间的while循环也可以使用游标实现，但效果都差不多，
应该还有更简单的方式可以一句话搞定，但我暂时没想到。

Answer 4

下面这种解决方式，代码可能更少些，也更容易懂些，但是，其内部执行的循环次数好像也更多些。
if exists(select 1 from sysobjects where id = object_id(N'testTable'))
drop table testTable create table testTable 
(id int primary key identity(1,1),
str1 varchar(1),
str2 varchar(1),
str3 varchar(1),
addstr varchar(100)
)insert into testTable values('Z','L','M','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','N','')
insert into testTable values('L','M','T','')
goif exists(select 1 from sysobjects where id = object_id(N'myfunction'))
drop function myfunction 
go--自定义函数，根据传递的创始化id（就是从第几行开始），和当前id来返回一个当前id前面几行的一个字符串；
create function myfunction (@FinitID int,@FCurrID int)
returns varchar(100)
as
begin
declare
  @FieldStr varchar(100)set @Fieldstr = ''
 
select @FieldStr =  @FieldStr + str1 +str2 +str3 
from testtable 
where id between (@FCurrID - @FinitID +1) and @FCurrIDreturn(@FieldStr) endgo
update testtable set addstr = test.dbo.myfunction(5,id) from testtable where id >4
select * from testtable

Answer 5

CREATE FUNCTION  AddColumn (@ID INT)  
RETURNS NVARCHAR(4000) AS  
BEGIN 
Declare @SQL NVARCHAR(4000)
Declare @ROW INT       
Select @SQL = ''
Select @ROW = COUNT(1)  FROM (Select Top 5 * from TADD Where ID <= @ID Order By ID Desc) T
IF @ROW = 5 
Begin
Select @SQL = @SQL + Str From (Select Top 5 Str1+Str2+Str3 Str from (Select Top 5 * from TADD Where ID <= @ID Order By ID Desc ) T  Order By ID ) TT
End
Return @SQL 
END-----------------------------Select ID, STR1, STR2, STR3, DBO.AddAtr(ID) ADDSTR FROM TADD

Answer 6

Select ID, STR1, STR2, STR3, DBO.AddColumn(ID) ADDSTR FROM TADD

Answer 7

谢谢几位的解答，不过，这和我的目的还是有些差距，可能我没有说清楚，我是想数据库不动，在DELPHI的ADOTABLE中添加一个字段，在OnCalcFields事件中用什么方法能够将上面的目的达到！

Answer 8

将解决的办法说一下，TABLE表不动，添加一个计算字段，然后，做一个自定义函数，将ID传给函数，在函数中包含一个动态查询，做一个循环的查询将结果累计，然后返回给TABLE的oncalcfields过程中的计算字段的赋值。