Question

我正在使用Visual Foxpro 9。

我在每个项目下面都有一个带有项目列表和图片的Excel文件。每个项目占一行，图片占3行。

我能够保存每个项目/行的文本，但不知道如何在每个项目下面保存图片。请指导我正确的方向。

谢谢，赫伯特

Answer 1

您可以复制它们剪贴板，然后使用gdiPlusx.FromClipboard之类的东西进行保存。即：

local ix, oExcel
oExcel = Createobject('Excel.Application')
With oExcel
  .WorkBooks.Open("c:\My Folder\MyExcel.xlsx")

  With .ActiveWorkBook.ActiveSheet
    For ix = 1 To .Shapes.Count
        .Shapes(m.ix).CopyPicture()
        * Save the picture in clipboard
    Endfor
  Endwith
Endwith

Answer 2

假设上面提到的Cetin代码为您获取图片文件，不要尝试将其存储到数据表中。

而是将其作为图像文件（JPG，BMP等）存储在服务器驱动器的目录中。然后在您的数据表中存储路径。

然后，在需要时，您的VFP应用程序可以“知道”在何处以及如何获取图片并根据需要使用它而不会引入数据表问题。

祝你好运

从FoxPro的excel文件中读取并保存图像

2 个答案: