RE: [perl-win32-gui-users] Line numbers and/or Syntax highlightin g

Have a look at wex.pl on http://www.fairymails.com/perl/ There is some (very rudimentary) syntax highlighting done in a simple Richedit. No extras needed for that to work. -Original Message- From: moo cow [mailto:[EMAIL PROTECTED] Sent: Monday, September

RE: [perl-win32-gui-users] Problem looking for a solution

sub OKbutton_Click { .. gather data and return (-1); } When you return -1 in any event sub, not just in _Terminate, your window gets destroyed. Since you cannot exit the Dialog() loop other than with -1, there are but two ways to do it a) do the error checking inside an event (namely OK_Click).

RE: [perl-win32-gui-users] why not work?

I never worked with accelerators, so this may be stupid, but did you connect the accel table to the listview? If so, can you try to hang it on the main window instead? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Tuesday, August 06, 2002 20:19 To: ROB Cc: pe

RE: [perl-win32-gui-users] Windows Terminal Server in Application mode Refresh problems

I haven't because I haven't ... I mean, I haven't come across this phenomenon because I haven't used my Win32-GUI apps on a terminal server. But I found that where I use graphical thingies, they also vanish by minimizing/maximising and if another window happens to fly by, it wipes them away and all

RE: [perl-win32-gui-users] Like to get started

