Lazarus - 错误提示：发生了异常

第 四 章 交 叉 表有 时 我 们 需 要 将 数 据 行 列 互 换 , 这 就 是 所 谓 中 国 式 报 表 , 可 是 不 在 报 表 里 面 ,我 们 当 如 何 实 现 ? 我 们 知 道 在 mssql 可 以 用 exec 执 行 动 态 sql 语 句 , 而 firebird下 也 能 实 现 , 我 们 暂 且 不 讨 论 这 种 实 现 , 我 们 讨 论 用 lazarus 自 身 实 现 , 更 利 于学 习 些 东 西 , 并 且 不 同 数 据 库 其 实 都 可 以 使 用 此 算 法 。 比 如 下 表 :studentScoreId name subject score---------------------------------1 张 三 语 文 782 张 三 数 学 803 李 四 语 文 824 李 四 数 学 88----------------------------------转 换 成 这 种 表 格------------------------------姓 名 语 文 数 学张 三 78 80李 四 82 88-------------------------------将 一 维 的 数 据 转 换 成 了 二 维 逻 辑 数 据 。此 函 数 参 数 1 源 数 据 , 参 数 2 目 标 数 据 集 参 数 3 动 态 列 字 段 参 数 4 行 字段 参 数 5 数 据 单 元 字 段function CreateCrossTable(SourceDataset:TDataset;ResultDataset:TMemDataset;TitleField, RowField, DataField: string): tdataset;vartmpDataset: Tdataset;