Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (ByRef Destination As Any, ByRef Source As Any, ByVal numbytes As Long) CopyMemory F(0), ByVal SharedMemPointer, Len(F)
hMem = GlobalAlloc(GMEM_MOVEABLE Or GMEM_ZEROINIT, Len(lf)) pMem = GlobalLock(hMem) CopyMemory ByVal pMem, lf, Len(lf)....... If ChooseFontDlg(cf) <> 0 Then CopyMemory lf, ByVal pMem, Len(lf)
CopyMemory F(0), ByVal SharedMemPointer, Len(F)
hMem = GlobalAlloc(GMEM_MOVEABLE Or GMEM_ZEROINIT, Len(lf))
pMem = GlobalLock(hMem)
CopyMemory ByVal pMem, lf, Len(lf)....... If ChooseFontDlg(cf) <> 0 Then
CopyMemory lf, ByVal pMem, Len(lf)
lPtr = GlobalLock(hMem)
CopyMemory ByVal lPtr, tBH.bfType, 2
CopyMemory ByVal lPtr + 2, tBH.bfSize, 4
CopyMemory ByVal lPtr + 6, 0&, 4
CopyMemory ByVal lPtr + 10, tBH.bfOffBits, 4
lSize = 14
lR = WriteFile(hFile, ByVal lPtr, lSize, lBytesWritten, ByVal 0&)
GlobalUnlock hMem
GlobalFree hMem....
在这个WriteFile(hFile, ByVal lPtr, lSize, lBytesWritten, ByVal 0&)中
如果我要用到LPOVERLAPPED lpOverlapped 这个参数,那么怎样把这个OVERLAPPED 结构写到WriteFile的参数中去呢。
急!!!