Question

delphi中，想把EXCEL的多行、列内容复制，右键粘贴到StringGrid中，怎么实现粘贴功能？有PopupMenu组件。

如题！感谢！

Answer 1

比较麻烦,其实就是从EXCEL导入数据,采用从EXCEL导入数据到数据表的方法写代码,只不过不是保存到数据库,而直接把E的数据写到栅格表中.代码较长(用2个FOR循环嵌套,也没有多少代码,但颇费心思),没有时间来写.自己想想办法吧.

Answer 2

其实可以很简单，Excel 多行列 选中的时候 每一列 使用 tab 隔开的把（不信你黏贴到记事本看看），
然后就很简单了：
1，写一个数组或者队列根据tab符号（ascii = 9） 解析保存并保存剪贴板的数据(从Excel 那copy来的)。
2，右键时，循环读取 该数组 或者队列 并且写入到 stringgrd中。
备注：如果数组就要用二维的，或者用 Tlist, Tstringlist 配合使用更方便。