#Help w/SizeWindow!!!
07-Jul-89 13:39:18
Sb: #56112-#Help w/SizeWindow!!!
Fm: David Czaya 73445,407
To: Mike Weiblen 72506,2072
You have to do a Wait() for the message to know when SizeWindow() is done.
If you can make out Modula-2 code, here's a procedure you could call to check
that your window sizing task is completed
PROCEDURE CheckSize(win: WindowPtr); VAR
sig : SignalSet;
msg : IntuiMessagePtr;
class : IDCMPFlagSet; BEGIN
LOOP
sig := Wait(SignalSet{CARDINAL(win^.UserPort^.mpSigBit)});
msg := GetMsg(win^.UserPort);
WHILE msg # NIL DO
ReplyMsg(msg);
class := msg^.Class;
IF class = IDCMPFlagSet{NewSize} THEN
RETURN;
END;
msg := GetMsg(win^.UserPort);
END;
END; END CheckSize;