Re: [perl-win32-gui-users] to erick
| was trying to run your ftp client. I can't seem to install the net:ftp on | a win32 activestate perl. where can i find a net:ftp that will install on | win32 . it seems that all modules i get from cpan, i don't know how to | install them. When I install modules from CPAN, I use the 'nmake' utility instead of the 'make' utility. I have yet to have a problem. I got it from some obscure link at Microsoft. I don't remember the actual link, but I could send you the needed files (2 of them) directly to you (34.7 KB zip). | P.S. i am working on an ftp client as well, using the win32:internet | module, as i could not install the net:ftp, but i like the net:ftp module | better (more functions). I don't know about win32:internet module, but Net::FTP is OOP, it's easy. | I like your site. Thanks a lot, at least there somebody out there that has seen it, and I'm not doing all of this for nothing :) erick never stop questioning www.jeb.ca
Re: [perl-win32-gui-users] Tab Strip best practices?
Laurent wrote: I have made some packages for easy handle tabstrip. I use a container object for each page and hide/show it. Arghh! I didn't read mail during the weekend and ended up writing my own little class: Win32::GUI:TabStripGroup Oh, well... :) You can download it at : http://perso.club-internet/rocherl/TabPanel.zip http://perso.club-internet/rocherl/TabFrame.zip Great, I'll look into that, thanks! To the rest of you, please note that the correct URL (one Google search later) is: http://perso.club-internet.fr/rocherl/TabPanel.zip /J -- Johan Lindström, Sourcerer, Boss Casinos Ltd, Antigua [EMAIL PROTECTED]
Re: [perl-win32-gui-users] to erick
> >When I install modules from CPAN, I use the 'nmake' utility instead of >the 'make' utility. I have yet to have a problem. I got it from some >obscure link at Microsoft. I don't remember the actual link, but I could >send you the needed files (2 of them) directly to you (34.7 KB zip). thanx erick, if you can send it to me, ([EMAIL PROTECTED]) it would be appreciated. also if you can show me how to use nmake to install it on activestate perl, i will appreciate it. Jeremy
Re: [perl-win32-gui-users] Nonblocking sockets?
[I'm looking through the archives and found quite a few interesting posts] Ludvig af Klinteberg didn't get any response on this question: >This may not be a straight Win32::GUI question, but I think >it might concern those who write networking Perl scripts >with a UI for win32. The question is simple: how to make a >socket nonblocking in Perl on Windows? The usual >fcntl($sock,F_SETFL,O_NONBLOCK) does apparently not work, so >what to do? I have a vague memory of some hackish parameters >that could do the trick, but I don't remember what... Check out this thread at PerlMonks: http://www.perlmonks.org/index.pl?node_id=65814&lastnode_id=3989 /J -- Johan Lindström, Sourcerer, Boss Casinos Ltd, Antigua [EMAIL PROTECTED]
[perl-win32-gui-users] Exiting Dialog()
I bumped into a little problem yesterday and before figuring out the,
probably, correct way of exiting the Win32::GUI::Dialog() event loop by
returning -1 from an event handler routine, I created this little hack to
do it for me.
Now my question is if my way is a bad, evil thing or perhaps a clever way
of using an undocumented feature :)
Here is the code (probably with weird line breaks):
=head1 CONSTANTS
=head2 WM_EXITLOOP
Custom message to exit from the Dialog() sub.
=cut
use constant WM_APP => 0x8000; #From winuser.h (Visual Studio)
use constant WM_EXITLOOP => WM_APP + 1; #From GUI.xs
=head1 ROUTINES
=head2 exitDialog($winSomewindow)
Exit from the Win32::GUI::Dialog event loop.
$winSomewindow -- A Win32::GUI window object we can send the
WM_EXITLOOP message to.
Return 1 on success, else 0.
=cut
sub exitDialog {
my ($winSomewindow) = @_;
$winSomewindow->PostMessage(WM_EXITLOOP, -1, 0);
return(1);
}
Now, if this is in fact a healthy thing to do, is there any way of
"broadcasting" it into the eventloop so I don't have to provide a window
object?
And if this is a good thing, is there any hope of seeing this merged into
Win32::GUI? Right now it lives in my very private Win32::GUI::AdHoc module.
/J
--
Johan Lindström, Sourcerer, Boss Casinos Ltd, Antigua
[EMAIL PROTECTED]
[perl-win32-gui-users] Using both protocols fo AddHyperlink
I have a problem when I use both protocols, for the Hyperlink module, one after
the other.
The following example will open a the mailto always, for both. And when I
switch them,
that is, put the http after the mailto, then it will always open a the http,
for both. It
falls through and the first one is ignored. I tried looking at the hyperlink
module, but
I don't see anything wrong. Any thoughts?
# Script #
use Win32::GUI;
use Win32::GUI::HyperLink;
my $Window = new Win32::GUI::Window(
-title => 'Win32::GUI::HyperLink demo',
-pos => [ 100, 100 ],
-size => [ 150, 100 ],
-name => 'Window',
);
$Window->AddHyperLink(
-text => "dada's perl lab",
-name => "test",
-pos => [ 25, 15 ],
-url => "http://dada.perl.it";,
);
$Window->AddHyperLink(
-text => "email dada's perl lab",
-name => "test",
-pos => [ 25, 35 ],
-url => "mailto:[EMAIL PROTECTED]",
);
$Window->Show();
Win32::GUI::Dialog();
sub Window_Terminate {
return -1;
}
# EOF #
erick
never stop questioning
www.jeb.ca
RE: [perl-win32-gui-users] Using both protocols fo AddHyperlink
| that is, put the http after the mailto, then it will always | open a the http, for both. It | falls through and the first one is ignored. you must have unique names for the controls. In the sample code, they're both named "test". The second redefines the first.
