Maus sperren während Tastatureingabe

[Apollonius]

Kein Thema.

Delphi-Quellcode:

//Anwendung
hMapping := CreateFileMapping(INVALID_HANDLE_VALUE, nil, PAGE_READWRITE, 0, 4, 'The mapping of the black drake');
pView := MapViewOfFile(hMapping, FILE_MAP_WRITE, 0, 0, 0);

PCardinal(pView)^ := Handle;

//Aufräumen bei Programmende
UnmapViewOfFile(pView);
CloseHandle(hMapping);


//In der DLL
hMapping := OpenFileMapping(FILE_MAP_ALL_ACCESS, False, 'THe mapping of the black drake');
pView := MapViewOfFile(hMapping, FILE_MAP_READ, 0, 0, 0);

TargetHandle := PCardinal(pView)^;

//Aufräumarbeiten bei DLL_PROCESS_DETACH
UnmapViewOfFile(pView);
CloseHandle(hMapping);