How can I detect window resize event using Win32::GUI and WM_DISPLAYCHANGE?

Question

I am struggling to make a simple receive WM_DISPLAYCHANGE informing my Win32::GUI app that the Windows Screen Resolution has changed, since the results for this question here is "0" accordingly informed by the search engine.

Could you provide a simple working example of a simple Win32::GUI program that detects a WM_DISPLAYCHANGE message and prints some info about that change in resolution?

LocusSolus · Accepted Answer · 2016-09-16 15:50:41Z

2

From user "beech" at PerlMonks: http://perlmonks.org/index.pl?node_id=1171819

Try using the Hook method:

something like

$main->Hook( WM_DISPLAYCHANGE(), \&onDisplayChange );
sub onDisplayChange {
    my( $object, $wParam, $lParam, $type, $msgcode) = @_;
    print "Click handler called!\n";
}

edited Sep 16, 2016 at 15:50

answered Sep 15, 2016 at 20:38

LocusSolus

411 silver badge7 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

IInspectable Over a year ago

When quoting, it would be nice to provide a reference alongside proper attribution. Otherwise it will look like plagiarism.

Chankey Pathak · Accepted Answer · 2016-09-15 07:15:47Z

0

Give a name to your window. Let's call it Main.

$main = Win32::GUI::Window->new(
                -name   => 'Main',
                -width  => 100,
                -height => 100,
        );

Now, define an event handler for the window. It should be of below pattern:

<window name>_<event name>

For example, for Resize event the event handler should be Main_Resize.

sub Main_Resize {
    my $mw = $main->ScaleWidth();
    my $mh = $main->ScaleHeight();
    my $lw = $label->Width();
    my $lh = $label->Height();
    #print the height/width or whatever you want
}

I would suggest going through Win32::GUI::Tutorial.

edited Sep 15, 2016 at 7:15

answered Sep 15, 2016 at 7:10

Chankey Pathak

21.8k12 gold badges88 silver badges137 bronze badges

2 Comments

IInspectable Over a year ago

This doesn't address the question. Please pay attention, when editing a question to not ask a different one. The question is (was) asking about receiving the WM_DISPLAYCHANGE message.

LocusSolus Over a year ago

Hi Chankey, thanks for your interest in this matter. WM_DISPLAYCHANGE is a message sent by Windows through the system to inform a screen resolution change. For example: change your screen resolution from 1024x768 to 800x600, then WM_DISPLAYCHANGE is sent. I am trying to detect inside a Win32::GUI perl app.

Collectives™ on Stack Overflow

How can I detect window resize event using Win32::GUI and WM_DISPLAYCHANGE?

2 Answers 2

1 Comment

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

1 Comment

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related