VFP的“二进制”数据,通常是指以 0h 开头由十六进制字符表示的数据,如:0h0123456789ABCDEF
这样试试:
CREATE CURSOR classes (pict1 W)
INSERT INTO classes VALUES (CREATEBINARY(FILETOSTR("mepic.jpg")))
_screen.AddObject("image1","image")
_screen.image1.PictureVal = pict1
_screen.image1.Visible = .t.
WAIT WINDOW
_screen.RemoveObject("image1")