Module: VROleDragSourceLow

Includes:
ClipboardFormat, OleDnDConstants, VRUserMessageUseable
Included in:
VROleDragSource
Defined in:
lib/vr/vrolednd.rb

Constant Summary

Constants included from VRMessageHandler

VRMessageHandler::PREHANDLERSTR

Constants included from OleDnDConstants

OleDnDConstants::DROPEFFECT_COPY, OleDnDConstants::DROPEFFECT_LINK, OleDnDConstants::DROPEFFECT_MOVE, OleDnDConstants::DROPEFFECT_NONE, OleDnDConstants::IDROPTARGET_NOTIFY_DRAGENTER, OleDnDConstants::IDROPTARGET_NOTIFY_DRAGLEAVE, OleDnDConstants::IDROPTARGET_NOTIFY_DRAGOVER, OleDnDConstants::IDROPTARGET_NOTIFY_DROP

Constants included from ClipboardFormat

ClipboardFormat::CF_HDROP, ClipboardFormat::CF_OEMTEXT, ClipboardFormat::CF_TEXT, ClipboardFormat::CF_URL, ClipboardFormat::RegisterClipboardFormat

Instance Method Summary collapse

Methods included from VRUserMessageUseable

#registerUserMessage, #userMessage, #usermessageuseableinit

Methods included from VRMessageHandler

#acceptEvents, #addHandler, #addNoRelayMessages, #controlmsg_dispatching, #deleteHandler, #msghandlerinit, #selfmsg_dispatching

Instance Method Details

#oledragsourcelowinitObject



148
149
150
151
# File 'lib/vr/vrolednd.rb', line 148

def oledragsourcelowinit
  @vr_oledragmessage = registerUserMessage(ReservedMsg::WM_VR_OLEDND,"vr_oledrag",0)
  addEvent @vr_oledragmessage
end

#self_getoledragitem(format) ⇒ Object



166
167
168
# File 'lib/vr/vrolednd.rb', line 166

def self_getoledragitem(format)
  0
end

#self_vr_oledrag(wparam, lparam) ⇒ Object



161
162
163
164
# File 'lib/vr/vrolednd.rb', line 161

def self_vr_oledrag(wparam,lparam)
  handle = selfmsg_dispatching("getoledragitem",wparam).to_i
  set_dragobj_lparam(lparam,handle)
end

#set_dragobj_lparam(lparam, hMem) ⇒ Object



153
154
155
# File 'lib/vr/vrolednd.rb', line 153

def set_dragobj_lparam(lparam,hMem)
  @screen.application.pokeMemory(lparam,hMem,4)
end

#start_oledragsource(formats, effect = 0x3) ⇒ Object



157
158
159
# File 'lib/vr/vrolednd.rb', line 157

def start_oledragsource(formats,effect=0x3)
  dndSourceStart @vr_oledragmessage,formats,effect
end

#vrinitObject



143
144
145
146
# File 'lib/vr/vrolednd.rb', line 143

def vrinit
  super
  oledragsourcelowinit
end