Re^3: 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]

Comment on Re^3: My first pTk megawidget Download Code

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]
Re^5: My first pTk megawidget by choroba (Cardinal) on Nov 10, 2021 at 21:27 UTC
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]
Re^6: My first pTk megawidget by Anonymous Monk on Nov 10, 2021 at 22:06 UTC
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]
Re^7: My first pTk megawidget by Anonymous Monk on Nov 11, 2021 at 21:42 UTC


Perl-Sensitive Sunglasses
	PerlMonks