Re: [perl-win32-gui-users] Event subroutines not called

2006-08-29 Thread Peter Eisengrein
Works fine for me. Perl v5.8.3 Win-GUI 0.0.558 > -Original Message- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] > Behalf Of > Arthur Schwarz > Sent: Monday, August 28, 2006 2:20 PM > To: perl-win32-gui-users@lists.sourceforge.net > Subject: [perl-win32-gui-users] Event subrouti

RE: [win32-gui] [perl-win32-gui-users] Examples needed.

2006-04-14 Thread Peter Eisengrein
> By disabled I mean literally the grayed out condition allowing the user to see (and > scroll through) the list but preventing the user from checking/unchecking any > checkboxes. If I set disabled => 1, in AddListView the control is definately > disabled ... but it doesn't allow the user to s

RE: [perl-win32-gui-users] Auto focus on a listview or textfield

2006-04-11 Thread Peter Eisengrein
> > I want to make an auto focus on a listview or a textfield when i make > it appears. Like that, the user don t have to click on it to make > mouse scrolling. > $widget->SetFocus(); > > ps: sorry for my poor english, i'm french student learning english :D > No problem. There are a lot of

RE: [perl-win32-gui-users] how to make a MessageBox the top most dialog ?

2006-04-10 Thread Peter Eisengrein
> is there a way to make a MessageBox the top most dialog while looking for > some win32 window ? When you construct $MainWin you can use: -topmost => 1, Or if you just want to bring it to the foreground at somepoint you can also use: $MainWin->SetForegroundWindow();

RE: [perl-win32-gui-users] DOS Window minimized?

2006-04-06 Thread Peter Eisengrein
> You are the man! That worked! Now, can someone further > explain what an > Iconic window is? I would have never had thought that Iconic meant > minimized and if I did, I could have found this solution by googling > Iconic I'm sure. Why, iconic is minimized of course! I must've posted a sim

RE: [perl-win32-gui-users] DOS Window minimized?

2006-04-06 Thread Peter Eisengrein
> > if ($DOS = minimized) { Win32::GUI::Hide($DOS); } > Try if ($DOS->IsIconic) { Win32::GUI::Hide($DOS); }

RE: [perl-win32-gui-users] RE: Win32-GUI and PPM problem - RESOLV ED

2006-01-24 Thread Peter Eisengrein
Resolved! > >>Error: no suitable installation target found for package Win32-GUI. > > > > I've done some more poking around and it seems that this > error is usually > > when a package was made with an older version of perl (can > anyone confirm?). > > Well, I seem to have the opinion that it

[perl-win32-gui-users] RE: Win32-GUI and PPM problem

2006-01-23 Thread Peter Eisengrein
> Error: no suitable installation target found for package Win32-GUI. I've done some more poking around and it seems that this error is usually when a package was made with an older version of perl (can anyone confirm?). So, I uninstalled the version of perl that is on that machine (5.8.7) and re

RE: [perl-win32-gui-users] Win32-GUI and PPM problem

2006-01-17 Thread Peter Eisengrein
> There have been lots of changes and fixes since 0.0.558, but I'm > surprised > it breaks your code. Can you give examples? It gives and error for this line: $Window->Editor->SendMessage(1093, 0, 1); Now, it has been a couple years since I wrote this and I honestly don't recall why this is the

[perl-win32-gui-users] Win32-GUI and PPM problem

2006-01-16 Thread Peter Eisengrein
It's been a while since I've installed Win32::GUI. When I download the latest version it installed fine but there's errors with my code, which was written when 0.0.558 was the latest. I have a copy of the ppd, etc, for 0.0.558 but I can't seem to install it. It would appear that there are also c

RE: Re[4]: [perl-win32-gui-users] timer do not work

2005-08-03 Thread Peter Eisengrein
> > You absolutely right. It was stupid mistake. But! Timer do not work as > before though I declared $mw as our (not my) (Steve Lloyd advice) and > corrected event handler. It's like that handler not executed at all. > I have Win32-GUI 1.02, perl 5.8.6 and Windows98SE > I don't think my or our

RE: [perl-win32-gui-users] timer do not work

2005-08-03 Thread Peter Eisengrein
> Здравствуйте, perl-win32-gui-users, > I wrote simple script with timer. It's supposed that timer > hides/shows main window but window is always visible. What's the > matter? Your if() logic in CheckDir_Timer sub. If you look closely, you will see that the window gets hidden and then shown

RE: [perl-win32-gui-users] Mouse click event on the main window

2005-05-12 Thread Peter Eisengrein
> I am new to Win32::GUI. > I would like to open a simple, plain, main window, with only label > objects on it, let say, and intercept a mouse click anywhere on the > client area, so > that, depending on where the click happens > (Win32::GUI::GetCursorPos()), different actions can be taken.

RE: [perl-win32-gui-users] Button disabled ?

