in reply to Re^2: My first pTk megawidget
in thread My first pTk megawidget

In your original code, you had the button code in the megawidget, but commented out. I uncommented it and it worked. Please post code we can run to see the problem without having to shuffle parts of it around and guessing.

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]

Replies are listed 'Best First'.
Re^4: My first pTk megawidget
by Anonymous Monk on Nov 10, 2021 at 21:04 UTC

    If you said it worked, is it possible that I am interpreting what I am seeing on the screen wrong? The desired result is this widget will float on a large (1000x1000) frame; when data is entered, or "Abort" is clicked, it will disappear and leave the original frame and GUI. If I am interpreting it wrong, then I need to make a bogus GUI for the megawidget to float on.

[reply]
      I don't understand. Please describe what happens and how it differs from your expectations. Try to be precise, avoid using "it" after introducing several widgets as it's unclear which one it refers to.

      Also, try to post runnable code. I can't find Tk::ListBox3 anywhere.

      Moreover, you mentioned an error in the first post. What error was that?

      map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
[reply]
[d/l]

        The call to ListBox3 is commented . It is unneeded. I might have fixed the error. When I call the widget I see what I want. When I click on the red "Abort" button, I get a frame that is blanked out. Is this correct? Like I said: Am I interpreting what I see on the screen correctly?

[reply]

In Section Seekers of Perl Wisdom