ing.
>
> We need a Wiki.
I will convert the current Win32::GUI Documentation project website
to Wiki within 2 weeks and post its URL for those who would like
to see the difference between the two.
--
Erick
On Mon, 17 Nov 2003 11:47:29 +0100, Aldo Calpini <[EMAIL PROTECTED]> said:
> regarding the documentation, I appreciate what Erick did, but I found
> it a little difficult to work with. I think a wiki (with CGI::Kwiki,
> for example) would be a better start. we could also write i
On Fri, 14 Nov 2003 08:53:30 +, "Jeremy White" <[EMAIL PROTECTED]> said:
> >>I would be more than willing to bring the files together and serve
> >>them up on jeb.ca
>
> Erick, are you able to generate flat html files which could be included
> au
ws, and only a subset were implemented in Win32::GUI.
>
> 3) I'd be willing to incorporate patches into my version, if someone
> identifies them, and sends me the patches, they aren't too cumbersome to
> apply, and make the merged binary distribution available.
>
>
I guess it should be renamed,
> though, if it diverges from the original.
Glenn,
Why don't you use CVS (the one already setup on SF.net) for all these
much appreciated changes? It is indeed much easier to keep track of
everything that way.
--
Erick
g and
consequently change the color of the list item. Please see the documentation
that came with the module or the online version here:
http://jeb.ca/perl/win32-gui-docs/index.pl/win32-gui-listview
--
-erick-
h reference.
Instead, send the "whole" hash, e.g.
$listview->InsertItem (%item);
erick
inked from the F.A.Q., How-To, or any one of the documented
"sub" modules to Win32::GUI.
Please, if you wish to contribute, you must have a good understanding of HTML
and CSS.
Thanks and enjoy!
erick
rocess of using WebGUI to construct the Win32::GUI Documentation
section to my site. Allowing people to edit the documentation would be trivial,
but I believe that it would be quite a security risk in allowing anyone
to edit the documentation. So I can give certain users permission to edit them.
erick
On Sat, 10 May 2003 18:03:53 +0200, Johan Lindstrom <[EMAIL PROTECTED]> said:
> Does anyone know who wrote Win32::GUI::HyperLink?
>
> The only mention I found of it on the Net is at:
> http://www.jeb.ca/perl/win32_module.htm
>
> Is it perhaps Erick Bourgeois himself th
GUI::Dialog();
#__more_code__
# Remeber to show the dos window
# when your script is finished
Win32::GUI::Show($DOS)
Regards,
[ erick ]
On Tue, 7 Jan 2003 21:57:26 +0100
[EMAIL PROTECTED] (johannes huettemeister) wrote:
> HI,
>
> im totally newbie to Win32::GUI. So maybe one
tter ideas, please let me know.
Erick
> >Hi,
> >
> >Anyone have a work around for retrieving the NODE when it's corresponding
> >checkbox has been clicked?
> >Provided, of course, the TreeView was cr
Hi,
Anyone have a work around for retrieving the NODE when it's corresponding
checkbox has been clicked?
Provided, of course, the TreeView was created with -checkbox => 1.
Regards,
[ erick ]
, $buffer="", $blksize);
$track += $len;
my $wlen;
unless(defined($wlen = $sock->write($buffer,$len)) && $wlen ==
$len) {
$sock->abort;
$ProgWin->Hide();
Msg_Box("Cannot write to remote file $LocalFileName:
$!",48,"Can't Write To File");
close(FILE); ResetTimer();
return undef;
}
}
$ProgWin->Hide();
# Then hide it!
# end of code #
I hope this helps!
regards,
erick
, \%messageInfo);
Then you can access the info by doing the following:
foreach (@messageInfoList) {
print "From: $_->{From}\n";
...
}
Hope that helps.
regards,
erick
, \%messageInfo);
Then you can access the info by doing the following:
foreach (@messageInfoList) {
print "From: $_->{From}\n";
...
}
Hope that helps.
regards,
erick
-text => "Hello World",
| );
|
| What bothers me about this is that I pulled the top line right from
| the=20
| documentation. I am sure no one has time but the docs should be
| changed=20
| accordingly.
What documentation had you found this?
regards,
erick
;,
>-width => 100,
>-height => 100,
>);
> $main->AddLabel(-text => "Hello, world");
> $main->Show();
> Win32::GUI::Dialog();
>
> sub Main_Terminate {
>-1;
> }
Try giving your label a name.
regards,
erick
/upload.cgi
If there are any questions or comments, please email me. I hope this will help
some people :)
regards,
erick bourgeois
never stop questionning
www.jeb.ca
/upload.cgi
If there are any questions or comments, please email me. I hope this will help
some people :)
regards,
erick bourgeois
never stop questionning
www.jeb.ca
e for *that*, is located
on the Exchange." A brief description can be found here:
http://www.jeb.ca/cgi-bin/exchange/display.cgi
p.s. I will be adding a search.cgi and upload.cgi, if there is a high demand for
it.
Please enjoy!
regards,
erick bourgeois
- Original Message -
From: Morbus I
}
It would be a great way of gathering all of the code that has been exchanged on
this list. I should be done by the end of next week, if any has any questions
regarding the idea(or, of course, some input), email me.
regards,
erick bourgeois
never stop questionning
www.jeb.ca
- Original
You can find the FAQ here: http://www.jeb.ca/faq/Win32-GUI-FAQ.html
regards,
erick bourgeois
never stop questionning
www.jeb.ca
- Original Message -
From: Kevin Keegan <[EMAIL PROTECTED]>
To:
Sent: Wednesday, June 06, 2001 6:55 PM
Subject: [perl-win32-gui-users] FAQ
| I
| So, I first open a new browser and then click the link - voila.
Side topic: hold shift and press the left mouse button on any link and it will
open a new browser with that address.
regards,
erick
- Original Message -
From: Piske, Harald <[EMAIL PROTECTED]>
To:
Sent: Thursday,
Dave,
It's probably a good idea to put the $Win->Show(); at the end of the
'stored_Click 'sub, that is, after you added all the controls. And from what I
remember, you should only call Win32::GUI::Dialog(); once.
regards,
erick bourgeois
never stop questionning
www.jeb.
Using GetOpenFileName$dir_path = Win32::GUI::BrowseForFolder(
-title => "Choose a directory:",
);
Piet De Jong wrote:
| Hi
| I want to be able to show a dialog box with just a directory listing.
| Can I pass any parameters to the function GetOpenFileName to only show
informat
viewing it and then flip to another application and then back, and you still
haven't
loaded anything, then the dropdownbox is erased and your nice icon disappears.
I haven't
had time to look at your code, but these are two things I noticed right away.
regards,
erick
never stop questio
Looks good Felix. I fixed a couple of grammar and spelling mistakes. It can be
found here:
http://www.jeb.ca/faq/Win32-GUI-FAQ.html
| Hello Aldo, Erick
| enclosed you find a very first draft of the Win32-Gui-FAQ. I will add
| more questions as they are discussed in the mailing-list and as I
ate further why, I have an idea though), but I just
needed to
add $sock->close() if (!$abort); This actually helps tremendously, because, now
you can
have 5 queued transfers and abort one without affecting any others, that's
great!! I can
feel the brain coming back to normal... :)
Thanks Her
have a window which displays the progress with an "Abort" button, which
I already
gave the code.
I need to exit this loop once and for all, once the connection has been closed.
The answer
is there...just gotta find it...someone...anyone.
regards,
erick
never stop questioning
www.jeb.ca
ments,
it just
closes the socket and thus all data transfering.
The problem I believe is because since my application is GUI and event
driven(OOP), any
action one place jumps you to another section of code, without knowing how to
get back and
say, "hey stop doing that, move on". Does thi
close(FILE);
$data->abort();
$ProgWin->Hide(); # <--progress dialogbox window
$MainWin->SetForegroundWindow();
$MainWin->BringWindowToTop();
GUI::Update($MainWin);
}
I need a way tell the subroutine that is showing the progress to stop reading
data and
move on
Gaehler is working on. (If the FAQ does not have a home, I would be willing to
host it).
Feel free to post(or send to me directly) your comments.
regards,
erick
never stop questioning
www.jeb.ca
s[1]],);
$Popup->AddMenuItem("Hello"=>"HelloBut",);
$Popup->Show();
}
But, this is bad, very bad (extremely unpredictable, it doesn't have an owner).
Is there a
way to do it?
erick
never stop questioning
www.jeb.ca
| 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 created this label was to get a
desired
background color.) Long and the short, if you want to do this, you have to
declare the
(background)label AFTER the the ListView control, as the window is updated, the
Listview
gets hidden (well, all, except the columns).
Thanks anyways Johnathan.
erick
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
ot;email dada's perl lab",
-name => "test",
-pos => [ 25, 35 ],
-url => "mailto:[EMAIL PROTECTED]",
);
$Window->Show();
Win32::GUI::Dialog();
sub Window_Terminate {
return -1;
}
# EOF #
erick
never stop questioning
www.jeb.ca
ast there somebody out there that has seen it, and
I'm not doing all of this for nothing :)
erick
never stop questioning
www.jeb.ca
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
material together, I would sit down and put it all togather.
erick
www.jeb.ca
You can take at look
at the not
yet published site at www.jeb.ca/index_.htm.
regards,
erick
never stop questioning
www.jeb.ca
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
=> "fromMonth",
| -left => 65,
| -top=> 440,
| -width => 60,
| -height => 150,
| -style => WS_VISIBLE | 2 # | WS_NOTIFY,
| );
|
erick
never stop questioning
www.jeb.ca
em => 1,
-width => $width/2,
-text=> "Column2",
);
for (sort keys %Hash) {
$MainWin->ListView->InsertItem( -text=>[$_,
$Hash{$_}] );
# I have another problem here, I want to set the
checkbox to "checked"
}
$MainWin->
Aldo,
The SS_SIMPLE option is only available with the new release
of the Win32::GUI module?
erick
never stop questioning
www.jeb.ca
basically use the
main window as a blackboard to show what there is in the
"View" menu. Should I update the window before I show the
new labels?
erick
never stop questioning
www.jeb.ca
- Original Message -
From: Jonathan Southwick <[EMAIL PROTECTED]>
To:
Sent: Monday,
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
dex,
LVNI_SELECTED);
while(tcount < scount && index != -1) {
XST_mIV(tcount, (long) index);
tcount++;
index = ListView_GetNextItem(handle, index,
LVNI_SELECTED);
}
XSRETURN(scount);
} else {
XSRETURN_NO; #Is the problem here?#
}
erick
never stop questioning
www.jeb.ca
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
> 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
y @index = $MainWin->ListView->SelectedItems();
if ($index[0] >= 0) { #I need the zero because of the
zero-based index
#do something...
} else {
Win32::MsgBox(...);
}
Any more ideas are more than welcome.
erick
never stop questioning
www.jeb.ca
- Original Message -
of the
zero-based index
#do something...
} else {
Win32::MsgBox(...);
}
When "Button" is pressed it always falls through the if
statement. Even in the case of no selection it falls through
because @index[0], in this case, is undef. I know undef is
the same as 0, but how could I get around this?
erick
never stop questioning
www.jeb.ca
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
splays the MsgBox 2**(amount of selected items) times (ie.
2 to the power of). As you may see I tried Selecting the
first item so the sub won't be called again. Any ideas?
erick
never stop questioning
www.jeb.ca
$file = SaveAsDialog %param, "foo.txt";
However, this, and other variants I have tried cause "...an
invalid page fault in module PERL56.DLL at 017f:2804feea."
Either there is something wrong with the function or I don't
have the right syntax. Either way, any help would be greatly
appreciated.
erick
never stop questioning
www.jeb.ca
oesn't work because there is no method
"Visible" for a label. But, you can set the -visible option
of a label to 0. How do you find out whether it's 0 or 1?
erick
never stop questioning
www.jeb.ca
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
- O
gt; [0, 0],
-style => ES_CENTER | WS_VISIBLE,
-background => [0,51,102],
-foreground => [255,255,255],
);
$MainWin->Show();
Win32::GUI::Dialog();
sub MainWin_Terminate {
$MainWin->Hide();
return -1;
}
#--EOF---#
erick
never stop questioning
www.jeb.ca
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 some
s => [70, 70],
-menu => $Menu,
);
$MainWin->Show();
Win32::GUI::Dialog();
sub MainWin_Terminate {
$MainWin->Hide();
return -1;
}
sub Open_Click {
my $file=GUI::GetOpenFileName(-title=>"File To Open", -filter=>["*.*"],);
}
sub OpenHK_Click {
Open_Click();
}
#EOF---#
erick
never stop questioning
www.jeb.ca
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 tex
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
ose tabs (eg. "Name"), each item will be sorted accordingly.
(What is the real name for these controls?)
erick
never stop questioning
www.jeb.ca
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:
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
ssageBox(
0,
"Do you want to do this?",
"Title",
MB_ICONINFORMATION | MB_YESNO,
);
well at least this works for me. One question, what does the zero do? Make it
modal?
erick
never stop questioning
www.jeb.ca
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
HostName->InsertItem ("ftp.server1.com");
$HostName->InsertItem ("ftp.server2.com");
The first item is not showing right away, I have to drop the
combobox first. I also tried -text=>"ftp.server1.com"
erick
never stop questioning
www.jeb.ca
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
Dynaloader.pm?
erick
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
om Net::FTP) and place
it in
> >
> >$SB = $Window->AddStatusBar(-text => $FTPInfo);
>
> $SB->Text($FTPInfo);
>
> should do the trick.
erick
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
93 matches
Mail list logo
