----------------------------------------------------------------------------- }\r
\r
//this unit provides a rough approximation of windows messages on linux\r
-//it is usefull for multithreaded applications on linux to communicate back to\r
+//it is useful for multithreaded applications on linux to communicate back to\r
//the main lcore thread\r
//This unit is *nix only, on windows you should use the real thing\r
\r
const\r
WS_EX_TOOLWINDOW = $80;\r
WS_POPUP = longint($80000000);\r
+ CW_USEDEFAULT=$80000000;\r
hinstance=nil;\r
PM_REMOVE = 1;\r
WM_USER = 1024;\r
lcorelinkpiperecv : tlasio;\r
windows : thashtable;\r
//I would rather things crash immediately\r
- //if they use an insufficiant size type\r
+ //if they use an insufficient size type\r
//than crash after over four billion\r
//windows have been made ;)\r
nextwindowhandle : qword = $100000000;\r
//swriteln('duplicate window class registered with different settings');\r
raise exception.create('duplicate window class registered with different settings');\r
end else begin\r
- //swriteln('duplicate window class registered with same settings, tollerated');\r
+ //swriteln('duplicate window class registered with same settings, tolerated');\r
end;\r
end else begin\r
//swriteln('about to allocate memory for new windowclass');\r
window := twindow(findtree(@windows,inttostr(ahwnd)));\r
if window <> nil then begin\r
freemem(window.extrawindowmemory);\r
- //writeln('aboute to delete window from windows structure');\r
+ //writeln('about to delete window from windows structure');\r
deltree(@windows,inttostr(ahwnd));\r
//writeln('deleted window from windows structure');\r
windowthreaddata := tthreaddata(findtree(@threaddata,inttostr(taddrint(window.threadid))));\r