> What about this: > > procedure TPlotfrm.WMSysCommand(var Message: TWMSysCommand); > begin > if (Message.CmdType and $FFF0 = SC_minimize) then > begin > statusbar1.panels[0].text := 'Minimise called'; > Application.minimize; > end; > inherited; > end;
Nope. Minimise called but the window doesn't minimize. Take about frustrating. ---------------------------------------------------------- Phil Scadden, GNS Science Ltd 764 Cumberland St, Private Bag 1930, Dunedin, New Zealand Ph +64 3 4799663, fax +64 3 477 5232 _______________________________________________ NZ Borland Developers Group - Delphi mailing list Post: [email protected] Admin: http://delphi.org.nz/mailman/listinfo/delphi Unsubscribe: send an email to [EMAIL PROTECTED] with Subject: unsubscribe
