hi
a great gift in this new year, especially the supporting of activePerl 5.10
wich have many new additions
to the language of wisdom.
i am in the process of experimenting many old examples using perl 5.10 with
win32-gui 1.06
happy new win32-GUI
george
-
is working fine also with perl 32bit on a windows xp 64 bit
regards
Robert May <[EMAIL PROTECTED]> wrote:
On 12/02/2008, peter wrote:
> hi
> the new win32GUI 1.06 is fine and working well, i have tried it on windows
> xp 32bit and vista 32 bit, with perl 5.10.1002
Thank you
hi
the new win32GUI 1.06 is fine and working well, i have tried it on windows xp
32bit and vista 32 bit, with perl 5.10.1002
today i have installed windows xp 64-bit on a different primary partition in my
hard disk, then have installed the activePerl 5.10.1002 64-bit, when i tried to
install win
hihow can we enable the mouse right click on the Win32::GUI::RichEdit control, it is not enabled by default. i refer also to the same question 2 years ago by Octavian Rasnita: in:http://www.mail-archive.com/perl-win32-gui-users@lists.sourceforge.net/msg04870.htmlwith no success.i have tried $Contro
text in the textbox, why is this behaviour, and how i can restore the
triangle rotating after clicking the button.
2- is it possible to make the opengl window smaller than the win32gui window
!!
best wishes
peter
--
Enter the
/254072142/triangle.rar
peter
use strict;
use warnings;
#these constants are needed for SetPixelFormat() but aren't defined in
Win32::GUI
use constant {
PFD_TYPE_RGBA => 0,
PFD_DOUBLEBUFFER => 0x0001,
PFD_DRAW_TO_WINDOW => 0x0004,
PFD_SUPPORT_OPENGL => 0x0020,
Hi
Win32-GUI-OpenGLFrame is an important adition to the win32::GUI, which will
be recognized over the years.
i have installed it using vc6++ without problems on win32gui v1.06 -
activeperl 510 - winxp
i will try it and post my findings.
peter
Hi
here is an example using the new Win32-GUI-OpenGLFrame , it is displaying
either a rotating triangle or a rotating cube when you click an appropriate
button.
yes thanks , i am sure this addition will be used heavily when the people
know about it.
here is the downloadable example:
http://rapidsha
r the other ppm
providers sites ,and this is much more convenient to install for the most
windows users.
regards
peter
#!perl -w
use strict;
use warnings;
use Win32::GUI qw(WS_CLIPCHILDREN);
use Win32::GUI::OpenGLFrame qw(w32gSwapBuffers);
use OpenGL qw(:all);
my $spin = 0.0;
my $xrot = 0;
my $yro
's no 665 specific stuff (like the new
event model), see code below.
Any magic involved I am not aware of? Thanks for
your ideas!
Cheers
Peter
---8<-8<---
use Win32::GUI;
$Window = new GUI::Window(
-name => "Window",
-text =
ve"
events and helps to implement sorts of "links"
and a custom cursor shape.
Is there a way to achieve this in version 665?
Should I wait for 772 :)?
Please advise...
Cheers-
Peter
t to trigger it with.
Anything wrong with my code?
All Suggestions greatly appreciated. Thanks!
Peter
P.S.:
I already thought about migrating to 665, but then I
need subclassing to get mouse events from the rich edit
controls and this doesn't seem to work ... ?
#x27;t use any 665 specific stuff like the new
event model.
Any magic involved I am not aware of? Thanks for
your ideas!
Cheers
Peter
Stupid enough I didn't realize it also works as you suggest.
Thanks a lot!
Peter
-Original Message-
From: Johan Lindstrom [mailto:[EMAIL PROTECTED]
Sent: Freitag, 7. Juni 2002 11:05
To: perl-win32-gui-users@lists.sourceforge.net
Subject: Re: [perl-win32-gui-users] no events when
een scrolled).
Btw I managed to migrate my application from version 558 to 655
and for me the problems with RichEdit controls persisted :-(
Peter
-Original Message-
From: Jonathan Southwick [mailto:[EMAIL PROTECTED]
Sent: Montag, 10. Juni 2002 14:31
To: 'perl-win32-g
oils the whole thing...
Could you please help with better ideas how to
accomplish this?
TIA and Cheers,
Peter
ed to check for incoming
messages in a file.
Cheers,
Peter
I have been using perl2exe for quite some time and I'm quite sure that it does
the trick in the way that you describe for PAR.
Cheers,
Peter
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Stephen Pick
Sent: Thursday, 19 February, 2004 11:02
To: Jez
I tested your code and could see the menu. WHat versions of perl and
Win32-GUI are you using?
-Original Message-
From: Koul Christian [mailto:[EMAIL PROTECTED]
Sent: Friday, January 05, 2001 6:45 AM
To: [EMAIL PROTECTED]
Subject: [perl-win32-gui-users] menu
Hi,
I am new in win32::GU
I have a script that reads a file (puts the data into @update) and prints it
to a RichEdit window. This works well on NT but I am having problems with it
on Win98.
As it is being written to the Rich Edit field, the scroll bar starts out
large and scales smaller as more is added (as expected). Howe
True. But when I do this, I still don't get that option.
-Original Message-
From: MATA Tech [mailto:[EMAIL PROTECTED]
Sent: Thursday, January 04, 2001 12:13 PM
To: [EMAIL PROTECTED]
Subject: Re: [perl-win32-gui] Print
Peter:
As I understand it, you must highlight a selection to e
So, I guess my question is, how does the app, and therefore the print dialog
box, know what is selected, if anything? Do I need to code it? If so, how do
I (my code) know what was selected?
-Original Message-
From: Peter Eisengrein [mailto:[EMAIL PROTECTED]
Sent: Friday, January 05, 2001
a more windows-ish way might be to open a new window that instructs the user
to input "something" with a textbox for their input and an OK button to
accept, read in their input, and close the input window.
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Monday, J
I've noticed that CTRL-c (KeyPress 3), CTRL-v (KeyPress 22), CTRL-x
(KeyPress 24), and CTRL-z (KeyPress 26) do in fact copy/paste/cut/undo
to/from the clipboard without the Win32::Clipboard module, at least it does
in one of my scripts (perl v5.6.0 and Win32::GUI v0.0.490).
But I have had problem
Anyone know what the maximum allowed value is for the ->SetRange($min,$max)
on Win32::GUI::AddProgressBar? I am trying to have it be set dynamically
based upon a file size and it would appear that if a file is too big the
$max gets set to some default.
for example:
my $ProgressWindow = new Win
Anyone know what the maximum allowed value is for the ->SetRange($min,$max)
on Win32::GUI::AddProgressBar? I am trying to have it be set dynamically
based upon a file size and it would appear that if a file is too big the
$max gets set to some default.
for example:
my $ProgressWindow = new Win
I may be wrong, but I've found that you cannot call a _Click() directly (you
actually have to Click on something). I'd try this with your subs:
sub Open_Click {
Open();
}
sub Open {
my $file=GUI::GetOpenFileName(-title=>"File To Open",
-filter=>["*.*"],);
}
sub OpenHK_Click {
Open;
ebruary 05, 2001 8:44 AM
To: Peter Eisengrein
Subject: Re: [perl-win32-gui-users] Progress Bar question
Peter Eisengrein wrote:
> Anyone know what the maximum allowed value is for the
> ->SetRange($min,$max) on Win32::GUI::AddProgressBar? I am trying
> to have it be set dynamically base
eforge.net
Subject: Re: [perl-win32-gui-users] AcceleratorTable
The subs that you supplied do not respond to the keys either. Any more
ideas?
erick
never stop questioning
www.jeb.ca <http://www.jeb.ca>
- Original Message -----
From: Peter Eisengrein <mailto:[EMAIL PROTECTED]>
I
Hi all,
This is making me nuts. I have a combobox dropdown that shows on my window
but it does not show the data when I click on it. I copied this same exact
code into the comboxbox.pl sample and it works. Aaaarr!
Any help would be greatly appreciated. I'll just bang my head on the wa
another thing... the data is actually in the list. When the blank combobox
drops down I can click in it and arrow up/down and then I'll see the data --
debug code confirms a selection is being made. It just doesn't want to show
it
##
Hi all,
This is making m
unfortunately that didn't do it. Anyone else seen this type of behaviour
before?
-Original Message-
From: Erick J. Bourgeois [mailto:[EMAIL PROTECTED]
Sent: Saturday, March 03, 2001 4:48 AM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: Re: [perl-win32-gui-users] combobox making m
my $ProgressWindow = new Win32::GUI::DialogBox(
-name => "ProgressWindow",
-left => 300,
-top=> 300,
-width => 400,
-height => 100,
-title => "Loading file...",
);
$ProgressWindow->AddProgressBar(
-name => "PB",
-left =>
Not sure if the -style flag works on textfields but it does on RichEdits and
that might be what's missing. Try adding this to your Textfield hash:
-style => WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_HSCROLL
| ES_LEFT | ES_MULTILINE,
-Pete
-Original Message--
I hate to be a pest on this subject, but I still haven't come up with the
cause of the problem nor the solution. Again, I have comboboxes that pull
down when I click on the handle but it does not display the text. However,
if I arrow-down while it is open I can then see and select (by hitting
retur
Found it!!! And I'm a bit more humble for it... I was missing
Win32::GUI::Dialog(); in my code. Duh.
-Original Message-
From: Peter Eisengrein [mailto:[EMAIL PROTECTED]
Sent: Wednesday, March 07, 2001 2:55 PM
To: 'perl-win32-gui-users@lists.sourceforge.net'
Subject: RE:
Does Win32::GUI give memory back to the OS (WinNT)? I know this has been an
on and off topic for Perl in general. And the answer is usually, no, Perl
does not give memory back.
Try this experiment: open any GUI script (seems to be true for any, at least
on WinNT 4.0). While it is open, open Window
Do you want ->Pos() or ->Select()? I suspect you probably want the latter.
-Original Message-
From: Moore, Larry [mailto:[EMAIL PROTECTED]
Sent: Thursday, March 08, 2001 1:49 PM
To: 'perl-win32-gui-users@lists.sourceforge.net'
Subject: [perl-win32-gui-users] use of Pos method
I have two
Is there any way to open a new window without creating a new item in the
OS's task bar? I'd like to open windows that are a sub of a main window but
show just one task bar item for the main window.
Thanks list.
Pete
The samples that come with the module are generally very good place to
learn; I've found the documentation to be sketchy at times, though.
To answer your specific question, ->SetFocus() is the command you'll use.
For example:
my $Window = new Win32::GUI::Window(
-name => "Window",
I'd simply write the path\file to a data file somewhere and read it before
you contruct your menu. You would write to this file every time someone
opens or creates a file. You would probably also want to create a subroutine
that limits how many files are kept, as such:
### untested!
### At the be
Took a peek at podview.pl. Instead of a datafile it uses the registry. It
also uses a hash instead of an array, so duplicates don't exist (if you open
the same file multiple times).
Good call, this is a better way to handle it, assuming the person using it
is careful with the registry.
-Or
Having trouble with a Win32::GUI::Button where it is not seeing the _Click.
However if I do $ReportButton->Show() or Hide() it works ok (because of the
$var reference) and visually you can see the button is clicked (it
depresses). I am guessing the problem is because it is nested on a Tab, but
I'm
-gui-users@lists.sourceforge.net
Subject: Re: [perl-win32-gui-users] GUI button problems
Peter wrote:
>depresses). I am guessing the problem is because it is nested on a Tab, but
>I'm not sure. And if that is it, whatis the proper way to call it? In the
>script below, if you click o
tried it and works like a charm! and to answer my own question, no it
doesn't get hidden behind the tabstrip.
-Original Message-
From: Peter Eisengrein
Sent: Wednesday, April 18, 2001 1:59 PM
To: 'perl-win32-gui-users@lists.sourceforge.net'
Subject: RE: [perl-win32-gui-us
Hello,
has anyone an approach how to use Win32::GUI with the Model-View-Controller
(MVC) principle? Or if that would be impossible: What would be the best way
to separate business code and gui?
Sincerely
Peter
Do you have the Win::GUI::Dialog(); statement in there?
-Original Message-
From: Chris Etzel [mailto:[EMAIL PROTECTED]
Sent: Thursday, May 10, 2001 8:03 PM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: [perl-win32-gui-users] keeping a window open
Ok, it may be that I have h
ure out how to keep the
#toolbar floating without exiting on button_Click.
my $ExitButton=$Toolbar->AddButton(
-name=>'Exit',
-pos=>[150,10],
-text=>'Exit Toolbar',
);
sub Exit_Click {
exit;
}
$Toolbar->Show();
Win32::GUI::Dial
Anyone had a problem with a Window that "falls asleep" if it has been
minimized for a while. I have this problem and it takes quite a while (> 10
minutes sometimes) for the system to return it when it is restored. This is
especially prevalent in Win98 but have also seen it on NT4.0.
Is there a fix
process
> burns the CPU power and RAM. If on 9x, the task scheduler
> worx differently
> there and you can have one malfunctioning app freezing all
> others, given a
> few conditions.
>
> One last idea: when did you last check for viruses?
>
> | -Original Messa
path (split(/;/, $ENV{PATH})) {
if (-e "$path\\perl.exe") {
return "$path\\perl.exe";
}
}
}
__END__
:endofperl
--- cut here ---
Peter
http://www.metaprojekt.de
led? Can disabled toolbar items have another image? (I need
something like the speedbars in Office Applications).
Sincerely,
Peter
I'm pretty sure it only works when you put them on a DialogBox not a Window.
Or at least that's the only way I've been able to make it work.
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> Sent: Wednesday, May 16, 2001 6:16 AM
> To: perl-win32-gui-users@lists.sou
I don't know how
> (perhaps sending a message, a la the RichEdit workarounds that we've
> seen on this list).
If I can't figure it out, then I tell the user "Don't press this toolbar
button at this time :-)" LOL
But I hope that there is a better solution.
Peter
n->SetRedraw(1) and
much more. The only thing which worked was:
$win->Hide();
$win->Show();
Is this the only method? Any help appreciated.
Peter
without error
$win->buttonXY->Change(-text => "XY");
$win->buttonXY->Show();
Peter
Is there a MouseOver function for Buttons? I didn't see anything in the
docs. What I'd like to do is display a help message in the StatusBar when
the cursor is over a button.
I asked the same thing not long ago. The general concensus was that Tk might
be a better choice because it is cross-platform. Then I ran into a ton of
problems installing Tk, so I just went with Win32::GUI becuase I *could* get
that to install and I haven't looked back... A bunch of samples come wi
Was the -dialogui option implemented on Window? I am trying to use tabstops
and I thought I remembered seeing mention of this on the list but [1] can't
find it and [2] it doesn't work on my NT4 machine. Works fine as a
DialogBox, though.
Thanks,
Pete
What is the event generated when you click on the [?] button (next to the
[X] terminate button) on a DialogBox?
Hello,
I don't know if this has been asked before. Sorry, if there is already a
solution.
How can items, especially single columns of an item in a ListView be
changed, without removing and re-inserting the whole item?
Thanks in advance,
Peter
Is there a known memory problem with the GUI module and/or the Timer object?
I have a script that runs through a _Timer sub once per second and
increments a var (like $count++) and writes it to a Label. Just sitting
there quietly doing nothing more than that adds 4k to the process' memory
every sec
> yes, there was a memory leak but it should have been fixed is
> one of the
> last releases. which version of Win32::GUI are you using right now?
0.0.502 -- I actually just pulled it off your site maybe two weeks ago. Is
there an even newer version? Thanks for your help -- I love this module!
Try the -fill and -frame options. According to docs your choices seem
limited to black/gray/white/none but trying playing with it. Maybe you can
do the exact color you want.
> -Original Message-
> From: Webmaster CZ [mailto:[EMAIL PROTECTED]
> Sent: Friday, June 01, 2001 2:44 PM
> To: perl
> How can items, especially single columns of an item in a ListView
> be changed, without removing and re-inserting the whole item?
Now I am able to give the answer to my own question I asked some days ago
:-)
$win->listview->ChangeItem(-item => $index, -subitem => 1, -text => 'Foo');
Peter
Hello,
has anyone a solution how to change toolbar button states on the fly?
Peter
tensions that aims to provide
comprehensive access to the Windows API.
libwww-perl [5.45 ] Library for WWW access in Perl
PPM>
> -Original Message-
> From: Peter Eisengrein
> Sent: Monday, June 04, 2001 9:17 AM
> To: 'perl-win32-gui-users@list
I see the 0.0.558 tar.gz version on your site but your /ppm still says 502,
which is where I got it from. Is that accurate?
> -Original Message-
> From: Aldo Calpini [mailto:[EMAIL PROTECTED]
> Sent: Monday, June 04, 2001 4:56 AM
> To: Peter Eisengrein
> Subject: Re: [perl-
ository,
> but, one source is as good as another right? Also, you could download
> the zip and install via ppm from the zip file contents localy. I used
> to have to do this at my old job since I could never get ppm to work
> through the firewall there
>
>
>
> >
Joe, thanks for all your help but, man I'm getting nowhere fast! I
downloaded the Win-GUI-0.0.558.tar.gz, extracted it and tried doing the
install as you described and again no deal (no ppd in the archive). Then I
tried doing another install from AS and I'm still on 0.0.502.
C:\ActivePerl\lib\gui
The zip thing worked!!! That's terrific except that scripts that used to
work no longer do. Bummer. I get this kind of an error:
"Your vendor has not defined Win32::GUI macro Category, used at..." (see
below snippet)
What's this about a macro? I get what it means but can someone point me
towards
I've used SetForegroundWindow() from a NotifyIcon and that works on NT4.
sub ni_Click
{
if ($Window->IsVisible)
{
$Window->Hide();
}
else
{
$Window->Show();
$Window->SetForegroundWindow();
}
re
from the samples, here's a select all. I suppose you could modify it to
select just some...
sub AddAll_Click {
for $i (0..$List1->Count-1) {
$List2->InsertItem($List1->GetString($i));
}
$List2->Select($List2->Count-1);
$Edit2->Text($List2->GetString($List2->SelectedItem));
How can you disable (grey-out) an item in a menu? I don't see anything in
the docs and it has ignored everything I have tried, including the obvious:
$Window->Menu->{MenuItem}->Disable();
indow->Menu -> {'SortNot'} -> Enabled ( 0 );
>
>
> Peter Eisengrein wrote:
>
> > How can you disable (grey-out) an item in a menu? I don't
> see anything in
> > the docs and it has ignored everything I have
It sounds like you want a timer.
### untested
@stuff = (0 .. 1000);
$main->AddTimer("Timer", 1000); ### once every second.
sub Timer_Timer
{
$x++;
$sb->Text("Incrementing value: $stuff[$x]");
}
> -Original Message-
> From: Louis Bohm [mailto:[EMAIL PROTECTED]
> Sent
I know you can check to see if a window is shown or hidden via
$Window->IsVisible but can't seem to find something similar to check if it
is minimized or maximized.
Thanks,
Pete
I've never had any success changing it once it is created, but to set the
font at the beginning you can use:
my $Font = new Win32::GUI::Font(
-name => "Courier New",
-height => 16,
-bold => 0,
);
### or the font/style of your choice...
### and then in your AddRichEdit us
bel)
$Window->Button->ChangeCursor($C);
$Window->Label->ChangeCursor($C);
> -Original Message-
> From: Peter Eisengrein
> Sent: Thursday, July 05, 2001 9:07 AM
> To: 'perl-win32-gui-users@lists.sourceforge.net'
> Subject: RE: [perl-win32-gui-users]
Win32::GUI::Cursor should do it (though I've never used it)
> -Original Message-
> From: Felix Gaehler [mailto:[EMAIL PROTECTED]
> Sent: Wednesday, July 04, 2001 4:18 PM
> To: perl-win32-gui-users@lists.sourceforge.net
> Subject: [perl-win32-gui-users] Change cursor to "hourglass" and back
Is there a Kill or other such event if a GUI app crashes or killed? Or
should that just be handled with %SIG it would be awfully convenient if you
could do something like:
sub Exit
{
return -1;
}
sub Window_Terminate
{
print "App closed gracefully.\n";
&Exit();
}
sub Win
You need to give your widgets a -name and the label needs a position. Also,
if you do not include Win32::GUI::Dialog() your window will not remain open.
Try this one.
use Win32::GUI;
$main = Win32::GUI::Window->new(-name => "Window", -width => 100,
-height => 100);
$main->AddLabel
How can I temporarily halt the main Dialog() from accepting other events? I
have an event that opens a dialog box (an alert) that I bring focus to,
disable the other windows, etc. I want to wait for user input (click a
button) before moving on. However, the script picks up other things going on
and
using
> that platform would care to try it out I would be grateful.
I tested it under Win98 and sorry it didn't work there, too.
Peter
he problem I mentioned to you one or two weeks ago. The app
freezes because the focus seems to change very fast between the dialog
boxes, e.g. the about box in Oasis and the main app window. After that I
must kill Oasis to work with Win98.
Peter
now how to en-/disable speedbar buttons on the fly :-)
Peter
<>
on german ebay
- german reading/writing because it is only a german app at the moment,
sorry.
I attached a picture from the app. If anyone is interested, please mail me.
Peter
<>
d
by -background will be ignored.
Peter
P.S.: Still searching for a solution to disable/enable Toolbar Buttons
on-the-fly. Are there any code snippets???
Hello Win32-GUI users,
is there a solution for creating splash screens without the windows border
and icons (e. g. like Opera).
Thanks in advance,
Peter
Not sure what the '-escapement' tag in the font was supposed to do but when
I removed it the label became visible.
> -Original Message-
> From: Renat Araslanow [mailto:[EMAIL PROTECTED]
> Sent: 04 August 2001 15:53
> To: perl-win32-gui-users@lists.sourceforge.net
> Subject: [perl-win32-
duh. you said that. I must need more coffee...
> -Original Message-
> From: Peter Eisengrein
> Sent: 05 August 2001 11:58
> To: 'perl-win32-gui-users@lists.sourceforge.net'
> Subject: RE: [perl-win32-gui-users] bug_or_feature [1]
>
>
> Not sure what
Great work, Johan!
This did the trick. Thanks,
Peter
> -Ursprüngliche Nachricht-
> Von: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] Auftrag von
> Johan Lindstrom
> Gesendet am: Sonntag, 5. August 2001 23:00
> An: perl-win32-gui-users@lists.sourceforge.net
> Bet
> >- Is it somehow possible to catch keyboard events? I did not
> find anything
> >in the Win32::GUI docu except for some _KeyDown event which
> was associated
> >to a single object.
>
I know you can use _KeyPress to catch keyboard events. I know it works in a
RichEdit, don't know about elsewhe
I've never seen this before. A little code showing how you call the other
window might be helpful.
-Original Message-
From: Gross, Stephan [mailto:[EMAIL PROTECTED]
Sent: 09 August 2001 19:18
To: 'Perl GUI'
Subject: [perl-win32-gui-users] Why do Windows spontaneously minimize?
I'm writ
retrieves the
mails won't return until Outlook ist killed with the task manager because it
freezes.
This problem is only when Win32::OLE is used in connection with Win32::GUI.
When I try the same without GUI all is fine.
Has anyone an idea?
Peter
/1
$win->tbToolbar->SendMessage(0x0401, 1, 0)
I am still looking for making a toolbar with hot and cold images. Any
suggestions?
Have fun,
Peter
y program, restructered some lines and that don't work anymore,
too!!!
Even if try something like my $riched = $win->AddRichEdit(-name =>
'riched'...) and use $riched->Text() instead if $win->riched->Text();
Please help,
Peter
I recall seeing this question before but don't seeing an
answer and couldn't find it in the archives.
How can you change the -icon after it already exists in the
system tray?
TIA,
Pete
That did it!!! Thanks!
>
> > How can you change the -icon after it already exists in the
> > system tray?
>
> Don't know how supported it is but this is what I had to do is call
> Win32::GUI::NotifyIcon::Modify directly (it is located in the
> GUI.xs file
> for those with the source). Example
Each time an item is selected, it will run
sub ListView_ItemClick
What you probably want is to keep an array of the items (filenames) that are
selected and then if/when a button (which isn't in your code) is _Click 'd
then do a foreach on your list and move each file then undef the list.
> -O
1 - 100 of 233 matches
Mail list logo
