vfp中如何表示屏幕上一个点

Question

并且需要返回那一点的RGB值
谢谢

Answer 1

Object.Point ([nXCoord, nYCoord])
参数
nXCoord
按照表单 ScaleMode 属性设置的度量单位指定点的横坐标。
nYCoord
按照表单的 ScaleMode 属性设置的度量单位指定点的纵坐标。
例:
_screen.point(1,1)
or
thisform.point(1,2)

追问

-screen 是什么意思

追答

屏幕

Answer 2

PUTFILE([cCustomText] [, cFileName] [, cFileExtensions])
返回值
字符型

参数
cCustomText
指定在“另存为 …”对话框上部显示的标题。
cFileName
指定在文本框中显示的默认文件名。
cFileExtensions
指定文件的扩展名。当清除“所有文件”复选框时，在“另存为 …”对话框的可滚动列表中，只显示具有指定扩展名的文件名。如果输入的文件名不包含扩展名，cFileExtensions 中的第一个扩展名会自动加到文件名上。有关 Visual FoxPro 中文件扩展名列表和相应的生成器类型，请参阅 文件扩展名与文件类型。
字符表达式 cFileExtensions 可以是下列某一形式:

cFileExtensions 可以包含单个的扩展名(例如 PRG)，只有带这个扩展名的文件名才被显示。
cFileExtensions 可以包含用分号分隔的文件扩展名列表。例如，如果包含 PRG;FXP，Visual FoxPro 将显示所有带 PRG 和 FXP 扩展名的文件名。
如果文件名具有相同的基本名，但扩展名不同(例如，CUSTOMER.PRG 和 CUSTOMER.FXP)，Visual FoxPro 所显示的文件是其扩展名在 cFileExtension 中位置靠前的文件。
cFileExtensions 可包含用竖线分隔的文件扩展名列表，例如 PRG|FXP。在这种情况下，即使文件有相同的基本名，Visual FoxPro 也把所有具有指定扩展名的文件名显示出来。
如果 cFileExtensions 只包含一个分号 (；)，Visual FoxPro 显示所有不带扩展名的文件名。
如果 cFileExtensions 是个空字符串，Visual FoxPro 显示当前目录中的所有文件名。
如果 cFileExtensions 包含 MS-DOS 通配符，例如问号 (?) 和星号 (*)，Visual FoxPro 显示所有扩展名符合通配符条件的文件名。例如，如果 cFileExtensions 包含 ?X?，扩展名为 .FXP，.EXE，.TXT 等等的文件都会显示。
备注
可以使用 PUTFILE( ) 选择现有的文件名或指定新文件名，PUTFILE( ) 返回一个文件名及其路径。如果不输入文件名，PUTFILE( ) 返回默认的文件名 (由 cFileName 指定) 和扩展名 (由 cFileExtensions 指定)；如果选定“取消”或按 ESC 键，PUTFILE( ) 返回一个空字符串。可以使用 PUTFILE( ) 返回的文件名命名一个文件并把它保存到磁盘上。
示例
下面的例子从任意用户选中的已存储表中创建一个分隔数据文件。getfile( ) 用来查找并打开一个表，putfile( ) 用来返回目标文件名。
gcTableName = GETFILE('DBF', 'Open Table:')
USE (gcTableName)
gcDelimName = ALIAS() + '.DLM'
gcDelimFile = PUTFILE('Delimited file:', gcDelimName, 'DLM')
IF EMPTY(gcDelimFile) && Esc pressed
Cancel
ENDIF
COPY TO (gcDelimFile) DELIMITED && Create delimited file
MODIFY FILE (gcDelimFile) NOEDIT