Maximized message window

Discussions related to Visual Prolog
User avatar
Tonton Luc
VIP Member
Posts: 502
Joined: 16 Oct 2001 23:01

Maximized message window

Unread post by Tonton Luc » 18 Dec 2019 10:29

Hi,

Is it possible to maximized dynamically the message window ?

Harrison Pratt
VIP Member
Posts: 287
Joined: 5 Nov 2000 0:01

Re: Maximized message window

Unread post by Harrison Pratt » 18 Dec 2019 12:29

In TaskWindow do something like this (with some extra manipulations):

Code: Select all

facts     msgForm: messageForm := erroneous. predicates     onShow : window::showListener. clauses     onShow(_, _CreationData) :-         This:setClientSize(1000, 700), % make the application client window a little smaller         center(), % center on desktop         MessageForm = messageForm::display(This),         msgForm := MessageForm, % save for access elsewhere         MessageForm:setVerticalSize(messageForm::parentRelative(0.97)), % 97% of parent window         MsgControl = MessageForm:getMessageControl(),         MsgControl:setLines(5000), % so don't lose early lines when writing to the Messages form         MsgControl:setFont(vpi::fontCreateByName("Consolas", 10)).

User avatar
Thomas Linder Puls
VIP Member
Posts: 1632
Joined: 28 Feb 2000 0:01

Re: Maximized message window

Unread post by Thomas Linder Puls » 19 Dec 2019 9:49

I think you are asking about:

Code: Select all

messageForm:setState([wsf_maximized])
To bring it back to normal/restored state you use the wsf_restored flag.

You should however notice that maximizing is for all the MDI child windows; either the MDI parent displays the child windows maximized or at their "restored" size. There is no setting where some children are maximized and other restored.
Regards Thomas Linder Puls
PDC

Post Reply