SendMessage WM_APP, send and receive string (using QM & .js)

[Gintaras]

Macro Macro2333

Code:

Copy      Help

;;;;//hMem=OpenFileMappingA(FILE_MAP_ALL_ACCESS, FALSE, "Global\\AkelPad");
;;;;//szMem=MapViewOfFile(hMem, FILE_MAP_ALL_ACCESS, 0, 0, 1000);
;;;;//Read szMem.
;;;;//UnmapViewOfFile(szMem);

;read the sent string from the shared memory
__SharedMemory sm
lpstr m=sm.Open("Global\AkelPad")
out m

;write a string to the shared memory, let js read it
str r="TEST"
int dwMemSize=1000
lstrcpyn m r dwMemSize