Glenn,
> I'd be glad to incorporate your routine into my code, which I hope
> someday to get on SourceForge. However, I have a question about it
> first. I'm not sure i is 100% complete, though... aren't there
> Win32::GUI data structures that need to be altered also?
Probably. I do know that there's no way I could find of extracting the
parent using Win32::GUI's functions. There is no -parent field that
can be retrieved with something like
my $parent = $mainWin->{-parent};
but this works fine.
> And the other question, is where should it be added? I suppose to the
> main Win32::GUI package... Suggest a specific spot, though.
I've just tagged it onto the end of GUI.xs. I suppose a sensible spot would
be somewhere near wherever SetWindowLong() is, since the functions
are related (you can SetWindowLong(-8,hWnd), to set a window's parent
but that doesnt work properly and MSDN says "no! dont do this!! use
SetParent!")
> On approximately 11/15/2003 5:14 PM, came the following characters from
> the keyboard of Steve Pick:
> > Hi,
> >
> > Can anyone currently maintaining or debugging Win32::GUI add this to
GUI.xs?
> > It's a small change that lets you do SetParent() from Perl.
> >
> > I've written a dockable-windows routine (panes in your main window can
be
> > detached into
> > windows) that works with my (very cool) packing grid object, which will
be
> > available to download soon. The docking routine needs to be able to
change a
> > window's parent (of course).
> >
> > This works with 665:
> >
> >
###########################################################################
> > # (@)METHOD:SetParent(VALUE)
> > # Sets a windows parent handle
> > # documentation.
> > HWND
> > SetParent(handle,value)
> > HWND handle
> > HWND value
> > CODE:
> > RETVAL = SetParent(handle, value);
> > OUTPUT:
> > RETVAL
> >
> > While I'm posting I might as well explain what the packing grid object
does.
> > It allows you to pack widgets into a grid. Heard that before? Well this
does
> > it with a difference. Each object you add to the grid can have
properties
> > assigned to it that dictate how it's aligned in the cell (left, center,
> > right, top, middle, bottom) and whether it's stretched to fill the cell
> > (vertically, horizontally or both). Each column or row in the grid can
have
> > a fixed width or a variable width. Variable-widthed columns or rows
stretch
> > to accommodate large widgets, and scale when the grid is resized (the
entire
> > grid can be given Width and Height).
> >
> > Still need more? Columns and rows can be resized. With my DragHandle
object
> > (which is a very simple label that can be dragged around the window
using
> > the mouse, and constrained horizontally and vertically, showing the
> > appropriate cursors of course) you can implement mouse-dragable
column/row
> > sizes very easilly.
> >
> > These three modules are all almost complete, so you'll get them soon.
> > They're all pure perl except for the one mod required for the dockable
> > windows to work. Soon you'll be able to create slick apps *fast* :)
> >
> > Any questions, just ask.
> >
> > Steve
> >
> >
> >
> > -------------------------------------------------------
> > This SF. Net email is sponsored by: GoToMyPC
> > GoToMyPC is the fast, easy and secure way to access your computer from
> > any Web browser or wireless device. Click here to Try it Free!
> > https://www.gotomypc.com/tr/OSDN/AW/Q4_2003/t/g22lp?Target=mm/g22lp.tmpl
> > _______________________________________________
> > Perl-Win32-GUI-Users mailing list
> > Perl-Win32-GUI-Users@lists.sourceforge.net
> > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> >
> >
>
> --
> Glenn -- http://nevcal.com/
> ===========================
> Like almost everyone, I receive a lot of spam every day, much of it
> offering to help me get out of debt or get rich quick. It's ridiculous.
> -- Bill Gates
>
> And here is why it is ridiculous:
> The division that includes Windows posted an operating profit of $2.26
> billion on revenue of $2.81 billion.
> --from Reuters via
> http://biz.yahoo.com/rc/031113/tech_microsoft_msn_1.html
>
> So that's profit of over 400% of investment... with a bit more
> investment in Windows technology, particularly in the area of
> reliability, the profit percentage might go down, but so might the bugs
> and security problems? Seems like it would be a reasonable tradeoff.
> WalMart earnings are 3.4% of investment.
>
>
>
> -------------------------------------------------------
> This SF. Net email is sponsored by: GoToMyPC
> GoToMyPC is the fast, easy and secure way to access your computer from
> any Web browser or wireless device. Click here to Try it Free!
> https://www.gotomypc.com/tr/OSDN/AW/Q4_2003/t/g22lp?Target=mm/g22lp.tmpl
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Perl-Win32-GUI-Users@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>
