表结构如下（举出了两个字段）
Employee_ID(员工编号) | FromDepart(部门) | FromDuty(职务)

这是一个做人事调动,的表，我的想法是获得每个部门职务调动的人数，要求得到的结果集如下


部门列表 职务1，职务2，职务3

实际查询的想法就是想把表的一列变成行,


语句如下:
Declare @sql varchar(8000)
set @sql='select FromDepart as departname'
select @sql=@sql ',max(Case FromDuty when ''' FromDuty ''' then Num else 0 end)[' FromDuty ']'
from (select distinct FromDuty from vhr_EmployeeMove where MoveType<>'普通'
and Year(affectDate)=2008 and Month(affectDate)=10) AS a
set @sql=@sql 'from(select FromDepart,FromDuty,Count(Employee_ID) as Num from vhr_EmployeeMove where MoveType<>''普通'' and Year(affectDate)=2008 and Month(affectDate)=10 group by FromDepart,FromDuty) as B group by FromDepart,FromDuty'
exec(@SQL)

我想在Delphi中得到查询的结果集，请问有办法吗?

或者通过其它的方法