Re: GD generates "not a valid image file"
Hi Doug - good point. But removing that does not change the error. I have now tried some other jpg viewers. It turns out that some accept GD's jpg output (eg MS Paint) and some don't (eg Imaging bundled with Win2k). One viewer that worked with the GD example was Irfanview (freeware). But it did not work with a jpg example from Chart::Plot (which uses GD), but did work with a png example. Maybe I should stick to png. My conclusion is that some viewers are fussy about file formats, esp for jpg. I should write to GD's author. Rob At 14:41 25/06/2002 -0500, Dougal Campbell wrote: >What does transparent() do on a JPEG image? JPEG doesn't support >transparency, so could this be causing the GD lib to throw an error of >some sort? ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Suppressing alerts
Hi Gurus, I am using Win32::OLE. I want to suppress the alerts that Excel throws so that I can run my program through a schedular. Can somebody show me the correct way please. Thanx in advance, Parvez ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Perl TK question
You could always launch an external browser? use Win32::Process With the url entered in the text box. there is also a set of modules around which allow you to embed an internet explorer browser in your app -it wasn't quite fully working when I last looked at it 8 months ago though:-( Marty - Original Message - From: "Jack" <[EMAIL PROTECTED]> To: "Perl-Win32-Users" <[EMAIL PROTECTED]> Sent: Wednesday, June 26, 2002 5:36 AM Subject: Re: Perl TK question > - Original Message - > From: "Kevin" <[EMAIL PROTECTED]> > To: "Perl-Win32-Users" <[EMAIL PROTECTED]> > Sent: Tuesday, June 25, 2002 1:08 PM > Subject: Perl TK question > > > > I basically need to develop a small application that will have a textbox to > > enter a URL which will be loaded in a browser component inside of the > > application (IE component - can I use activeX?). When minimized, the > > application will run on the system tray. > > > > Is this possible with Perl/TK? > > Not without a lot of hassle ! I don't know much about Win32::GUI - but I would > suggest it is the better route this time around. There is no 'true' browser like > features in any Tk module that I know of. There was one written by Nick > Ing-Simmons(I think back in 1999). I have not used it - but it only had the > basics. > > A bonus with using Win32::GUI is the notifyicon (aka systray) stuff is built in > (although to have it 'removed' from the taskbar ?still might take some > Win32::API magic?). > > Jack > ___ > Perl-Win32-Users mailing list > [EMAIL PROTECTED] > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl TK question
Marty: What's the IE embedding module for Tk? Do you remember? I'd be really interested in seeing that! jpt > -Original Message- > From: Martin Moss [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, June 26, 2002 7:32 AM > To: Jack; Perl-Win32-Users > Subject: Re: Perl TK question > > > You could always launch an external browser? use Win32::Process > With the url entered in the text box. > there is also a set of modules around which allow you to > embed an internet > explorer browser in your app -it wasn't quite fully working > when I last > looked at it 8 months ago though:-( > > Marty > - Original Message - > From: "Jack" <[EMAIL PROTECTED]> > To: "Perl-Win32-Users" <[EMAIL PROTECTED]> > Sent: Wednesday, June 26, 2002 5:36 AM > Subject: Re: Perl TK question > > > > - Original Message - > > From: "Kevin" <[EMAIL PROTECTED]> > > To: "Perl-Win32-Users" <[EMAIL PROTECTED]> > > Sent: Tuesday, June 25, 2002 1:08 PM > > Subject: Perl TK question > > > > > > > I basically need to develop a small application that will > have a textbox > to > > > enter a URL which will be loaded in a browser component > inside of the > > > application (IE component - can I use activeX?). When > minimized, the > > > application will run on the system tray. > > > > > > Is this possible with Perl/TK? > > > > Not without a lot of hassle ! I don't know much about > Win32::GUI - but I > would > > suggest it is the better route this time around. There is no 'true' > browser like > > features in any Tk module that I know of. There was one > written by Nick > > Ing-Simmons(I think back in 1999). I have not used it - but > it only had > the > > basics. > > > > A bonus with using Win32::GUI is the notifyicon (aka > systray) stuff is > built in > > (although to have it 'removed' from the taskbar ?still > might take some > > Win32::API magic?). > > > > Jack > > ___ > > Perl-Win32-Users mailing list > > [EMAIL PROTECTED] > > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > > > > ___ > Perl-Win32-Users mailing list > [EMAIL PROTECTED] > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Perl TK question
Win32::InternetExplorer::Window Regards Marty - Original Message - From: "Tillman, James" <[EMAIL PROTECTED]> To: "'Martin Moss'" <[EMAIL PROTECTED]>; "Jack" <[EMAIL PROTECTED]>; "Perl-Win32-Users" <[EMAIL PROTECTED]> Sent: Wednesday, June 26, 2002 12:40 PM Subject: RE: Perl TK question > Marty: What's the IE embedding module for Tk? Do you remember? I'd be > really interested in seeing that! > > jpt > > > -Original Message- > > From: Martin Moss [mailto:[EMAIL PROTECTED]] > > Sent: Wednesday, June 26, 2002 7:32 AM > > To: Jack; Perl-Win32-Users > > Subject: Re: Perl TK question > > > > > > You could always launch an external browser? use Win32::Process > > With the url entered in the text box. > > there is also a set of modules around which allow you to > > embed an internet > > explorer browser in your app -it wasn't quite fully working > > when I last > > looked at it 8 months ago though:-( > > > > Marty > > - Original Message - > > From: "Jack" <[EMAIL PROTECTED]> > > To: "Perl-Win32-Users" <[EMAIL PROTECTED]> > > Sent: Wednesday, June 26, 2002 5:36 AM > > Subject: Re: Perl TK question > > > > > > > - Original Message - > > > From: "Kevin" <[EMAIL PROTECTED]> > > > To: "Perl-Win32-Users" <[EMAIL PROTECTED]> > > > Sent: Tuesday, June 25, 2002 1:08 PM > > > Subject: Perl TK question > > > > > > > > > > I basically need to develop a small application that will > > have a textbox > > to > > > > enter a URL which will be loaded in a browser component > > inside of the > > > > application (IE component - can I use activeX?). When > > minimized, the > > > > application will run on the system tray. > > > > > > > > Is this possible with Perl/TK? > > > > > > Not without a lot of hassle ! I don't know much about > > Win32::GUI - but I > > would > > > suggest it is the better route this time around. There is no 'true' > > browser like > > > features in any Tk module that I know of. There was one > > written by Nick > > > Ing-Simmons(I think back in 1999). I have not used it - but > > it only had > > the > > > basics. > > > > > > A bonus with using Win32::GUI is the notifyicon (aka > > systray) stuff is > > built in > > > (although to have it 'removed' from the taskbar ?still > > might take some > > > Win32::API magic?). > > > > > > Jack > > > ___ > > > Perl-Win32-Users mailing list > > > [EMAIL PROTECTED] > > > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > > > > > > > ___ > > Perl-Win32-Users mailing list > > [EMAIL PROTECTED] > > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > > > ___ > Perl-Win32-Users mailing list > [EMAIL PROTECTED] > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs > ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Compare dates question
I like this idea, but the only problem is that it is set to 30 days no
matter what. The date 05/27/2002 runs up on 06/26/2002. Exactically 30 days
later. I was hoping to set it to the exact date from month to month. Like
the start date is 05/27/2002 the end date would be 06/27/2002.
Steve.
>From: "$Bill Luebkert" <[EMAIL PROTECTED]>
>To: steve silvers <[EMAIL PROTECTED]>
>CC: [EMAIL PROTECTED]
>Subject: Re: Compare dates question
>Date: Tue, 25 Jun 2002 12:24:19 -0700
>
>steve silvers wrote:
>>To get the current date im using.
>>
>>my ($mday, $mon, $year) = (localtime(time))[3..5];
>>my $startdate = sprintf "%02u/%02u/%u", $mon + 1, $mday, $year + 1900;
>>
>>Which gives me 06/25/2002
>>
>>I have this written to my database in the startdate field. When people
>>register on the intranet, how can I tell if this date is one month past.
>>Say on 07/25/2002 they won't be able to login because the 1 month period
>>is up.
>>
>>How can I do this. I need to compare the start date of 06/25/2002 each day
>>to see if my script should make them inactive.
>
>I would just use Time::Local and convert each date to epoch time and
>then compare them using normal arithmetic.
>
>use strict;
>use Time::Local;
>
>my $date = "05/27/2002";
>my @d = split '/', $date;
>
>my $epoch = timelocal (0, 0, 0, $d[1], $d[0]-1, $d[2]-1900);
>
>if (time - $epoch > 30 * 86400) {
> print "Your time is up\n";
>} else {
> print "You're OK\n";
>}
>
>__END__
>
>--
> ,-/- __ _ _ $Bill Luebkert ICQ=162126130
> (_/ / )// // DBE Collectibles Mailto:[EMAIL PROTECTED]
> / ) /--< o // // http://dbecoll.tripod.com/ (Free site for Perl)
>-/-' /___/_<_http://www.todbe.com/
>
>___
>Perl-Win32-Users mailing list
>[EMAIL PROTECTED]
>To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
_
Chat with friends online, try MSN Messenger: http://messenger.msn.com
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: GD generates "not a valid image file"
On Wed, 26 Jun 2002, Rob Wilson wrote: > My conclusion is that some viewers are fussy about file formats, esp for jpg. > I should write to GD's author. > Rob What about the interlace() call? That might cause GD to write a progressive JPEG, and I *have* heard that some viewers don't like those -- Ernest MacDougal Campbell III, MCP+I, MCSE <[EMAIL PROTECTED]> http://dougal.gunters.org/ http://spam.gunters.org/ Web Design & Development: http://www.mentalcollective.com/ This message is guaranteed to be 100% eror frea! ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Compare dates question
> I like this idea, but the only problem is that it is set to
> 30 days no
> matter what. The date 05/27/2002 runs up on 06/26/2002.
> Exactically 30 days
> later. I was hoping to set it to the exact date from month to
> month. Like
> the start date is 05/27/2002 the end date would be 06/27/2002.
Well, that's not much different, really. Just keep the day before converting
to epoch time.
my ($month,$day,$year) = (5,27,2002);
my $tl_year = $year-1900;
my $tl_mo = $month%12;
$tl_year+=1 unless ($tl_mo);
if (time - timelocal (0,0,0,$day,$tl_mo,$tl_year) > 0) {
print "Your time is up\n";
} else {
print "You're OK\n";
}
--
Mark Thomas[EMAIL PROTECTED]
for($r=-1;$r!=38;$c++){print"\n",
" "x(38-$r+++($c=0))if($c>
$r);print~$r&$c?
" `":" #"
;}
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: GD generates "not a valid image file"
Yes! This fixed the problem. Many thanks, Rob At 08:14 26/06/2002 -0500, Dougal Campbell wrote: >On Wed, 26 Jun 2002, Rob Wilson wrote: > > > My conclusion is that some viewers are fussy about file formats, esp > for jpg. > > I should write to GD's author. > > Rob > >What about the interlace() call? That might cause GD to write a >progressive JPEG, and I *have* heard that some viewers don't like >those > >-- >Ernest MacDougal Campbell III, MCP+I, MCSE <[EMAIL PROTECTED]> >http://dougal.gunters.org/ http://spam.gunters.org/ > Web Design & Development: http://www.mentalcollective.com/ >This message is guaranteed to be 100% eror frea! ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Reply: Win32 Sound Module install ???
Michael D. Smith [mailto:[EMAIL PROTECTED]] wrote: > I saw this link: > > http://www.activestate.com/PPMPackages/zips/5xx-builds-only/?_x=1 > > but when I click on a zip file on that page, I get the zip > file, on-screen, > in text (mostly garbage actually), instead of the expected > download dialog > box. I "assumed" that was happening because I didn't have the > right build. > The tile does say, "5xx-builds-only," and I have build 633. Actually, this is because the mime-type of the file isn't set correctly by the server, so that the browser doesn't know that it's a .zip file (whatever the mime-type for that is), so it defaults to text/plain... > I right clicked, used "download target as," and managed to > get the zipped > file from the "5xx builds only" page downloaded into my > files, but I'm > waiting for comments again before I proceed. It just does not > feel right. I can't comment on whether this will work with your AS build, but the file you downloaded is the file that you requested from the server... HTH, Ricky ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
extending OLE types
Hi,
I'd like to somehow extend certain OLE types so I can add some extra methods, but I'm
not sure how to go about it. For instance I have the following code:
my $attype = $VOB -> AttributeType ("DeliveryAuthorised");
print "\"" . Win32::OLE -> QueryObjectType ($attype) . "\"";
which prints "ICCAttributeType". Now I would like to extend ICCAttributeType using the
ISA var, so that when calling a method on ICCAttributeType I could print the method
name and the parameters, then pass it to the real ICCAttributeType with super. I think
I have two problems, firstly how to coerce the COM component to give me back my
extended class, and secondly how to implement the new class.
Any pointers?
thanks a lot,
jamie
Visit our website at http://www.ubswarburg.com
This message contains confidential information and is intended only
for the individual named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please
notify the sender immediately by e-mail if you have received this
e-mail by mistake and delete this e-mail from your system.
E-mail transmission cannot be guaranteed to be secure or error-free
as information could be intercepted, corrupted, lost, destroyed,
arrive late or incomplete, or contain viruses. The sender therefore
does not accept liability for any errors or omissions in the contents
of this message which arise as a result of e-mail transmission. If
verification is required please request a hard-copy version. This
message is provided for informational purposes and should not be
construed as a solicitation or offer to buy or sell any securities or
related financial instruments.
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Reply: Win32 Sound Module install ???
- Original Message - From: "Michael D. Smith" <[EMAIL PROTECTED]> > What concerns me is the word "only" in those titles, and the fact that the > server, or my browser, seems to be trying to prevent me from downloading > from that page titled "5xx builds only." > > I right clicked, used "download target as," and managed to get the zipped > file from the "5xx builds only" page downloaded into my files, but I'm > waiting for comments again before I proceed. It just does not feel right. Erm, I doubt your browser is smart enough to prevent you from downloading perl modules which won't work for you =) As I remember (I tried that route some months ago) you'll get a nice runtime error attempting to use it. Now, I have Win32::Sound currently installed on my computer, but I do not recall having installed it (I just rebuilt this box, about a week and a half ago) this time around (Which makes me wonder where it came from). But, that's neither here nor there, what I'm trying to say is that I've built the module many times in the past, and if you like, I have it compiled it on Win2k (using MSVC++ 6) and can send it to you. I'm using build 632, so you'd probably have to use the same. I know that there are one or two errors that occur on the build, but they are easily dealt with. (You have to change references to functions 'na' and 'dowarn' to 'PL_na' and 'PL_dowarn' to get it to compile in 63x builds.) I don't believe that it's thread-safe, but it works. (except for volume controls... shh! =) !chris ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
