X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/ed1d49cbe548d9fb26a50f1b2381b693c3c01790..968c333d05db5d5ecf3599f8e304c67e64f21159:/unitwindowobject.pas diff --git a/unitwindowobject.pas b/unitwindowobject.pas index cc7f1e1..1c0d32d 100644 --- a/unitwindowobject.pas +++ b/unitwindowobject.pas @@ -9,7 +9,7 @@ interface uses classes, - {$ifdef win32} + {$ifdef mswindows} windows,messages,wmessages, {$else} lmessages, @@ -34,7 +34,7 @@ type function killtimer(id:taddrint):boolean; procedure postmessage(msg,wparam,lparam:taddrint); procedure messageloop; - {$ifdef win32} + {$ifdef mswindows} procedure processmessages; virtual; function processmessage:boolean; {$endif}