Really wasn't trying to be vague, but I think I definitely succeeded. I found samples a lot like Daves in many places, and they were all quite similar. It would seem this is what I need to be able to paste into Windows Explorer (or other apps):
Code:
#COMPILE EXE #DIM ALL #INCLUDE "WIN32API.INC" FUNCTION PBMAIN () AS LONG CALL WriteToClipboard("C:\TEST.TXT" + $NUL + "C:\ADAMTMP.TXT") END FUNCTION SUB WriteToClipboard(inBuf AS STRING) LOCAL df AS DROPFILES LOCAL tmp AS STRING * 20 LOCAL buf AS STRING LOCAL nLen AS LONG LOCAL nGblLen AS LONG LOCAL hGbl AS LONG LOCAL tmpInBuf AS STRING LOCAL lpGlobal AS LONG LOCAL szPtr AS ASCIIZ PTR tmpInBuf = inBuf + $NUL + $NUL df.pFiles = 20 df.fWide = 0 nLen = LEN(tmpInBuf) nGblLen = SIZEOF(df) + nLen hGbl = GlobalAlloc(%GHND, nGblLen) lpGlobal = GlobalLock(hGbl) CopyMemory lpGlobal, VARPTR(df), SIZEOF(df) CopyMemory lpGlobal + 20, BYVAL STRPTR(tmpInBuf), BYVAL LEN(tmpInBuf) GlobalUnLock hGbl IF OpenClipboard(0) THEN EmptyClipboard() SetClipboardData %CF_HDROP, hGbl CloseClipboard() END IF GlobalFree hGbl END SUB
Leave a comment: