[perl-win32-gui-users] Win32-API and ghostscript API

2005-04-20 Thread Rogers, John
hi, I want to access the ghostscript API for the gsdll32.dll. been trying this any which way cant make it work, I must be doing some thing wrong any Ideas ? ### use strict; use Win32::API; Win32::API::Struct-typedef( REVINFO = qw{ CHAR *product;

RE: [perl-win32-gui-users] Win32-API and ghostscript API

2005-04-20 Thread Rogers, John
sorry wrong list :-) -Original Message- From: Rogers, John Sent: Wednesday, 20 April 2005 4:56 PM To: Perl-Win32-Gui-Users (E-mail) Subject: [perl-win32-gui-users] Win32-API and ghostscript API hi, I want to access the ghostscript API for the gsdll32.dll. been trying this any

RE: [perl-win32-gui-users] Latest Documentation?

2002-10-23 Thread Rogers, John
The only source, IS the source package ! eg find this file Win32-GUI-0.0.665.tar.gz Has docs AND samples, what more could you want ? Also, Thank you Mr Calpini for your module, I cant thankyou enough!. JohnR -Original Message- From: Rob [mailto:[EMAIL PROTECTED] Sent: Thursday,

RE: [perl-win32-gui-users] HOWTO: Modal windows

2002-10-21 Thread Rogers, John
Johan, I tested your script with 0.0.665 on Win2k, Works as you describe, shame about the jumping though. I used to call Dialog this way, (ignorant of modal I admit) then I read methods.html in the docs which states, note that this function must be called without ANY parameter or

[perl-win32-gui-users] RE: textfield prompt color

2002-07-15 Thread Rogers, John
Scott, It dosnt seem like anyone has answered you yet, so here goes, 1) define Textfield, or label colour. -foreground =[ 0, 0, 255] , -background =[0,255,0], 0 to 255 red,green,blue 2) you can get the handle with -handle eg $handle=$winMain-lblname()-{-handle});

[perl-win32-gui-users] RE: communication between GUI scripts

2002-07-10 Thread Rogers, John
These two curious scripts below where posted on this list some time ago, (there is no archive search sorry I dont know who) Its probably not quite what you wanted, but could be worth a play. #-sender.pl #!perl -w use strict; use Win32::GUI; my $hwind = gethandle; #my $hwind =

RE: [perl-win32-gui-users] Win32::GUI::Class() ??

2002-07-09 Thread Rogers, John
Howdy, Ive used Class to set Icons and cursers. EG. $I = new Win32::GUI::Icon(icon.ico); $C=new Win32::GUI::Bitmap(no.cur, 2); $WinClass = new Win32::GUI::Class( -name = johns-windows, -cursor = $C, -icon = $I,); Windows created with -class =

RE: [perl-win32-gui-users] How do I recognize that the user has pressed enter inside a text box?

2002-07-01 Thread Rogers, John
Hi, If you specify, -multiline=1, when you define the textfield, then the Change() event occurs when the user presses enter. My idea is you could search the text string as each character is typed and match on enter. something like this, #untested code sub textfield_Change{my $rtest = 0;

RE: [perl-win32-gui-users] fonts and colors

2002-05-29 Thread Rogers, John
outgoing ftp the tabstrip text changes to red, or something. i've tried using -foreground = [255,0,0] and/or 0xFF(which i think is red) but I had a look at the docs I dont think you can control the tab strip text in this way. from win32gui.html... -

RE: [perl-win32-gui-users] terminate

2002-05-21 Thread Rogers, John
sub Settings_Terminate { $Window2-Hide(); return 0; } Settings is the -name of the pop up Window ? must be the windows name . EG my $Window2 = new Win32::GUI::Window( -title = 'hello.pl', -left= 100, -top = 100, -width = 150, -height = 100,

RE: [perl-win32-gui-users] popup window

2002-04-10 Thread Rogers, John
Mark, just dont show it untill your ready, read the docs about $windowobject-Show() and $windowobject-Hide(); JohnR -Original Message- From: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED] Sent: Wednesday, April 10, 2002 5:01 PM To: perl-win32-gui-users@lists.sourceforge.net Subject:

RE: [perl-win32-gui-users] terminating popup window

2002-04-10 Thread Rogers, John
Hi, If its a gui loft window _Terminate (clicking X)will return -1 by default, thus destroying your window object. override it by adding return 0; to the Window2 _Terminate sub eg sub Window2_Terminate { $Window2-Hide(); return 0; } JohnR -Original Message- From: [EMAIL

FW: [perl-win32-gui-users] textfields and combobox's

2002-04-08 Thread Rogers, John
Mark, Its Something like, get a text string, $string=$WindowObject-nameofbox-Text(); set an text string $WindowObject-nameofbox-Text($string); JohnR -Original Message- From: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED] Sent: Tuesday, April 09, 2002 11:41 AM To:

RE: [perl-win32-gui-users] Win32::GUI::DragDrop

2001-12-20 Thread Rogers, John
couple questions: 1- has anyone used this sucessfully? if so, do you have any code to share? AFAIKDragDrop.pm came from the GUI LOFT by Johan Lindström,and was not part of the original WIN32::GUI. http://www.bahnhof.se/~johanl/perl/Loft/ you can use it for your own windows. see

RE: [perl-win32-gui-users] Problem with updating the color of a t extfield

2001-12-04 Thread Rogers, John
AFAIK, You can use -foreground[r,g,b] and -background[r,g,b] when you create the textfield. (r,g,b is colour values 0 to 255) but they cant be changed. One work around idea would be to make two textfields, then hide and show each to change, you would have to keep the text in sync. JohnR

[perl-win32-gui-users] fork and LostFocus problems

2001-11-14 Thread Rogers, John
Howdy, I thought I could use fork with Win32-GUI and wait for a message it seems to have various problems unless I am doing something wrong. If fork is before show window,then window wont initailise untill forked sub exits. if launched form a event (activate button in this case) then other

RE: [perl-win32-gui-users] Capture shutdown

2001-11-14 Thread Rogers, John
Marcus, The mod to GUI.xs does in fact work. Ive tested on, (or had it tested) Win95a/b and win98 works O.K windows will not shutdown untill shutdown sub has finished. WinNT40 and WIN2K non console app works O.K

[perl-win32-gui-users] RE: Peekmessage (was Capture shutdown)

2001-11-08 Thread Rogers, John
Well knock me down, and hand the red face prize, :-) I got no answer to previous post, so I assume it was just too amusing. peek message it would seem, will only work on your own windows. so where $Win1 is the WI32-GUI window object.

RE: [perl-win32-gui-users] Capture shutdown

2001-11-06 Thread Rogers, John
I tried this, it half works, When shutting down windows, it would appear that the Perl window terminates before executing the sub. I put a file write and a $wait=; in the $Win_Shutdown sub so I dont think I missed it. The Gui.xs mod works though, If I send a WM_QUERYENDSESSION message manually

[perl-win32-gui-users] Peekmessage (was Capture shutdown)

2001-11-06 Thread Rogers, John
Howdy, Marcus wrote, How do you use PeekMessage? Yes, How do you use Peekmessage, my feeble attempt follows it dosnt work. Can any one help or is it truly broken or Am I just plain wrong? JohnR #!perl use strict; use Win32::GUI; use Win32::API; #Put the name of the window my $winname=Test

RE: [perl-win32-gui-users] interactive help [? ]button

2001-08-05 Thread Rogers, John
I looked up this theard and others in the archives I now know how to hide it , Thanks But my question still remains, how to make it Do something ? JohnR -Original Message- From: Forhan, Michael [mailto:[EMAIL PROTECTED] Sent: Friday, 3 August 2001 11:55 To:

[perl-win32-gui-users] interactive help [? ]button

2001-08-02 Thread Rogers, John
Gday, I just joined this list Ive been using perl a Win32::GUI for a few months now, I posted the following on win32 users list and got no answer any one here help ? - Does anyone know how to use the interactive help, (?) button on the dialogbox ??? cant find it in the docs dosent have