点击或拖拽改变大小

AppWindow.OLEDrop 方法

X#
在拖放操作期间，每当鼠标在窗口的客户区内释放时调用。

命名空间：  VO
程序集：  VOGUIClasses (在 VOGUIClasses.dll 中) 版本：2.22 GA
语法
复制
 VIRTUAL METHOD OLEDrop(
	oOleDragEvent
) AS USUAL CLIPPER
查看代码

参数

oOleDragEvent (Optional)
类型：__Usual
指定的 OLEDragEvent 对象。

返回值

类型：__Usual
备注
提示 提示：
重要！这是一个由 X# 使用的回调方法。通常情况下，不应在您的应用程序代码中调用它。
OLE 运行时引擎在 AppWindow 对象注册为 OLE 拖放目标后调用以下事件处理程序：OLEDragEnter()、OLEDragOver()、OLEDragLeave() 和 OLEDrop()。
通过检查传递的 OLEDragEvent 对象(例如，特定服务)，您可以通过返回 TRUE 或 FALSE 来允许或禁止拖放操作。
这也会影响拖放光标的外观。
默认情况下，OLEDrop() 返回 TRUE。
对 OLEDrop() 事件的典型响应是使用 CreateFromOLEDragEvent() 方法创建一个新的 OLE 对象。
提示 提示：
在派生类中，您可以实现自己的 OLEDrop 处理程序以自定义默认行为。
提示 提示：
此方法仅在将 OLE 库包含在应用程序的搜索路径中时可用。
示例
以下示例来自 ...\SAMPLES\OLE\CONT 中的 OLE 容器应用程序：
X#
复制
 1METHOD OleDrop(oOleDragEvent) CLASS Container
 2    LOCAL oOle AS OleObject
 3    LOCAL p AS point
 4    LOCAL lRet := FALSE AS LOGIC
 5    oOle := DraggableOLEObject{SELF}
 6
 7    oOle:AllowInPlace     := TRUE
 8    oOle:AllowResize      := TRUE
 9    oOle:AutoSizeOnCreate := TRUE
10
11    IF (oOle:CreateFromOleDragEvent(oOleDragEvent))
12        p := oOleDragEvent:Position
13        SELF:SetupOLEObject(oOle, p)
14        lRet := TRUE
15    ENDIF
16
17    RETURN lRet
参见