This is a common newbie error (xqsme), I think there are even some of the samples where this happened: ALL Win32-GUI objects (window, widgets, timers, everything) need a -name option and usually this must be a unique name. Change $main->AddLabel(-text => "Hello, world"); to $main->AddLabel(-name

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

I use it to get some more mouse-related events. The most useful class for that is the RichEdit class. new Win32::GUI::Class ( -name => 'PoorEdit', -widget => 'RichEdit', -extends => 'RichEdit', ); $Main->AddRichEdit( -name => "Rich", -class => "PoorEdit",

RE: [perl-win32-gui-users] How do I read the information in a tex tbox?

I'm assuming you want to get the contents of a text field, not text file ... ;-) There is the Text() method, defined as a general function, i.e. should be valid for all widgets. It returns all of a field's contents. If you want the bit that's selected: ($from, $to) = $Main->MyField->Selection() $s

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

Win32-GUI Versions 0.558 and 0.665 are totally different, the latter being a thorough rework. If you use one, try the other to see if it helps. I've made a post the other day about GUI crashing when I use DoEvents() - like you, I could only do some magic to shift the crash to a different point. Wh

RE: [perl-win32-gui-users] DoEvents can crash

Well ... I just tried it. I replaced my /pleasedonotcrash/; before the DoEvents() call with Win32::GUI::PeekMessage (0, 0, 0); and guess what ... it crashes. Like I said, there IS a bug in the xs somewhere and when the circumstances are right (nah ... wrong!) then it will crash the script and tear

[perl-win32-gui-users] DoEvents can crash

OK, this is killing me. I need help from someone with GUI.xs eyes ... Aldo? In a very busy loop, I keep calling return -1 if Win32::GUI::DoEvents () < 0; To be able to click and have the program react (especially to Abort_Click or Alt+F4) Every once in a blue moon, I get the infamous "the memo

RE: [perl-win32-gui-users] Using Win32::GUI and Win32::OLE togeth er to connect to MSExcel

If all you want to do is read the whole excel sheet, here's how I go about it without OLE. The only thing that keeps annoying me is that even though I specify FIRSTROWHASNAMES=0, with my Excel drivers, it still won't return the topmost row. But reading huge files is not an issue - all it takes is t

[perl-win32-gui-users] Clear a TreeView

This is not a question, I just wanted to share a solution. When you have a treeview with a lot of entries (a hundred base nodes with dozens of branches each) and do a $Main->Tree->Clear (), this can clog up the CPU for a considerable time. Here's what's much faster (up to 100 times, depending on th

RE: [perl-win32-gui-users] iipc.pm

How to install it seems to be said here http://safari.oreilly.com/main.asp?bookname=perlsysadm&snode=37 but about where to get it, the links seem outdated. http://www.generation.net/~aminer/Perl/ is empty (or not browsable) The guy's email address, listed on http://idnopheq.perlmonk.org/perl/pac

RE: [perl-win32-gui-users] Re: Perl-Win32-GUI-Users digest, Vol 1 #425 - 3 msgs

Yep, that works fine. ${something} is the same as $something, except that the {} seperates the variable name "something" from whatever follows. Both your solutions do the same. That's the beauty and curse of Perl, there are always 1001 ways to do it. > -Original Message- > From: Ceres [mai

RE: [perl-win32-gui-users] Win2k/DeviceContext Problems?

I've successfully used DCs in both 98 and 2k. I found that the Arc function fails in 98, but lines and multilines work fine. I'm guessing you have to define pens and brushes first. $pen = new Win32::GUI::Pen ( -style => 0, -width => 1,

RE: [perl-win32-gui-users] subclassing in build 665?

This is pretty much the reason why I did not go 665 yet. I saw it mentioned somewhere that subclassing fell victim to the NEM (new event model) altogether - if you need events, which is what subclassing achieves rather poorly in 558, you need to take on the NEM, which does the job much better. The

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

Fist bit of -style docu: DON'T USE -style AT ALL!!! Use -addstyle and -substyle instead. That avoids missing a few default flags. Apart from that, I'm afraid, you will have to dig dep into the header files or other, filthy windows documentation for what bits can be used with which widget.

FW: [perl-win32-gui-users] Win32Gui-FAQ 0.3

Not much and fairly outdated, but still http://www.fairymails.com/perl/ This is probably better to learn from http://www.bahnhof.se/%7Ejohanl/perl/Loft/ and attached find what came to the list as FAQ last August,

RE: [perl-win32-gui-users] TreeView & scrollbar

> $TV->FirstVisible($firstnode); # does not work > $TV->Select($firstnode, 5); # does not work That's odd - I do $Main->Tree->Select($node) in my code and it sure works. What are you trying to do with that second parameter, the 5? Could it be that you have warnings off and the select never gets ca

RE: [perl-win32-gui-users] Win32::API problems invoking this modu le -- Please help.

That's odd. Is there something wrong with your Perl? What does perl -v tell you? Mine is v5.6.1 build 631 and I know that with last year's build 618 and API v0.1 it worked just the way you show it. > -Original Message- > From: Steven Swenson [mailto:[EMAIL PROTECTED] > Sent: Thursday, Apri

RE: [perl-win32-gui-users] List View-getting multiple selection i ndexes

Why, doesn't @selection = $mylist->SelectedItems(); work?? Or don't you get the listbox to allow for multiple selections in the first place?

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

try sub Main_Resize {return 0;} That is supposed to cancel the default behavior of the resize function. Well, that's what it says on the box ;-) If it doesn't work, try $resizing = 0; sub Main_Resize { unless ($resizing++) { $Main->Change (-size => [800, 574]);}

RE: [perl-win32-gui-users] AddLabel crashes Perl?

You need a -name => 'something' option in *every* widget. The name does not need to be unique, if you don't have to access the widget later, but it *must* be specified. V 0.0.558 crashes on a widget without -name, other versions don't.

RE: [perl-win32-gui-users] -style => WS_VISIBLE | 2 | WS_NOTIFY ,

In short, in the header files of a C-compiler installation. C:\Program Files\Microsoft Visual Studio\VC98\Include for VS6. In even shorter, on MSDN. The WS_ flags are covered in Platform SDK Documentation -> User Interface Services -> Windows User Interface -> Windowing

RE: [perl-win32-gui-users] sticky widgets (was: problems with com bobox)

> sticky mainly refers to which sides the widgets should "stick" to when > resized. so if i have a listview which is -sticky => 'ew' > then when it gets > resized it should stretch to fit across the screen (as in > east and west, > left and right) but the vertical size would stay relative to > h

RE: [perl-win32-gui-users] problems with combobox

Dude ... you call &settings from an event handler and $Window2->Dialog(); from &settings. That's asking for trouble. Define all your windows and widgets somewhere. Then call Win32::GUI::Dialog(); once and only once from the main thread. There has been a recent posting on how to handle more than o

RE: [perl-win32-gui-users] listview sorting and stuff

> hi i need lots of help. i'm fairly new to perl and i only compiled > win32::gui yesterday. i have a listview that i'd like to Don't worry, we've all been fairly new. With most of the stuff, most of us still are. > my($stuff) = @_; > sort $a <=> $b, $stuff; This looks like a Perl problem rather

[perl-win32-gui-users] Install 665 w/o compiling?

> -Original Message- > From: Timothy Johnson [mailto:[EMAIL PROTECTED] > Subject: RE: [perl-win32-gui-users] Newbie to GUI -- Busy Window? > > BTW, if you want to install 0.0.665, just extract the files > from the tarball > that comes with the .ppd file. In it is a blib folder. You > s

RE: [perl-win32-gui-users] textfield problem

You must not return -1 from mySearchDialog_Terminate, because it destroys and releases all the objects associated with it. You want to reuse the DialogWindow, so just Hide() it and return One. That does not exit your Dialog() call, but that's not needed. If you want to make the Dialog modal, you ha

RE: [perl-win32-gui-users] Using fork to avoid a frozen window wh ile using LWP

> to user input. What I think you need to do is disable any user input > controls that might cause problems if they are clicked while you're > downloading, fork, have the child download, the parent return > to the when > the child has finished get it to re-enable the controls, eg You can also d

RE: [perl-win32-gui-users] Win32-GUI Applications causing ILLEGAL OPERATION

I know that previous versions of GUI were fault-tolerant towards missing -name parameters, which 558 is NOT. Make sure that all your objects (not only widgets, also windows and labels!) have a unique -name. Non-unique -names won't cause crashes, you just can't access any of the redefined objects. B

RE: [perl-win32-gui-users] Bitmaps in Win32::GUI [perl-win32-gui- users]

> Failure-- Seems like ImageMagick "accidentally" inverts the color when > converting from .tif to .bmp ... and that ImageMagick's > Negate operation > doesn't have any effect on .bmp files !!! > > Failure-- there seems to be no way to control the colors: white turns > out grey. Lots of -foregro

RE: [perl-win32-gui-users] display images--sample code?

> On the other hand, I fear that none of that will allow me to > add scroll > bars to the bitmap, so that I can display a portion of a bigger than > screen image. You could add scroll bars and then reposition the image. The scroll bars don't have to be tied to the label within Win32::GUI, you jus

RE: [perl-win32-gui-users] _GotFocus-Event

I knew we had this before ... here's what I found out then: -Original Message- From: Piske, Harald Sent: Friday, November 16, 2001 02:43 To: Win32-GUI-Mailing List (E-mail) Subject: RE: [perl-win32-gui-users] Win32::DialogBox - LostFocus() Event i n Button and RadioButton Objects do

RE: SOLVED!! Re: [perl-win32-gui-users] This code runs onW2000, but not W98...???

Guys ... it's Christmas :-) This group has always been a tremendous source for solutions. I understand there is a solution to the problem that was posted. I fail to see the point in going back and forth about what might have been a better idea some time ago. Win32::GUI is an invaluable piece of wor

RE: [perl-win32-gui-users] Event handler stops working when style is added

I don't know for sure if that's the reason, but I remember Aldo warning about using the style option, because you inadvertently remove, or leave out, styles that may be important. Try using -addstyle to add styles and -remstyle to remove styles. That will leave all the standard style flags untouche

RE: [perl-win32-gui-users] Right-Click, Tooltips

), "\n";# you even get the position } > -Original Message- > From: Marcus [mailto:[EMAIL PROTECTED] > Sent: Friday, November 30, 2001 11:08 > To: perl-win32-gui-users@lists.sourceforge.net > Subject: RE: [perl-win32-gui-users] Right-Click, Tooltips > > > On 30.11.01

RE: [perl-win32-gui-users] Right-Click, Tooltips

Methinks, tooltips is a functionality inherent in GUI ... somewhere ... maybe here ... or under there ... As for the right-clix, knowing that the archive search function does not find anything at all, I searched my own, private mailbox folder and am happy to re-post my own posting: -Original

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

Guys, seems nobody remembers how we did it about a year ago, so this is the way: download the ppm file with a regular browser to your hard drive. I don't remember where I got it (that's why I did not post this before), it was some unpublished path on either dada.it or sorceforge, but I still have

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

The GUI FAQ ( http://www.jeb.ca/faq/Win32-GUI-FAQ.html ... praise, praise) points to ftp://ftp.wh.whoi.edu/pub/gb109.zip for the GUI Builder. I dunno if that link still worx or if there has ever been a newer version.

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

> Try using a _Timer instead of the while loop. Wa to much effort, although it would be the "correct" way to handle this. If you just put a Win32::GUI::DoEvents() inside your loop, the user can click around and events get fired while the script is running. HOWEVER, bear in mind that the event

RE: [perl-win32-gui-users] Win32::DialogBox - LostFocus() Event i n Button and RadioButton Objects doesn't seem to work for me

> The LostFocus() event doesn't respond at all when a mouse click > happens on another object (button, textfield, etc.) >From what I can see in the xs code, the button class is treated in a different manner. You might want to try Button_Anonymous {print join (', ', @_), '\n';} This is an event

RE: [perl-win32-gui-users] Some basic questions

1) How can I have a perl routine running as the master program with the Window just popping up as a dialog box and once I have modified the appropriate parameters, it just disappears and the command is given back to the background perl script ? You can have any number of windows defined and cont

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

> If fork is before show window,then window wont initailise > untill forked sub exits. I vaguely remember that fork() does a subroutine call and does not actually launch another task. If you use backtick instead (as in `runme.exe /option=param` or rather `perl.exe yetanotherscript.pl`), your call

RE: [perl-win32-gui-users] Question about Button-Widget

> I triede for eg. the DblClick() event like that > > sub Button_DblClick { >print "DblClick on Button.\n"; >return 1; > } > > But this doesn't work ... are this events not supportet yet? Yes they are, thru the class. Note that you can have buttons extend the RichEdit widget and vice ver

RE: [perl-win32-gui-users] More on Tabs on Textfields

The multi will accept Ctrl+Tab as tab, dunno 'bout Ctrl+Return, presumably ditto. If that's not what you want, consider intercepting keys - either tab and return only in the multi field, which might not work, or tab and return for the non-dialogui-window, doing the focus-shifting yourself, which al

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

Maybe -disabled keeps it from scrolling? > -Original Message- > From: Jonathan Southwick [mailto:[EMAIL PROTECTED] > Sent: Thursday, November 08, 2001 12:20 > To: perl-win32-gui-users@lists.sourceforge.net > Subject: RE: [perl-win32-gui-users] Putting cursor at end of RichEdit > > > It i

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

Actually, there seems to be an easier way. $Window->{-dialogui} = 1; Taken from a recent posting. 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, GU

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

> Still got one problem, > > my $messref [EMAIL PROTECTED]; > $result=$Win1->PeekMessage(0,0,@$messref); > > Should fill @message with the message details. > like getmessage does, ... >but it dont, any suggestion ? I suggest there is a bug in the xs. I have

RE: [perl-win32-gui-users] Open Network Folder with Browse For Fo lder

> --- start --- > my $bff = Win32::FFI::BrowseForFolder->new( >-initial => CSIDL_NETWORK, >-folder => "client\d$", >-title => "Select Profile Template", > -regexp =>'^(?i)[cd]:', >); > my $dir = $bff->show; >

RE: [perl-win32-gui-users] ACK!! Sputter Cough... say itisn't s o!

Agreed... it isn't "all that bad", but it is limiting/frustrating nonetheless... especially given how simple it would be to add this functionality (i.e. the widget ref must be available inside of the widget code itself, deep in the guts of Win32GUI, and thus be available to the code making the cal

RE: [perl-win32-gui-users] Can't Search perl-win32-gui Archives

> Am I the only one having this problem? Not exactly. This has been reported ever since. The only solution seems to be, keep posting and re-posting your questions ... people like me, who have been around for some time, can search their local computer for your keywords and then re-post the so

RE: [perl-win32-gui-users] ListView loses selection

> Why then, I wonder, does it not show the selection if you do a > $Window->ListBox->SetFocus() or even > $Window->ListBox->SelectedItem->SetFocus() ? I tried both > with a sub of > Window_GotFocus and Window_Restore. Just a thought, I did not try: if you change the selection to what it already is

RE: [perl-win32-gui-users] Save file window

> I have never used the -owner flag, so I have no idea what it does. We've had that. Since searching the archives doesn't really produce any hits, I searched my local mail folder instead :) -Original Message- From: Piske, Harald [mailto:[EMAIL PROTECTED] Sent: Friday, Marc

RE: [perl-win32-gui-users] getting data from listview and putting it in a MS Excel sheet

> I don't know if this is a win32:gui or a general perl > question but here it If you don't know how to read the stuff out of the listview, it's a GUI question, but I don't think you will be shot for asking about the other part ;-) What you want is Win32::ODBC, which can be used to access Excel f

RE: [perl-win32-gui-users] Getting TAB in a Window

> Is there any plans to support more event types? E.g. > keyboard events. Then > we might handle the TAB in our callbacks for a Window. Not an ideal > solution. I'd rather use events for more creative stuff. a) there are plans to come up with a whole new, extensible event model. We're all eag

RE: [perl-win32-gui-users] Setting attributes after creation

> No luck so far, I've tried everyones various suggestions. AFAIK, you > can use hexadecimal or decimals for colours. Three suggestions: 1) If you create a label the size of your window as the very first control, you can use it's background color to fill the window. $Main->AddLabel ( -na

RE: [perl-win32-gui-users] how do you read the contents of an edi t control?

> my $ss = pack("",5,0,0,0, 0,0,0,0, 0,0,0,0); > GUI::SendMessage($window, $EM_GETLINE, 0, $ss); # this does not My guess is that you pass the SendMessage function a copy of $ss, or the contents of $ss, to be precise, so that whatever gets put in there will not make it back to

RE: [perl-win32-gui-users] Wrapping text

> This is probably a simple one, but I can't find out how to wrap text, > for example the "text" property for a Radiobutton. > I tried with a Perlish carriage return+newline such as "bla \r\n more > bla", which did not work. What code do you use? I dunno if this comes down to the same side-effect

RE: [perl-win32-gui-users] Horizontal scroll bars on richedit

> How do you get horizontal bars on a richedit window. I don't > want the text > to wrap around. Is this possible? use -addstyle => WS_VSCROLL | WS_HSCROLL it should not wrap by default. hth Harald

RE: [perl-win32-gui-users] Running user functions after terminate window

> Everytime I write a new program I always make > some stupid mistake that screws everything up. Hm ... anybody here that this does NOT happen to?? I mean of those people that really DO write programs and not recombine samples with cut&paste, the way of Lego-programming you do VB and Dotnet and st

RE: [perl-win32-gui-users] FW: Win32::GUI Events

This is how I intercept xxx_Terminate, which I do to write something to the registry when the program exits. For the whole picture, see WinSize.pm @ www.fairymails.com/perl/ # must bottle this up inside eval eval qq ( # get pointer to current sub.

RE: [perl-win32-gui-users] wait for user input

I didn't do this or test this, just an idea: if you fork into another, totally independent script that uses GUI, then the Dialog() call from there should not trigger event subs in your first script. Then all you need is to hang in one event sub of your first script until the second one comes back.

RE: [perl-win32-gui-users] Drop down boxes

Tried your code snippet and it works fine. Maybe there's something wrong with one of your event subs? Or your general installation? What windows, perl (perl -v) and GUI (ppm query) versions are you using? Check your own code in a script that does nothing else (see below) and see if it does the same

RE: [perl-win32-gui-users] Change cursor to "hourglass" and back?

Basically, what you want is Win32::GUI::SetCursor () the tricky thing is to get the standard resource of the hourglass. Feel free to use my perl module http://www.fairymails.com/perl/WinStRes.pm for exactly this: Win32::GUI::SetCursor (WinCursor (WAIT)); # hourglass ...

RE: [perl-win32-gui-users] Change cursor to "hourglass" and back?

Sorry if this appears twice - I posted it yesterday and got a delivery warning. Since it hasn't showed up yet and other postings seem to get thru, I try again: --- Basically, what you want is Win32::GUI::SetCursor () the tricky thing is to get the standard resource of the

RE: [perl-win32-gui-users] Formatting of text in a RichEdit

There is a SetCharFormat method to the RichEdit control. $Rich->Select ($from_here, $to_there); $Rich->SetCharFormat (-color => $flashy_pink) Look up http://www.jeb.ca/ for tons of information and knowledge (-> Win32-GUI -> FAQ), also contains links to Aldo's docum

RE: [perl-win32-gui-users] RichEdit & KeyPress

I'm just guessing, I don't really know it: maybe you need to make sure that your sub Text_KeyPress returns 1. If it returns 0, the default action (which is typing into the field) would not get carried out. Btw, if it returns -1, the Dialog() call would return and the script would continue after tha

RE: [perl-win32-gui-users] NewbieWin32::GUI Dialog() Question

The infamous 0.99 build ... Go to either Activestate or dada.perl.it and find the latest version. Sadly, the version number 0.99 looks newer to the Activestate ppm installer than the current version 0.0.558, so it will refuse to update it. Instead, do - ppm remove Win32-GUI - ppm install Win32-

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

And now for something completely different ... I haven't tried to redo any of what you describe, but my very first posting and, in fact, the reason for me to find and join this group in the first place, was observing that Arc and Circle (from the GUI::DC package) work OK on Win2k and don't do anyt

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

> BTW, most of this has been said before a few times. Browse > the archives for > more info. Yep! I was just about to re-post this (because we know by now that the archive search does not really find all you're looking for): == > Sent: Wednesday,

RE: [perl-win32-gui-users] Updating a window.

I don't quite see where your problem is ... do you want to know HOW to update your window or WHEN? As for the how, your $sb->Text("whatever"); should work fine anytime. As for the when, maybe you are looking for a timer so that you can update the status bar every other second or so. No offence, b

RE: [perl-win32-gui-users] AddGroupbox causes Perl to crash?

Aren't you gonna give that thing a -name? Every object in GUI needs a name. If it's not unique, that's fine so long as you don't need to interact with the thing. But popping out of Perl from unnamed objects, we've seen that before here on the list. Have fun, Harald > -Original Message- >

RE: [perl-win32-gui-users] Opening a *New* Browser Window?

I guess there's just no way to do it so that all browsers behave the same. And you would not want to have code for all the major browsers out there - talk about maintainability. How about making your code smart enough to deal with it? Open a new browser, deliberately empty, i.e. w/o passing a url.

RE: [perl-win32-gui-users] RE: How to change tip for Notify Icon

I did not try this, but when setting a hash value doesn't work with a GUI object, Aldo sometimes tells us to use the Change method instead. I.e. $Window->NI->Change(-tip => "Show PCKeys"); instead of $Window->NI->{-tip} = "Show PCKeys"; Worth trying. Have fun, Harald > -O

RE: [perl-win32-gui-users] TreeView... how to add those little ic ons...?

It's -lines => 1, -buttons => 1, in the TreeView definition. For a sample, feel free to look up www.fairymails.com/perl/ Click on wex.pl, download the zip and see the wex.ui file. Have fun, Harald > -Original Message- > From: Simon Hardy-Francis [mailto:[EMAIL PROTECTED] >

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

gt; { > > if ($Window->IsVisible) > > { > > $Window->Hide(); > > } > > else > > { > > $Window->Show(); > > $Window->SetForegroundWindow(); > >

RE: [perl-win32-gui-users] BringWindowToTop doesn't

$Window->SetForegroundWindow(); > } > > return 0; > } > > > -Original Message- > > From: Piske, Harald [mailto:[EMAIL PROTECTED] > > Sent: Wednesday, June 06, 2001 10:12 PM > > To: 'perl-win32-gui-users@lists.sourceforge.net' > >

RE: [perl-win32-gui-users] BringWindowToTop doesn't

Works with me ... I have two windows, one button in the first window brings the other to top. Complete code snippet attached for you to check if it works with you and figure out the differences to yours. Oh, and I only checked on Win2k. Have fun, Harald > -Original Message- > From: Glenn

RE: [perl-win32-gui-users] version 0558 installation - undefined macro

Guys - or GUIs ;-) Xqs me for being square, but if we discuss everything under "Timer memory leak", we are giving ourselves a hard time down the road when we try to find a solution in the sourceforge archive. Especially since the search function of the archive is not exactly very successful in ret

RE: [perl-win32-gui-users] showing firstvisible in a combo box

FirstVisibleItem takes an Index, not a string. The Index is zero-based, as Dave said. The points are a) if you want a specific entry to be selected by default, so that the user can change is if she wants and leave it if she doesn't, then you want $LB->Select(), not FirstVisibleItem. b) use $LB->F

RE: [perl-win32-gui-users] Opening a *New* Browser Window?

Well, then you just take the best of both ... first, you open a new browser window and then you do what you did before. I pretty sure that the ShellExecute will target this new browser. At least, when I click a link in a mail in this rotten !#^%$Outlook, it does the very same &^%!# thing of navigat

RE: [perl-win32-gui-users] Opening a *New* Browser Window?

Try this: use Win32::TieRegistry; $http = $Registry->{"Classes\\http\\shell\\open\\command"}->{'\\'}; `$http $url`; I did not try with other browsers, though, just Micro$tuff. Have fun, Harald -Original Message- From: Morbus Iff [mailto:[EMAIL PROTECTED] Sent: Donnerstag, 31. Mai 2001 1

RE: [perl-win32-gui-users] Appending to RichEdit?

Actually, Morbus' approach is the better choice, if you don't mind my saying so. While simply getting the text and setting the appended text basically works (btw: even $RE->{-text} .= $newText; would do), what happens is that the whole field gets refilled and redrawn, using a lot of resources for n

RE: [perl-win32-gui-users] Taskbar & perl2exe -gui crash

t;topmost" windows that "abut an edge" and then iterate several times looking for those that "cover 100% of the remaining space" ??? How do non-perl programs do it? How does "maximize" know how to leave the toolbars visible? Is there a Windows call to figure

RE: [perl-win32-gui-users] Taskbar & perl2exe -gui crash

More general ... hm. What do you mean? All the topmost windows? I think the problem is too varied for a general solution. If you don't know the class names of the windows you want to find the coordinates of, how do you know which ones to choose? Well, you might go and take all the windows that are

RE: [perl-win32-gui-users] multiline Label

Try using a multiline, borderless, readonly text field ... will take a while digging thru texpex and .h-files until you figure out what values to feed -addstyle and -remstyle with, and maybe fiddle with colors. But when you've found it all out, lemme know ... ;-) nb, line breaks in textfields requ

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

Why do you want to go from very old to old? The latest version is 558, not 502. Take http://prdownloads.sourceforge.net/perl-win32-gui/Win32-GUI-0.0.558-PPM-5.6. zip unzip it, change to the directory and then do ppm install Win32-GUI.ppd This will install the local file instead of trying to conne

RE: [perl-win32-gui-users] New window?

I copied your code into a script of mine and it worked. Please make sure you have Win32-GUI 0.0.558 (in a dos window, run ppm query win32-gui). As for your approach, I would recommend you create the dialogbox and all it's controls outside the sub stored_Click, before you call Win32::GUI::Dialog()

RE: [perl-win32-gui-users] Taskbar & perl2exe -gui crash

$_ = Win32::GUI::FindWindow ("Shell_TrayWnd", ""); @_ = Win32::GUI::GetWindowRect ($_); $width = $_[2] - $_[0]; $height = $_[3] - $_[1]; tested on Win2k and Win98. Interestingly, the position of the taskbar is slightly off the screen (-2). Note that the taskbar can be moved to each of the four w

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

| Is there a MouseOver function for Buttons? I didn't see | anything in the docs. When you create a Button-class you'll get the MouseMove event. Other than a real MouseOver, this fires every time the mouse moves. It would take some fantasy to come up with MouseEnter and MouseLeave. One way would

RE: [perl-win32-gui-users] Dropdown Boxes

Hi Michael First off, you might want to upgrade to Win32::GUI 0.0.558. The 502 is really outdated. In short, Aldo has cautioned (on this list) a few times to beware of the -style option because its use makes you prone to omitting standard flags for the particular control, thus inadvertently causi

RE: [perl-win32-gui-users] Changing visibility problem with butto ns

The -visible option is only for the initial state, subsequent showing and hiding is done with Show and Hide ... erm, pardon my confusion, but what's the problem? If you found Show and Hide to be working, what more do you need? You remind me of another problem that might cut in: I am not able to ch

RE: [perl-win32-gui-users] keeping a window open

sub Exit_Click { exit; } this works, pretty much like the engine stops if you hold the brake, put in any gear and release the clutch. The way it was designed to be is to return -1, which tells Win32::GUI to exit the message loop and return from the Win32::GUI::Dialog() call back to your

RE: [perl-win32-gui-users] Minimized GUI windows fall asleep

Never had that at all, and I love to keep my taskbar stuffed with around 15 open apps, 10 of which are min'd while I deal with 3 of the other 5. Even on mon mornings, after around 64 hrs of win-dozing, they come up normally ... that is, as painfully slow as is usual for this OS ;-) There must be s

RE: [perl-win32-gui-users] Displaying DB data

| grid does not | display for me. Instead I get small boxes with one or two | characters in | each, 11 boxes per line. Same here. Just checked on Windoze98, same picture. It seems to me that this script was made some time ago and may have worked with an older version of Win32::GUI. As for the Gr

RE: [perl-win32-gui-users] DrWatson build 623 mod:558 W2k Pro

I can confirm the behavior, but the real problem is a bug in the script, not in GUI: *EVERY* GUI object needs a unique name. Add -name => options to both the statusbar and the progressbar below it and the script starts up. | -Original Message- | From: Bullock, Howard A. [mailto:[EMAIL PROT

RE: [perl-win32-gui-users] Win32::Print ?

| I thought of a solution whereby you could preformat your text & | images, and than output it to the printer spool. The only thing I can contribute to this is my rather unpleasant experience with printing graphical data in windows (GDI, not any specific language). I tried to open a bitmap (pa

RE: [perl-win32-gui-users] AutoScrolling a RichEdit?

| Dammit, I don't know what my problem is then. OK, I tracked it down - I'm using Windoze 2000, you are on 98. The workaround is: $logbox->SendMessage (0x115, 7, 0); # scroll to bottom $logbox->SendMessage (0x115, 2, 0); # scroll one page up In your case, where you only ever display o

RE: [perl-win32-gui-users] Verifiying Input.

| how can I verify | that 3 characters have been entered and if not pad with leading Zeros? Hi Daryll, I'm not sure I'm getting what your problem is. sub beautify_input { $foo = $Window->MyField->Text (); $bar = sprintf ("%03d", $foo); return $bar; } is one of 1001 ways to turn 1 to

  1   2   >