X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/8a616f3f3967a8446407e6a63f675d19191ad568..19e44013088ff80c11e1d7c045331b96f4dc41f0:/unitwindowobject.pas?ds=inline diff --git a/unitwindowobject.pas b/unitwindowobject.pas index 48c356b..414f975 100644 --- a/unitwindowobject.pas +++ b/unitwindowobject.pas @@ -118,7 +118,7 @@ begin '', dwstyle, CW_USEDEFAULT, CW_USEDEFAULT,100, 100, hwnd(0), 0, HInstance, nil); //swriteln('about to check result of createwindowex'); if hWndMain = hwnd(0) then raise exception.create('CreateWindowEx failed'); - //swriteln('about to store reference to self in extra windo memory'); + //swriteln('about to store reference to self in extra window memory'); setwindowlongptr(hwndmain,0,taddrint(self)); //swriteln('finished twindowobject.create , hwndmain='+inttohex(taddrint(hwndmain),16)); end;