2004-12-03 Thread Peter Eisengrein
> Any recommendation about Win32::GUI documentation? I red attached with the module, > but it is not covering everything very much. Jeb created a website/project for the documentation. Not sure how complete it is, but I'm sure it's a good place to start: http://jeb.ca/perl/win32-gui-docs/index.

RE: [perl-win32-gui-users] Button disabled ?

2004-12-03 Thread Peter Eisengrein
I would change it to: $my_but->Enable(); $my_but->Disable(); instead of trying to change the -disabled parameter of the button itself. > -Original Message- > From: Vassiliy Truskov [mailto:[EMAIL PROTECTED] > Sent: Friday, December 03, 2004 3:55 PM > To: perl-win32-gui-users@lists.sou

RE: [perl-win32-gui-users] Combobox problem taken care of, but no w...

2004-09-24 Thread Peter Eisengrein
> I'm making good version on my project, but not being able to > tab between > fields makes it kind of useless... Another one I just > noticed, is there a > way to set the focus to a field? > $Window->widgetname->SetFocus();

RE: [perl-win32-gui-users] How to change window/dialogbox icon

2004-07-28 Thread Peter Eisengrein
my $icon = new Win32::GUI::Icon("Icon.ico"); my $ni = $Window->AddNotifyIcon( -icon => $icon, -id => 1, -name => ni, -tip => "Mouseover shows this", ); -Original Message- From: Eric Hansen [mailto:[EMAIL PROTECTED] Sent: Wednesday, July 28, 2004 4:45 PM To: perl-win32-gui-users

RE: [perl-win32-gui-users] Internationalization and Win32::GUI

2004-05-11 Thread Peter Eisengrein
> > There are lots of ways to do this. In my case, I have over a thousand controls (sounds a lot, but > when you add up all the labels, group boxes etc!), so maintaining a perl hash becomes problematic - > ideally, the translations should be in a separate file or database, so they can be worked on

RE: [perl-win32-gui-users] Internationalization and Win32::GUI

2004-05-11 Thread Peter Eisengrein
If the text were to always be the same, I would say yes it would be a useful function. But if the text would usually be customized (which I would expect), then it might be easier to just use a hash of hashes: $text{'English'}{'Window'}='My Window'; $text{'Spanish'}{'Window'}='Mi Ventana'; $text{'

RE: [perl-win32-gui-users] Is there anyway to capture a click eve nt for a TextField control

2004-05-10 Thread Peter Eisengrein
would this work? if ($TextField->GotFocus()) { ... } -Original Message- From: Frazier, Joe Jr [mailto:[EMAIL PROTECTED] Sent: Monday, May 10, 2004 10:50 AM To: Win32GUI Subject: [perl-win32-gui-users] Is there anyway to capture a click event for a TextField control I have an app wh

RE: [perl-win32-gui-users] Always on top ...

2004-05-10 Thread Peter Eisengrein
Yes, add the following to your Window: -topmost => 1, > -Original Message- > From: marc iton [mailto:[EMAIL PROTECTED] > Sent: Monday, May 10, 2004 6:18 AM > To: Perl-Win32-GUI-Users@lists.sourceforge.net > Subject: [perl-win32-gui-users] Always on top ... > > > Hi, > there is a way

RE: [perl-win32-gui-users] Work Arround to hide tray icon

2004-04-15 Thread Peter Eisengrein
You can also get rid of it with: $ni->DESTROY; (assuming $ni is the current NotifyIcon) > -Original Message- > From: Sherif Mohamed [mailto:[EMAIL PROTECTED] > Sent: Thursday, April 15, 2004 6:08 AM > To: perl-win32-gui-users@lists.sourceforge.net > Subject: [perl-win32-gui-users] Work

RE: [perl-win32-gui-users] Dynamic popup menus

2004-02-27 Thread Peter Eisengrein
em &2" => "submenu2", " >> Sub Item &3" => "submenu3", " >> Sub Item &4" => "submenu4", ); -Original Message- From: Jez White [mailto:[EMAIL PROTECTED] Sent: Friday, February 27, 2004 12:07 PM To: Jez Whi

RE: [perl-win32-gui-users] Dynamic popup menus

2004-02-27 Thread Peter Eisengrein
I've done something like this with a NotifyIcon (see below). I'm guessing you could probably do the same with a regular menu. sub ni_click { if ($Window->IsVisible) { if ($Window->IsIconic) { $menu = new Win32::GUI::Menu(

RE: [perl-win32-gui-users] Window position

2004-01-30 Thread Peter Eisengrein
If you simply Hide() a window instead of reconstructing it each time, it should always keep the last position. Also should take less memory. That said, this little script should give you the info you're looking for. You should be able to search the mailing list on activestate.com -Pete use Win32

RE: [perl-win32-gui-users] notify icon bug 0.0.670?

2004-01-30 Thread Peter Eisengrein
> Hmm. I don't recall a 0.0.580 release. I thought they jumped from > 0.0.558 to 0.0.665. D'oh. Yeah, I meant 558. > If you meant 0.0.558, should we also assume that changing versions of > Win32::GUI was all you changed? That the script is still > using OEM (old > event model)? Um, I g

[perl-win32-gui-users] notify icon bug 0.0.670?

2004-01-29 Thread Peter Eisengrein
I had a script whose NotifyIcon worked fine under version 0.0.580 of Win32::GUI that no longer works since I upgraded to 0.0.670. It gets the event and shows the appropriate menu when you click on the NI but does not get anything when you click on one of the items on the menu. Also, getting Doc Wa

RE: [perl-win32-gui-users] Scroll bar example

2004-01-16 Thread Peter Eisengrein
You want to add the buttons to the tab, not a child window. So remove all the child window "stuff" and change $childwin->AddButton to $win->Tab->AddButton and now $win will remain in focus. -Original Message- From: Jez White [mailto:[EMAIL PROTECTED] Sent: Friday, January 16

RE: [perl-win32-gui-users] Avoiding applications hanging?

2004-01-15 Thread Peter Eisengrein
You can do this a number of ways. In order to allow a user to close the Icon and thus the app, you need to call Win32::GUI::Dialog, right. You can each launch the code to run in the background two ways: 1- have a button or something else on the Window to start it, or 2- use the Timer method to get

RE: [perl-win32-gui-users] The rebar control

2004-01-13 Thread Peter Eisengrein
Jez, you're almost there!!! Change these lines: $rebar->InsertBand (-text => 'one' , -image => 0); $rebar->InsertBand (-text => 'two' , -image => 1); $rebar->InsertBand (-text => 'thee', -image => 2); to $rebar->InsertBand (-text => 'one' , -image => $IMG_ONE); $rebar->InsertBand (-text =>

RE: [perl-win32-gui-users] RFC: Yet another event model, anyone?

2004-01-05 Thread Peter Eisengrein
I don't have a lot of feedback other than: 1- I like the OO idea. I do think it is worthwhile if you've got the time and energy :-) I particularly think it is a good idea because, as you put it, you won't be able to clobber other windows and you can keep better control over where an event came fro

RE: [perl-win32-gui-users] Child Windows.

2003-12-01 Thread Peter Eisengrein
However, if you are just looking to run an app in the background like a service, you do not need to make it a gui (probably not the most efficient solution). In that case, check out Win32::Daemon -Pete -Original Message- From: Peter Eisengrein Sent: Monday, December 01, 2003 8:02 AM To

RE: [perl-win32-gui-users] Child Windows.

2003-12-01 Thread Peter Eisengrein
When you create the child window, add this arg: -parent => $Window, Yes, you can hide the parent and leave the child showing... -Pete -Original Message- From: Chris [mailto:[EMAIL PROTECTED] Sent: Saturday, November 29, 2003 5:10 PM To: perl-win32-gui-users@lists.sourceforge.ne

RE: [perl-win32-gui-users] Destroying a window

2003-11-21 Thread Peter Eisengrein
continually then at some point you will run out of memory. >From: Peter Eisengrein <[EMAIL PROTECTED]> >To: "'Cruickshanks, Darin'" <[EMAIL PROTECTED]>, >perl-win32-gui-users@lists.sourceforge.net >Subject: RE: [perl-win32-gui-users] Destroying a window >Dat

RE: [perl-win32-gui-users] Destroying a window

2003-11-20 Thread Peter Eisengrein
One quick and dirty way to do it would be undef($Window); but that may cause other problems if you have other widgets that reference the window. For example, if you have a Timer that updates a clock on $Window every second, you will begin to get errors every second. So, unless you *really* want to

RE: [perl-win32-gui-users] Removing checkboxes

2003-10-20 Thread Peter Eisengrein
I don't think this will work, but maybe $checkbox->Hide() ? If not, you could create a blank Label to "cover" it. -Pete -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Monday, October 20, 2003 1:42 PM To: perl-win32-gui-users@lists.sourceforge.net Subject: [pe

RE: [perl-win32-gui-users] Memory usage

2003-10-02 Thread Peter Eisengrein
Maybe something in a _Click event that triggers the memory flush? Just guessing... -Original Message- From: carollyne courtney [mailto:[EMAIL PROTECTED] Sent: Thursday, October 02, 2003 7:37 AM To: perl-win32-gui-users@lists.sourceforge.net Subject: [perl-win32-gui-users] Memory usage Th

RE: [perl-win32-gui-users] Dynamically changing foreground and ot her options

2003-08-14 Thread Peter Eisengrein
Not sure about your first question, but to enable/disable a menu item use: $filemenu->{'Open'}->Enabled(0); # disable $filemenu->{'Open'}->Enabled(1); # enable -Original Message- From: Erik Shön [mailto:[EMAIL PROTECTED] Sent: Thursday, August 14, 2003 4:07 PM To: perl-win32-gui-users@

RE: [perl-win32-gui-users] Dynamic entrys

2003-07-28 Thread Peter Eisengrein
Let's start with a basic question: What type of widget is $main->MECH$x ? Does this work part way and then crash or does it crash on the first attempt? -Original Message- From: Chris [mailto:[EMAIL PROTECTED] Sent: Saturday, July 26, 2003 8:22 AM To: perl-win32-gui-users@lists.sourceforge

RE: [perl-win32-gui-users] AddTextfield error

2003-07-16 Thread Peter Eisengrein
What is the value of $pt12 and what happens if you put it in double quotes? -Original Message- From: Dennis Putnam [mailto:[EMAIL PROTECTED] Sent: Wednesday, July 16, 2003 3:11 PM To: perl-win32-gui-users@lists.sourceforge.net Subject: [perl-win32-gui-users] AddTextfield error I have the

RE: [perl-win32-gui-users] Doevent problem in minimised window - Please help

2003-05-28 Thread Peter Eisengrein
Note sure why it stops when minimized, I assume it is a scope issue and is supposed to happen. Nevertheless, change your for() loop to a _Timer event and it [1] should work, [2] be more Windows-y, and [3] allow you to do other things with the window in between counts (whereas sleep will only sleep)

RE: [perl-win32-gui-users] Can i have some examples?

2003-05-08 Thread Peter Eisengrein
y 07, 2003 7:27 PM To: perl-win32-gui-users@lists.sourceforge.net Subject: [perl-win32-gui-users] Can i have some examples? (i got the window to show now, thanks to Peter Eisengrein) and now I'm trying to get a menubar (the standard File, Edit, etc.) and i cant figure out how to use Menu or

RE: [perl-win32-gui-users] Simple window (new to win32::gui)

2003-05-06 Thread Peter Eisengrein
So far so good. What you neglected to do was tell it to show the window. When you create the window it is hidden by default. Try adding $window->Show(); -Pete -Original Message- From: Bored is me [mailto:[EMAIL PROTECTED] Sent: Tuesday, May 06, 2003 3:56 PM To: perl-win32-gui-users@lis

RE: [perl-win32-gui-users] Perl and printing

2003-04-25 Thread Peter Eisengrein
There may be a better way, but here are two possible ways: ### THIS WILL BRING UP THE SAME PRINT WINDOW AS USED BY WEB BROWSER $dll = "$ENV{'WINDIR'}/System32/mshtml.dll"; system("rundll32.exe $dll,PrintHTML $file"); -OR- ### THIS MAY OR MAY NOT GIVE THE BEST RESULTS sys

RE: [perl-win32-gui-users] Silly question

2003-04-24 Thread Peter Eisengrein
I don't believe destroying the window will regain the memory, so a simple Hide() may suffice. Generally what I'll do when I want to permanently get rid of it, though, is to localize the building of that window and all associated $vars within a subroutine. Then, Hide() the window before you return.

RE: [perl-win32-gui-users] Strange mouse behaviour

2003-04-15 Thread Peter Eisengrein
Take a look at where you put your Win32::GUI::Dialog(); line. I believe it will remain an hourglass until you give the control over to the user input. -Original Message- From: Cruickshanks, Darin [mailto:[EMAIL PROTECTED] Sent: Tuesday, April 15, 2003 5:10 AM To: Perl-Win32-Gui-Users Subj

RE: [perl-win32-gui-users] Timer-Object-Question

2003-04-11 Thread Peter Eisengrein
You've set up the _Timer properly. Perhaps you can share some more code? Also, you never finished your DialogBox question. -Original Message- From: Christian Kappler [mailto:[EMAIL PROTECTED] Sent: Friday, April 11, 2003 4:58 AM To: Perl-Win32-GUI Mailinglist Subject: [perl-win32-gui-us

RE: [perl-win32-gui-users] How "reset" a windows ?

2003-04-07 Thread Peter Eisengrein
rc [mailto:[EMAIL PROTECTED] Sent: Monday, April 07, 2003 12:23 PM To: Peter Eisengrein; perl-win32-gui-users Subject: Re: [perl-win32-gui-users] How "reset" a windows ? I 'va somethink like this : $add_ok=0; if ($nbr_imp<450){$add_ok=1} $Win_select_srv-&g

RE: [perl-win32-gui-users] How "reset" a windows ?

2003-04-07 Thread Peter Eisengrein
It you just want to hide button it is as easy as $Button->Hide(); If this is not what you mean, please ask again and show some code. -Original Message- From: NAHUM Marc [mailto:[EMAIL PROTECTED] Sent: Monday, April 07, 2003 6:31 AM To: perl-win32-gui-users Subject: [perl-win32-gui-users] H

RE: [perl-win32-gui-users] Refresh Listview

2003-03-21 Thread Peter Eisengrein
Try adding WS_VSCROLL to the -style on your Listview. Not sure if that will work or not. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Friday, March 21, 2003 1:39 PM To: Peter Eisengrein Cc: 'perl-win32-gui-users@lists.sourceforge.net' Subject: RE: [

RE: [perl-win32-gui-users] Refresh Listview

2003-03-20 Thread Peter Eisengrein
Found it. Put this at the top of your ScanButton_Click sub to clear the listview each time. $MainWin->ListView->Clear(); -Original Message- From: Peter Eisengrein Sent: Thursday, March 20, 2003 4:55 PM To: '[EMAIL PROTECTED]'; perl-win32-gui-users@lists.sourceforge

RE: [perl-win32-gui-users] Refresh Listview

2003-03-20 Thread Peter Eisengrein
Not sure about refreshing the listview. But to get some more control between events you can try adding $MainWin->Update(); $MainWin->DoEvents(); into sub ScanButton_Click. I tried it just above your InvalidateRect line and it seemed to work pretty well. You should definitely add

RE: [perl-win32-gui-users] Moving a DialogBox to the forground

2003-03-14 Thread Peter Eisengrein
How about setting -topmost => 1 ? -Original Message- From: Dave Crawford [mailto:[EMAIL PROTECTED] Sent: Friday, March 14, 2003 11:27 AM To: Win32GUI; [EMAIL PROTECTED] Subject: Re: [perl-win32-gui-users] Moving a DialogBox to the forground Thanks for the tip but still no joy. I replaced

RE: [perl-win32-gui-users] COM port logger

2003-02-19 Thread Peter Eisengrein
Thanks for the tip. Still not quite what I'm after. I currently use WRQ's Reflections to connect and log the info. I wrote a server that runs on that machine to hand off the data in the log file to other systems. However, this requires someone to manually change the log file each day and, well, sim

[perl-win32-gui-users] COM port logger

2003-02-19 Thread Peter Eisengrein
Before I go and re-invent the wheel I figured I'd ask if anyone has a simple script to connect to a PC's COM port, listen, and log to a file whatever data it receives. Anyone have anything like that they'd be willing to share? TIA, Pete

RE: [perl-win32-gui-users] Topmost Windows?

2003-02-04 Thread Peter Eisengrein
when you create your DialogBox, use option: -topmost => 1, -Original Message- From: Steven Swenson [mailto:[EMAIL PROTECTED] Sent: Monday, February 03, 2003 7:39 PM To: Win32GUI Subject: [perl-win32-gui-users] Topmost Windows? How does one get a window to sit on top? I tried the foll

[perl-win32-gui-users] gui perl file extension

2003-02-03 Thread Peter Eisengrein
Is there a file extension currently in use for Win32::GUI scripts? If so, what? If not, should there be? I know it would make it easier (for me :) to list just those scripts if they used a different extension than the standard .pl . It would also make it easier to know when to use perl and when to

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

2003-01-16 Thread Peter Eisengrein
Does it do anything else besides use the timers to trigger events? I'm wondering if it gets hung up somewhere else in the code that you can maybe add a DoEvents() or Update() -Original Message- From: Jonathan Southwick [mailto:[EMAIL PROTECTED] Sent: Thursday, January 16, 2003 12:28 PM To:

[perl-win32-gui-users] odd hash behavior

2002-11-22 Thread Peter Eisengrein
The script below outputs the correct $number (hash key) but for some reason it also outputs the value. What gives? -Pete ### use strict; my %countother; print "File: "; chomp(my $file=); open(FILE,$file) || die "can't open file : $!\n"; foreach () { chomp

RE: [perl-win32-gui-users] need subroutine to run when Window get s focus

2002-11-13 Thread Peter Eisengrein
Not sure of the exact syntax but it would be something like: if ($Window->GetFocus()) { &do_something; } > -Original Message- > From: Jonathan Southwick [mailto:[EMAIL PROTECTED] > Sent: Wednesday, November 13, 2002 11:45 > To: perl-win32-gui-users@lists.sourceforge.net > Subjec

[perl-win32-gui-users] Font color?

2002-11-04 Thread Peter Eisengrein
How can I change the color of a font? I'd expect it to be something like: our $Font = new Win32::GUI::Font( -name => "Arial", -height => 24, -color => 'Red', -bold => 1, ); but it doesn't work. TIA, Pete

RE: [perl-win32-gui-users] force a "tab selection" from a tabstri p

2002-10-30 Thread Peter Eisengrein
sday, October 30, 2002 14:19 To: 'Peter Eisengrein'; Magnone, Angelo; [EMAIL PROTECTED] Sourceforge. Net (E-mail) Subject: RE: [perl-win32-gui-users] force a "tab selection" from a tabstri p I believe this will only "show" the actual tab you selected. I'm using GU

RE: [perl-win32-gui-users] force a "tab selection" from a tabstri p

2002-10-30 Thread Peter Eisengrein
$tabstrip1->Select(0); # selects the 1st tab $tabstrip1->Select(1); # selects the 2nd tab $tabstrip1->Select(2); # selects the 3rd tab ...etc... -Original Message- From: Magnone, Angelo [mailto:[EMAIL PROTECTED] Sent: Wednesday, October 30, 2002 13:51 To: [EMAIL PROTECTED] Sourceforge.

RE: [perl-win32-gui-users] Hello All

2002-10-29 Thread Peter Eisengrein
my ($DOS) = Win32::GUI::GetPerlWindow(); Win32::GUI::Hide($DOS); You can also Win32::GUI::Show($DOS); it if you want to (I find this useful in debugging, so I'll usually add some *secret* way to do this (like type "debug on" within a RichEdit or Textbox -- shhh, top secret!). > -Original Me

RE: [perl-win32-gui-users] always on top

2002-10-28 Thread Peter Eisengrein
from the docs... new Win32::GUI::Window(%OPTIONS) Creates a new Window object. Class specific %OPTIONS are: -minsize => [X, Y] specifies the minimum size (width and height) in pixels; X and Y must be passed in an array reference -maxsize => [X, Y] specifies the maximum size (wid

RE: [perl-win32-gui-users] printer support

2002-10-23 Thread Peter Eisengrein
I've only seen it done with a system() call to rundll32.exe. Something like this: # untested $dll = "/Winnt/System32/mshtml.dll"; system("rundll32.exe $dll,PrintHTML $file"); -Original Message- From: Magnone, Angelo [mailto:[EMAIL PROTECTED] Sent: Wednesday, October 23, 2002 13

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

2002-10-23 Thread Peter Eisengrein
> For me, I would just have to say Thanks Aldo, your work has > made mine much > better! > Same here! If he is so unhappy with it, let him write his own GUI module. Thanks Aldo, Pete

RE: [perl-win32-gui-users] double click buttons

2002-10-22 Thread Peter Eisengrein
this ought to work... if ($Window->IsVisible) { $Button->Disable(); } -Original Message- From: Magnone, Angelo [mailto:[EMAIL PROTECTED] Sent: Tuesday, October 22, 2002 11:30 To: [EMAIL PROTECTED] Sourceforge. Net (E-mail) Subject: [perl-win32-gui-users] double click buttons An

RE: [perl-win32-gui-users] Cursor is not refreshed correctly

2002-10-02 Thread Peter Eisengrein
from the GUI sample script (should've come with the Module), textfield.pl my $C = new Win32::GUI::Cursor("harrow.cur"); $Window->ChangeCursor($C); $Window->Reset->ChangeCursor($C); -Pete -Original Message- From: Motesicky Alojz [mailto:[EMAIL PROTECTED] Sent:

RE: [perl-win32-gui-users] How to highlight

2002-09-25 Thread Peter Eisengrein
Not sure why it's not working, without seeing some code. Checkout the 'listbox.pl' in the samples that should've come with the module. That works just fine. Let me know offline if you don't have it and I'll send it to you. -Original Message- From: Burley, David [mailto:[EMAIL PROTECTED] Se

RE: [perl-win32-gui-users] Q: Resize problem maximising from wind ows toolbar

2002-09-03 Thread Peter Eisengrein
Besides resizing the window, you need to move the other objects, using something like this: $Window->Logo->Move($Window->ScaleWidth-325,0); This is actual piece of code. It moves a bitmap 'Logo' 325 pixels to the left of the right side but does not move it up or down when the window is resized.

RE: [perl-win32-gui-users] right click menu items

2002-08-27 Thread Peter Eisengrein
Assuming $menu 'PopUpMenu' already exists, then do the following: my ( $x, $y ) = Win32::GUI::GetCursorPos (); $Window->TrackPopupMenu( $menu -> {'PopUpMenu'}, $x, $y ); -Original Message- From: moo cow [mailto:[EMAIL PROTECTED] Sent: Monday, August 26, 2002 22:28 To: perl-win32-gui-us

RE: [perl-win32-gui-users] first app ?

2002-08-26 Thread Peter Eisengrein
The subs are called by events, such as Click, RightClick, etc. Any handle such as Hello (which in this case is defined as the name of the button) can have one or more of these actions assigned to them. The convention for these subs is Name_Event where _Event is appended to the widget's name, i.e. H

RE: [perl-win32-gui-users] Context Menus

2002-07-08 Thread Peter Eisengrein
First you set up your $menu. Then it is done something like this... I have a script that does this when a user Click's on a NotifyIcon, so within the sub ni_Click there is: my ( $nipx, $nipy ) = Win32::GUI::GetCursorPos (); $Window->TrackPopupMenu( $menu -> {'PopUpMenu'}, $nipx, $nipy ); HTH, Pe

RE: [perl-win32-gui-users] another menu question

2002-06-19 Thread Peter Eisengrein
Try this... is this what you mean? -Pete ## #!perl -w use Win32::GUI; use strict; my $counter=1; my $Menu = new Win32::GUI::Menu( "&File" => "File", " > &Counter $counter..." => "Counter", ); my $MW = new Win32::GUI::Window( -title => 'menu.pl', -left

RE: [perl-win32-gui-users] another menu question

2002-06-19 Thread Peter Eisengrein
> Anyway, the Message shortcuts are stored (sorted) in a > Message menu. When > they click on the message shortcut the text of the message is > placed in a > message box for them. That part all works. The user is able > to add their > own message shortcuts to the menu but they don't appea

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

2002-05-17 Thread Peter Eisengrein
There is an 'accelerator' method which does what I think you want but I've never been able to make it work. You can fake some of it if the keystroke has an associated number value. > -Original Message- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] > Sent: Thursday, May 16, 2002 20:

RE: [perl-win32-gui-users] status bar

2002-04-22 Thread Peter Eisengrein
In your _Resize sub do not resize the status bar, just move it (so that it's always at the bottom). If you do nothing then it will always hold its original position which is probably not what you want. $Window->Status->Move(0, $Window->ScaleHeight-$Window->Status->Height); > -Original Me

RE: [perl-win32-gui-users] Windows help (winhlp32)

2002-04-03 Thread Peter Eisengrein
use Win32::GUI; $Menu = Win32::GUI::MakeMenu( "&Help" => "&Help", "> &Winnt Help" => "helpme", ); $Win = new Win32::GUI::Window( -left => 100, -top=> 100, -width => 300, -height => 300, -name => "Window", -text => "Win32::GUI Help Menu", -menu

RE: [perl-win32-gui-users] Question...

2002-04-01 Thread Peter Eisengrein
Yes, it is or at least appears to be. I have ME at home (hate it!) so I have not done a lot with it so I can't speak to how completely it behaves on ME, but most of the basics seem to work ok. -Pete > -Original Message- > From: Michelangelo Corradini [mailto:[EMAIL PROTECTED] > Sent: Sat

RE: [perl-win32-gui-users] newbie ? - creating PPM's

2002-03-20 Thread Peter Eisengrein
You can also download the zip file of the latest and do the following: 1- extract contents to a directory 2- find the file "Win32-GUI.ppd" 3- open a DOS window and cd to the same directory as the ppd file 4- type, "ppm Win32-GUI.ppd" That should install it. You should be able to get the latest zi

RE: [perl-win32-gui-users] making windows - help w/code

2002-03-05 Thread Peter Eisengrein
I too get all three windows without the button (this is probably because you didn't specify where it should go) on NT4 Workstation. > -Original Message- > From: H C [mailto:[EMAIL PROTECTED] > Sent: Tuesday, March 05, 2002 14:09 > To: [EMAIL PROTECTED]; > perl-win32-gui-users@lists.source

RE: [perl-win32-gui-users] AddLabel method problem

2002-02-14 Thread Peter Eisengrein
You are missing some important stuff, like, where does it go? However, the error is probably happening because the label doesn't have a name. The documentation is not at all complete but the basics are there: http://www.perl.it/dada/gui_docs/gui.html -Pete > -Original Message- > From:

RE: [perl-win32-gui-users] size of AddTextfield ?

2002-02-13 Thread Peter Eisengrein
$Textfield = $Window->AddTextfield( -name => "Textfield", -left => 10, -top => 10, -text => "sample text", -width=> 180, -height => 22, ); $Textfield->MaxLength(3); > -Original Message- > From: NAHUM Marc [mailto:[EMAIL PROTECTED] > Sent: W

RE: [perl-win32-gui-users] Graying out checkbox

2002-02-11 Thread Peter Eisengrein
$Win->CB->Enable(0); # grayed out $Win->CB->Enable(1); # normal > -Original Message- > From: Christian Kappler [mailto:[EMAIL PROTECTED] > Sent: Monday, February 11, 2002 17:09 > To: Perl-Win32-GUI Mailinglist > Subject: [perl-win32-gui-users] Graying out checkbox > > > Hello listers,

RE: [perl-win32-gui-users] Where find Docs ...

2002-01-16 Thread Peter Eisengrein
The docs should come with the download of the module. If not, I can send you a zipped copy off-line, although mine are probably not the latest... > -Original Message- > From: NAHUM Marc [mailto:[EMAIL PROTECTED] > Sent: Wednesday, January 16, 2002 04:41 > To: perl-win32-gui-users@lists.sou

RE: [perl-win32-gui-users] Keyboard accelerators possible?

2002-01-14 Thread Peter Eisengrein
It does exist as method Win32::GUI::AcceleratorTable . I've never been able to make it work, but perhaps someone else can lend a hand. >From the .pm... # Example: # $A = new Win32::GUI::AcceleratorTable( # "Ctrl-X" => "Close", # "Shift-N" => "New", # "Ctrl-A

RE: [perl-win32-gui-users] changing systray icon?

2001-12-24 Thread Peter Eisengrein
Here is a repost of how to do it, written by Jason Bingham. From: Jason Bingham [EMAIL PROTECTED] Sent: 27 August 2001 03:26 To: 'perl-win32-gui-users@lists.sourceforge.net' Subject: RE: [perl-win32-gui-users] RE: NotifyIcon

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

2001-12-20 Thread Peter Eisengrein
couple questions: 1- has anyone used this sucessfully? if so, do you have any code to share? 2- reading the POD for this it says you need to add some lines to the GUI.xs and nmake it. I do not have nmake on my NT4 system. Can I ftp gui.xs to a unix box, nmake it there, and ftp it back? (would that

RE: [perl-win32-gui-users] DoEvents() warning

2001-12-13 Thread Peter Eisengrein
that usually happens when you ask it to do something with a widget that is either out of scope or not yet defined. need more detail to be more specific, tho' -Pete > -Original Message- > From: Marcus [mailto:[EMAIL PROTECTED] > Sent: 12 December 2001 19:09 > To: perl-win32-gui-users@list

RE: [perl-win32-gui-users] where find guibuilder ?

2001-11-19 Thread Peter Eisengrein
I've not heard of GUI Builder. Does it do what it sounds like, has a GUI interface to help design a Win32::GUI window by (hopefully) allowing the user to dragndrop widgets onto a window and it converts it to the appropriate code? -Original Message- From: Piske, Harald [mailto:[EMAIL PROT

RE: [perl-win32-gui-users] Cancel action requests

2001-11-16 Thread Peter Eisengrein
Try using a _Timer instead of the while loop. > -Original Message- > From: Marcus [mailto:[EMAIL PROTECTED] > Sent: 16 November 2001 12:09 > To: perl-win32-gui-users@lists.sourceforge.net > Subject: [perl-win32-gui-users] Cancel action requests > > > I hope somebody can help on this one

RE: [perl-win32-gui-users] Context Menus

2001-11-15 Thread Peter Eisengrein
You can create a Label the same size as the window (with or without text) and react to double-click and right-click events on it. That's the only way I've been able to do it. > -Original Message- > From: Marcus [mailto:[EMAIL PROTECTED] > Sent: 15 November 2001 09:34 > To: perl-win32-gui-u

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

2001-11-14 Thread Peter Eisengrein
Try adding $Win1->DoEvents(); to the &mouseover sub. This might help catch any other events while you are waiting for the mouseover to finish. > -Original Message- > From: Rogers, John [mailto:[EMAIL PROTECTED] > Sent: 14 November 2001 08:41 > To: perl-win32-gui-users@lists.sourceforge.net

RE: [perl-win32-gui-users] Text boxes -- Interactive

2001-11-13 Thread Peter Eisengrein
mber 2001 12:39 > To: Peter Eisengrein > Cc: perl-win32-gui-users@lists.sourceforge.net > Subject: RE: [perl-win32-gui-users] Text boxes -- Interactive > > > Sure ... the sample textield.pl doesnt behave the same way. This is > weird.I put the txtfield in from the exam

RE: [perl-win32-gui-users] Text boxes -- Interactive

2001-11-12 Thread Peter Eisengrein
Two Textfields from the sample textfield.pl ### Single line, colored $Textfield = $Window->AddTextfield( -name => "Textfield", -left => 10, -top => 10, -text => "sample text", -width=> 180, -height => 22, -foreground => [0,255,0], -background

RE: [perl-win32-gui-users] Putting cursor at end of RichEdit

2001-11-08 Thread Peter Eisengrein
You might also try adding ES_AUTOVSCROLL to the RichEdit's -style This can be problematic, though. As I recall, it refreshes the RichEdit's data every time there's new data added. Of course, my memory ain't what it used to be, so I may be way off... :) > -Original Message- > From: Morbus

RE: [perl-win32-gui-users] Tab through buttons and textfields

2001-11-08 Thread Peter Eisengrein
sting. > We have a silent agreement here on this list not to blame or > flame anyone > for re-posting questions that have been answered, since we > know searching > the archives does not work ... right, guys? Erm, GUIs? > > > -Original Message- > > From:

RE: [perl-win32-gui-users] Tab through buttons and textfields

2001-11-08 Thread Peter Eisengrein
On each widget that you want to be able to tab to/from you need to add -tabstop => 1, > -Original Message- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] > Sent: 08 November 2001 12:07 > To: perl-win32-gui-users@lists.sourceforge.net > Subject: [perl-win32-gui-users] Tab through but

RE: [perl-win32-gui-users] Window -style parameters

2001-11-01 Thread Peter Eisengrein
Someone just recently sent a link to http://www.mvps.org/vbnet/index.html?http://www.mvps.org/vbnet/api/_consts/c onstso.htm which defines all of these Windoze constants. I wish I could remember who posted it so I could give them credit, but, like everything else, I forget... > -Original

  1   2   >