I have a process running, which is writting to a file(using print instead of
syswrite),
and I have a small dialogbox with a progressbar and an abort button. The
problem is when I
click the abort button, I get a GUI message "select: Bad file descriptor at ...
line 412".
This is the line where I r
To all Win32::GUI users,
I posted the new Win32::GUI HOWTO here:
http://www.jeb.ca/howto/The_Win32-GUI_HOWTO.html I
have only put the tutorials up (in a HOWTO format). With time permiting, of
course, I will
do all parts of the Win32::GUI documentation, with exception to the FAQ, which
Felix
Gae
Has anyone implemented a popup menu. That is, if the user right clicks, for
example, a
listview, then a menu appears. I tried creating one using:
sub ListView_RightClick {
@cursorpos = Win32::GUI::GetCursorPos();
$Popup = new Win32::GUI::MenuButton(-pos=>[$cursorpos[0],$cursorpos[1]],);
| About the (numerous) [TBD]s in the doku
I'm sorry Harald, it's probably just me, but what is "the doku"? The modules
pakage?
erick
never stop questioning
www.jeb.ca
I posted a message a while back saying that I had a problem when I tried to
resize the
columns in a ListView, the data (ie. that which was in the listview control)
would
disappear. Well, I isolated the problem. This only occurs if you create a label
that
covers the whole window. (The reason why
Aldo,
Is there a reason why the tutorials jump from 5 to 9. I guess the 9 is
upside down ;-)
regards,
erick
never stop questioning
www.jeb.ca
Aldo,
I was wondering if it was ok if I use the tutorials, which come with the
Win32-GUI,
and build an online (and obviously off-line) HOWTO? You could distribute the
HOWTO with
the module. Let me know what you think.
regards,
erick
never stop questioning
www.jeb.ca
I have a problem when I use both protocols, for the Hyperlink module, one after
the other.
The following example will open a the mailto always, for both. And when I
switch them,
that is, put the http after the mailto, then it will always open a the http,
for both. It
falls through and the first
| was trying to run your ftp client. I can't seem to install the net:ftp on
| a win32 activestate perl. where can i find a net:ftp that will install on
| win32 . it seems that all modules i get from cpan, i don't know how to
| install them.
When I install modules from CPAN, I use the 'nmak
When I compile a Win32::GUI (v0.0.588) script using Perl2Exe (v5.00 03), and I
run it and
then try and close it I get a page fault error. On the other hand, when I
compile it using
version 0.0.502, I do not receive the error. Is this a bug in Win32::GUI module
(v0.0.588)
or in Perl2Exe?
erick
n
| We could also set up a wonderful knowledge base. Does anybody have
| experience on how to organise hints and questions (or how-to headlines) so
| that people can actually find something?
I would love to set something like the Linux HOW-TOs on my site, easy
navigation with a
TOC. If we got some
| I was wondering if anyone has set up a website that
| contains a 'library' of examples for current Win32-GUI
| code.
Well, Watson, that' exactly what I want to do. I have started a site based
around Perl and
more specificlly Win32::GUI module. I will be putting almost all my finished
(and
unfi
Paul, I get the following:
Packages available from http://ppm.ActiveState.com/cgibin/PPM/ppmserver.pl?urn:/
PPMServer:
Win32-GUI [0.0.558] Win32 Graphical User Interface Extension
Win32-GuiTest [0.9] Perl GUI Test Utilities
erick
never stop questioning
www.jeb.ca
- Original Message --
Use either/both WS_HSCROLL | WS_VSCROLL in your style option.
erick
never stop questioning
www.jeb.ca
- Original Message -
From: Peopleclick Customer Support <[EMAIL PROTECTED]>
To:
Sent: Friday, March 02, 2001 6:33 PM
Subject: [perl-win32-gui-users] perl-win32-gui-users
I have a combo
I know when I would forget a comma in the options, I would not get the proper
output. Try either uncommenting the WS_NOTIFY or adding a comma after the 2.
| my @months = ('',Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Oct,Nov,Dec);
|
| my $fromMonth = $Window->AddCombobox(
| -name => "fromMonth",
| -lef
Jonathan,
You asked me: "What does your listview contruct look like?
Is there any other code that might be responsible for this
maybe?". So I described (described being the opertive
word)how I constructed it and I introduced the fact that I
do have other code that code be responsible. I'm sorry if
Aldo,
The SS_SIMPLE option is only available with the new release
of the Win32::GUI module?
erick
never stop questioning
www.jeb.ca
le for this maybe?
>
> Jonathan Southwick
> Technical & Network Services
> Allegheny College, Meadsville, PA
> [EMAIL PROTECTED]
>
> - Original Message -
> From: "Erick J. Bourgeois" <[EMAIL PROTECTED]>
> To:
> Sent: Friday, February 16, 2001
Has anyone had the listview disappear if you try and resize
the column? If I resize it, the first time it disappears,
the second it reappears but without the scrollbars. Any one
else?
erick
never stop questioning
www.jeb.ca
Aldo, I had a look at the GUI.XS (Version: 0.0.558) and I
found the following lines (at line: 9930~) for SelectedItems
return:
scount = ListView_GetSelectedCount(handle);
if(scount > 0) {
index = -1;
tcount = 0;
EXTEND(SP, scount);
index = ListView_GetNextItem(handle, index,
LVNI_S
Aldo, can I correct it myself and compile it with DJGCC?
erick
never stop questioning
www.jeb.ca
Sorry to bother the list again, but Aldo, checking it's
undef"ness" with defined does not work either, it falls
through not matter what. I tried putting print
"$index[0]\n"; to see it's value and indeed it is undef (ie.
it did not print anything), so why does it pass the if
statement?
erick
never
> UNDEF IS NOT THE SAME AS 0! this is, speaking in perl
terms,
> an heresy and you shall be punished with eternal fire ;-)
Mia colpa, mia colpa...won't happen again :)
erick
never stop questioning
www.jeb.ca
Jeremy, sorry what I gave was a typo, I did indeed have
$Index[0] (Cutting and pasting error :) ). It should look
like this:
$MainWin->AddListView(
-name => "ListView",
-pos => [85, 100],
-size =>
[$MainWin->ScaleWidth-160,$MainWin->ScaleHeight-1
I'm trying to test if any items have been selected in a
listview with a button event and I have used the -singlesel
option on the listview. So, therefore, if the user clicks
the button without selecting anything, I would like to have
a MsgBox, else take the value of the the choosen selection
and do
When inserting an item, there does not seem to be an option
for setting the item as checked or not. I think I would have
to use the SetItem method, but there is no documentaion on
this. Does anyone know?
erick
never stop questioning
www.jeb.ca
> sorry, but where did you got this syntax?
>From the documentation in FileOp module.
erick
never stop questioning
www.jeb.ca
- Original Message -
From: Aldo Calpini <[EMAIL PROTECTED]>
To: Erick J. Bourgeois
Sent: Monday, February 12, 2001 10:47 AM
Subject: Re: [perl-win
I wish to prevent the user from choosing more than one item
in a Listview and since I didn't find an option
for -multisel, like in a ListBox, I have attempted to
achieve this through the ItemClick event for a ListView.
sub ListView_ItemClick {
if ($Win->ListView->SelectCount() > 1) {
W
Has anyone had success using the SaveAsDialog?
I'm using the SaveAsDialog in the following way:
my %param = (title => "SaveAs",
filters=>{'Filter 1' => '*.txt;*.doc', 'Filter 2'
=>'*.pl;*.pm'});
my $file = SaveAsDialog %param, "foo.txt";
However, this, and other varian
Is there a way of dynamically checking a labels visibility?
Well, dynamically would be the same as statically, so really
how can you test a label to check whether it is showing.
Something sort of like this:
if ( $MainWin->Label_1->Visible ) {
...
} else { ... }
However, this code doesn't work
Get it from CPAN at
http://search.cpan.org/search?dist=Win32-API , then unpack
it and build it using nmake (follow the usual steps for
making). Should work great. :)
erick
never stop questioning
www.jeb.ca
Jeremy,
I didn't know that there was an -align option, but that is
not really what I was concerned with, it's the colors.
Why can't you use the two color options (ie. -background
and -foreground) ALL the time, with any control?
erick
never stop questioning
www.jeb.ca
- Original Message -
When I create a label and/or combobox, give them color attributes and then try
and use the -style option, the colors are completely ignored. That is, if I
just use the control without the -style option, then the colors work. For
example, the following works great:
use Win32::GUI;
$MainWin = ne
The subs that you supplied do not respond to the keys either. Any more ideas?
erick
never stop questioning
www.jeb.ca
- Original Message -
From: Peter Eisengrein
I may be wrong, but I've found that you cannot call a _Click() directly (you
actually have to Click on something). I'
I'm working on an accelerator table and I have written this thus far, but it
isn't responding to the keys:
use Win32::GUI;
$HotKey = new Win32::GUI::AcceleratorTable(
"Ctrl-O" => "OpenHK",
);
$Menu = Win32::GUI::MakeMenu(
"&File"=> "File",
"> &Open Ctrl+
When using, for example:
$Window->AddButton(
-name => "Frame",
-pos => [10, 70],
-size => [275, 200],
-text => "Hello World!",
-style => BS_GROUPBOX,
-visible => 1,
);
to create a Frame (or GroupBox), how do you change the background color for the
text?
erick
www.jeb.ca
I'm sending this email as a last resort. I can't figure out how to change the
background color of a listview. I tried the following:
$Window->ListView->BackColor(hex("FF"));
$Window->ListView->BackGround(hex("FF"));
There is an option for text color (TextColor(hex("FF"))).
erick
nev
Is there a way to add a combobox to a listview, that is, let one of the
elements be a combobox?
erick
never stop questioning
www.jeb.ca
Has anyone tried using the "column lists"? For example, the "Find" program in
the Start menu, has a list of files found under the column "Name" and another
column "In Folder". Another interesting thing about these controls is that if
you click on those tabs (eg. "Name"), each item will be sorted
I see. Do you have a list of the corresponding icon, button, and modality
values?
erick
never stop questioning
www.jeb.ca
- Original Message -
From: Thomas, Timothy B
To: 'perl-win32-gui-users@lists.sourceforge.net'
Sent: Tuesday, January 23, 2001 11:09 PM
Subject: RE: [perl-
Here you go Bart. This shows how to implement a combobox. Well, at least I hope
this is what you want. If it isn't just personally email me.
erick
never stop questioning
www.jeb.ca
combobox.pl
Description: Binary data
Tim,
I tried your way and I got a runtime error, "Undefined subroutine
&Win32::MsgBox called at ...". However, if I call the method MessageBox() on a
window object, it's all good. Halfway through this email I realized what you
did wrong; shouldn't it be:
Win32::GUI::MessageBox(
0,
"Do y
Sorry, I just found out how to do it.
- Original Message -
From: Erick J. Bourgeois
To: perl-win32-gui-users@lists.sourceforge.net
Sent: Tuesday, January 23, 2001 10:01 PM
Subject: [perl-win32-gui-users] MessageBox?
Is there a MessageBox constructor? I remember seeing
Is there a MessageBox constructor? I remember seeing this idea somewhere, but I
can't find it any more.
erick
never stop questioning
www.jeb.ca
It worked Jonathan, thanks. I put the Select method before I inserted the items
:)
erick
never stop questioning
www.jeb.ca
Johnathan,
Do you mean $HostName ->Select[0];
I tried both ways, both don't work.
erick
never stop questioning
www.jeb.ca
Why is it that in the following Combobox:
$HostName = $MainWin->AddCombobox(
-name => "HostName",
-tabstop => 1,
-style=> WS_VISIBLE | 2 | WS_NOTIFY,
-left => 205,
-top => 10,
-width=> 110,
-height => 160,
);
$HostName->InsertItem ("ftp.server1.c
Just to tell you Thomas, emails in Outlook have the ending
.eml
> Deviating from Win32-GUI somewhat:
> Next step is to figure out how to mimik a
"mailto:"; for the e-mail
> link. Should be easy, once we figure out how to determine
what the default
> e-mail program is. Not sure what assicat
I received this message after I installed version 0.0.502
Win32::GUI object version 0.0.502 does not match
$Win32::GUI::VERSION Beta at D:
/Perl/lib/DynaLoader.pm line 219.
Compilation failed in require at ftp.pl line 4.
BEGIN failed--compilation aborted at ftp.pl line 4.
How do I change the Dyn
Aldo, I thought I had the version just before 0.0.558,
however when I type:
> perl -MWin32::GUI -e "print Win32::GUI::Version;"
it tells me it is beta.
erick
> Maybe, just maybe, this will work. Add the following to
your window
> declaration:
>
> -minsize=> [$minwidth,$minheight],
> -maxsize=> [$maxwidth,$maxheight],
>
I'm afraid the -minsize option does not work.
$MainWin = new Win32::GUI::Window(
-name => "MainWin",
-text => "JEB F
I added the resizable option, however it still does not
work:
$MainWin = new Win32::GUI::Window(
-name => "MainWin",
-text => "Main Window",
-height => 400,
-width=> 450,
-left => 200,
-top => 100,
-font => $Font,
-menu => $Menu,
-
How does one prevent a user from resizing a window? The only
thing I could think of is testing the window size when they
attempt to resize and then stopit from being resized. Is
there an easier or more efficient way of doing it?
erick
Sorry, here is the sub for connecting to an FTP server
sub CmdConnect_Click {
my $FTPInfo;
$Textbox->Text("Connecting to $Host");
if ($ftp = Net::FTP->new($Host, Timeout => 45, Debug =>
1)) {
$FTPInfo = Net::Cmd::message(); #Problem
lies here, it just stops
sorry ->message() is method
The program stalls when it tries to read from the STDOUT.
I was looking at the docs, Net::Cmd, and there is a
ion ->message(), however, it stalls there as well,
waiting.
->message() returns the text message returned from the last
command . Don't get it?
Is it possible to "grey out" a control (user can not change it, but he/she can
see it, like a DUN). I have tried many options and can not find the answer.
erick
Never Stop Questioning
www.jeb.ca
I guess my question was really how to catch it from
Net::FTP. For example, catch the STDOUT so that I could have
$FTPInfo = "331 User name okay, need password."
> >Is there a way to catch the STDOUT from using Net::FTP
(ie. let $FTPInfo
> >equal the information (string) from Net::FTP) and place
i
Is there a way to catch the STDOUT from using Net::FTP (ie. let $FTPInfo equal
the information (string) from Net::FTP) and place it in
$SB = $Window->AddStatusBar(-text => $FTPInfo);
erick
Never Stop Questioning
www.jeb.ca
I was fouling around with the GUI samples and I tried to run
winppm.pl, but I get this Windows error
PERL caused an invalid page fault in
module MSVCRT.DLL at 017f:78002f52.
Any ideas?
erick
I Can't even get the first call.
> > my $filename = Win32::GUI::GetOpenFileName(
> > -filter => [
> > "File type 1" => "*.ft1",
> > "File type 2" => "*.ft2",
> > ],
> > );
> >
I used the above code, but no results. The only way I can
filter files is one file ending at a time, that is by
placing a
Is there any way of showing a main window (ie.
Win32::Window) without having to call:
Win32::GUI::Dialog();
after:
$Frame->Show();
erick
62 matches
Mail list logo
