下面报表怎么实现(100分)

数据表如下:
序号 姓名 省份 人数
1 张三 湖北 3
1 张三 四川 4
1 张三 广东 1
2 李四 北京 2
2 李四 湖北 5
3 王五 四川 2
．．．

要求报表做成:
序号 姓名 湖北 四川 广东 北京 ．．．
1 张三 3 4 1 0
2 李四 5 0 0 2
3 王五 0 2 0 0
最好用ehlib 实现

既然是动态的，那么动态创建报表的列好了，设置好个列的宽度就好了

我不知代码怎么写

delphi中有这样一个控件，不需要自已写代码了。只只鼠标一拖就行了。

//给楼主转一段参考下
declare @WarehouseID varchar(5), @WarehouseName varchar(20), @sql nvarchar(2000)
set @sql='select 商品编号'
declare cur cursor for select 仓库编号, 仓库名称 from 仓库表
open cur
fetch next from cur into @WarehouseID, @WarehouseName
while @@fetch_status=0
begin
set @sql=@sql+', case 仓库编号 when '''+@WarehouseID+''' then
库存数量 else
0 end as '+@WarehouseName
fetch next from cur into @WarehouseID, @WarehouseName
end
close cur
deallocate cur
set @sql=@sql+' from 库存表'
exec sp_executesql @sql

加我，我给你看例子