wxperl-users — For wxPerl users

Re: [wxperl-users] sorting a list

[Nick J. <sk...@er...>]

boo...@at... wrote:

> while I'm being dense, If I read the documentation for 
> wxListCtrl::SortItems correctly, I can only sort on the data for the 
> list items? So how would I make a listview that's sorted on the 3rd 
> column's data, besides using SetItemData to make sure the data's equal 
> to the 3rd column?


Boo Radley, I think you are correct: you can only sort on an item's 
data. I think the only way of sorting is as you describe.

<rant>
Overall, Wx::ListCtrl is a very unpleasant and difficult to use control. 
For instance:
- Completely bizarre handling of selections. I would think it would make 
sense to have a method called GetSelection() or GetSelections() that 
returns the index of a selected element. Apparently not. You need to set 
up an event and store the index of the selected item in a global 
variable. Lovely (!). Even more bizarre is handling of *multiple* 
selections. If a user selects N items, the event handler for selection 
is called N items. So you need to store the indices of selected items as 
keys in hash. Then you need to set up a event handler for items be 
unselected and delete the index out of the hash.
- No documentation for Perl implementation of wxListItem, so I don't 
know how to iterate over the list control and use wxListItems to find 
out if any item is selected.
- When items are inserted into the list, the item inserted first appears 
at the bottom of the list. This seems to contradict logic IMHO.
- There is no SetPlData() function (as there is for the tree control), 
the only data that can be associated with an item is a long int. That 
means if you want to associate any Perl data you need to set up an array 
and store the index as an item's data.

What makes this even more bizarre is that Wx::ListBox does actually 
provide a GetSelections() method and in general seems more sane. But it 
doesn't have a report view (which you wouldn't expect from a list *box*, 
so that's OK).....
</rant>

Overall I like wxPerl and I recognise that most of the problems are 
caused by wxWindows, not the Perl interface... but I do not understand 
why Wx::ListCtrl is so awkward to use, and why it does not have a 
SetPlData() method.

- Nick

[wxperl-users] sorting a list

[boo r. <boo...@at...>]

while I'm being dense, If I read the documentation for 
wxListCtrl::SortItems correctly, I can only sort on the data for the 
list items? So how would I make a listview that's sorted on the 3rd 
column's data, besides using SetItemData to make sure the data's equal 
to the 3rd column?

Re: [wxperl-users] Dialog return values?

[boo r. <boo...@at...>]

Mattia Barbon wrote:
>>is there anyway to pass something besides a return code from a dialog?
>>looking in the documentation, it seems that GetReturnCode is the only 
>>way to communicate.
> 
> This is correct; of course, you can store data in instance variables:
> 
> my $dlg = MyDialog->new( ... );
> my $ret = $dlg->ShowModal;
> if( $ret == wxID_OK ) {
>   my $data = $dlg->{DATA}; # ->{DATA} has been initialised
>                            # by MyDialog::OnOk
> }
> $dlg->Destroy;
> 

So it seems I'm responsible for providing a, e.g., GetData method for my 
users. Fair enough.

Thanks, Mattia

Re: [wxperl-users] Dialog return values?

[Mattia B. <mb...@ds...>]

> is there anyway to pass something besides a return code from a dialog?
> looking in the documentation, it seems that GetReturnCode is the only 
> way to communicate.
This is correct; of course, you can store data in instance variables:

my $dlg = MyDialog->new( ... );
my $ret = $dlg->ShowModal;
if( $ret == wxID_OK ) {
  my $data = $dlg->{DATA}; # ->{DATA} has been initialised
                           # by MyDialog::OnOk
}
$dlg->Destroy;

HTH
Mattia

[wxperl-users] Dialog return values?

[boo r. <boo...@at...>]

is there anyway to pass something besides a return code from a dialog?
looking in the documentation, it seems that GetReturnCode is the only 
way to communicate.

Re: [wxperl-users] perl2exe

[Marcus <li...@wo...>]

> Which version of perl2exe do you need to buy to work with
> WxPerl?

You only need the light version for MSW ($50?). Downside is
that your program will be non-GUI, i.e. a DOS box opens. You
can minimize or hide the window with a little code from
Win32::GUI though. You do that inside BEGIN {}.

The Pro version makes a real GUI version, and has a few other
functions.

Marcus

Re: [wxperl-users] perl2exe

[Jay S. <me...@he...>]

Which version of perl2exe do you need to buy to work with WxPerl?

Jay
----- Original Message ----- 
From: "Marcus" <li...@wo...>
To: <wxp...@li...>
Sent: Thursday, October 10, 2002 8:06 PM
Subject: Re: [wxperl-users] perl2exe


> > Has anyone tried using WxPerl with perl2exe? How well does it
> > work?
> 
> It works fine on MSW.
> 
> Marcus
> 
> 
> 
> 
> 
> -------------------------------------------------------
> This sf.net email is sponsored by:ThinkGeek
> Welcome to geek heaven.
> http://thinkgeek.com/sf
> _______________________________________________
> wxperl-users mailing list
> wxp...@li...
> https://lists.sourceforge.net/lists/listinfo/wxperl-users
> 
> 
> 

Re: [wxperl-users] perl2exe

[Marcus <li...@wo...>]

> Has anyone tried using WxPerl with perl2exe? How well does it
> work?

It works fine on MSW.

Marcus

Re: [wxperl-users] Re: Wx::FontEnumerator

[Mattia B. <mb...@ds...>]

> The following code runs, but the font list is empty. Is there something
> else I need to do first?
Yes, sorry for giving you bad advice.

> Running MSW, NT4.
> 
> use strict;
> use Wx qw(:everything);
> 
> my $enum = Wx::FontEnumerator->new;
$enum->EnumerateFacenames;
> my @fonts = $enum->GetFacenames();
> 
> foreach (@fonts) { print};

FWIW, this is mentioned in wxFE::GetFacenames documentation.

Regards
Mattia

[wxperl-users] perl2exe

[Asim J. <asi...@ac...>]

Has anyone tried using WxPerl with perl2exe? How well does it
work?

Asim

Re: [wxperl-users] PPM trouble (doesn't heart to visit the archives) (ppmplus anybody?)

[Asim J. <asi...@ac...>]

On Thu, Oct 10, 2002 at 04:43:41AM -0700, DH wrote:
> Mattia Barbon <mb...@ds...> wrote:
> > > It doesn't hurt to visit the archives
> > > 
> > > http://www.geocrawler.com/lists/3/SourceForge/8008/0/9809093/
> > 
> > I agree, but nonetheless this should be fixed (I, personally,
> > would be very annoyed if a package installation would not
> > work [1]). [1] not that I use PPM that much, though...
> > 
> 
> true that. the PPM modules aren't bad, but the shell continues
> to suck, and it's hard to fix ~ i guess someone ought to write
> a better one (ppmplus anybody?)

Until ppm is improved a quick solution (which would really help
other people like me who use ppm) would be to include the script

> http://www.geocrawler.com/lists/3/SourceForge/8008/0/9809093/

as ppm-install-wxperl.pl in the distro. This way new users can
install wxPerl without scouring the list archives.

I downloaded wxPerl and when ppm failed I assumed the package was
broken and gave up on it for several months. After I saw this
message I went back to the archives and found the install script. 

The easier wxPerl is to install the more people will use it, and
the more people will contribute to it, which will help improve it
over time. The broken install could be hurting wxPerl's spread.

Asim

Re: [wxperl-users] PPM trouble (doesn't heart to visit the archives) (ppmplus anybody?)

[DH <cra...@ya...>]

true that.
the PPM modules aren't bad,
but the shell continues to suck,
and it's hard to fix ~ i guess someone ought to write a better one
(ppmplus anybody?)

--- Mattia Barbon <mb...@ds...> wrote:
> > It doesn't hurt to visit the archives
> > 
> > http://www.geocrawler.com/lists/3/SourceForge/8008/0/9809093/
> 
> I agree, but nonetheless this should be fixed (I, personally,
> would be very annoyed if a package installation would not work[1]).
> 
> Regards
> Mattia
> 
> [1] not that I use PPM that much, though...
> 
> 
> 
> 
> -------------------------------------------------------
> This sf.net email is sponsored by:ThinkGeek
> Welcome to geek heaven.
> http://thinkgeek.com/sf
> _______________________________________________
> wxperl-users mailing list
> wxp...@li...
> https://lists.sourceforge.net/lists/listinfo/wxperl-users


__________________________________________________
Do you Yahoo!?
Faith Hill - Exclusive Performances, Videos & More
http://faith.yahoo.com

Re: [wxperl-users] PPM trouble

[Nick J. <sk...@er...>]

While we are talking about PPM, it would be very useful to have the .ppd 
file stored on the wxPerl web site somewhere, so I can could just 
install wxPerl by doing

ppm
install http://wxperl.sourceforge.net/wx.ppd

It would also be useful to have a statically linked version of wxPerl 
(with wxWindows library) included for Linux x86. I want to distribute my 
script to some Linux users who are not very computer-literate and who do 
not have root access to install the RPM.

Thanks,

Nick.

Mattia Barbon wrote:

>>Mattia wrote:
>>    
>>
>>>If you explain what is broken, it _may_ be possivle to fix it...
>>>      
>>>
>>I'd be very grateful if we could. I have AP 623. I updated PPM 2.x and
>>then it stoppped working. This happened before. An install over the
>>existing perl does not work. Here is the error message:
>>    
>>
>This PPM 2.1.6, right? Just to get the right PPM version...
>
>  
>
>>I got PPM3, but that only works online, not locally. So you get this:
>>    
>>
>Are you sure? this would really be bad...
> 
>Regards
>Mattia
>
>
>
>  
>

Re: [wxperl-users] PPM trouble

[Mattia B. <mb...@ds...>]

> Mattia wrote:
> >If you explain what is broken, it _may_ be possivle to fix it...
> 
> I'd be very grateful if we could. I have AP 623. I updated PPM 2.x and
> then it stoppped working. This happened before. An install over the
> existing perl does not work. Here is the error message:
This PPM 2.1.6, right? Just to get the right PPM version...

> I got PPM3, but that only works online, not locally. So you get this:
Are you sure? this would really be bad...
 
Regards
Mattia

Re: [wxperl-users] PPM trouble (doesn't heart to visit the archives)

[Mattia B. <mb...@ds...>]

> It doesn't hurt to visit the archives
> 
> http://www.geocrawler.com/lists/3/SourceForge/8008/0/9809093/

I agree, but nonetheless this should be fixed (I, personally,
would be very annoyed if a package installation would not work[1]).

Regards
Mattia

[1] not that I use PPM that much, though...

Re: [wxperl-users] PPM trouble (doesn't heart to visit the archives)

[DH <cra...@ya...>]

It doesn't hurt to visit the archives

http://www.geocrawler.com/lists/3/SourceForge/8008/0/9809093/


--- Marcus <li...@wo...> wrote:
> Mattia wrote:
> >If you explain what is broken, it _may_ be possivle to fix it...
> 
> I'd be very grateful if we could. I have AP 623. I updated PPM 2.x and
> then it stoppped working. This happened before. An install over the
> existing perl does not work. Here is the error message:
> 
> "Error installing package 'Wx': Read a PPD for 'Wx', but it is not
> intended for this build of Perl (MSWin32-x86-multi-thread)"
> 
> Any ideas?
> 
> I got PPM3, but that only works online, not locally. So you get this:
> 
> ppm3 install --location=. Wx
> 
> "Unknown option: location
> Package 'Wx' not found; 'search' for it first."
> 
> (N.B: I've stuck with AP 623 because newer builds didn't work with all
> modules or Mingw would not compile wxPerl, e.g. on AP 631)
> 
> Thanks,
> 
> Marcus
> 
> 
> 
> 
> -------------------------------------------------------
> This sf.net email is sponsored by:ThinkGeek
> Welcome to geek heaven.
> http://thinkgeek.com/sf
> _______________________________________________
> wxperl-users mailing list
> wxp...@li...
> https://lists.sourceforge.net/lists/listinfo/wxperl-users


__________________________________________________
Do you Yahoo!?
Faith Hill - Exclusive Performances, Videos & More
http://faith.yahoo.com

[wxperl-users] Re: Wx::FontEnumerator

[Marcus <li...@wo...>]

The following code runs, but the font list is empty. Is there something
else I need to do first?

Running MSW, NT4.

use strict;
use Wx qw(:everything);

my $enum = Wx::FontEnumerator->new;

my @fonts = $enum->GetFacenames();

foreach (@fonts) { print};

-------------------------


Marcus

[wxperl-users] PPM trouble

[Marcus <li...@wo...>]

Mattia wrote:
>If you explain what is broken, it _may_ be possivle to fix it...

I'd be very grateful if we could. I have AP 623. I updated PPM 2.x and
then it stoppped working. This happened before. An install over the
existing perl does not work. Here is the error message:

"Error installing package 'Wx': Read a PPD for 'Wx', but it is not
intended for this build of Perl (MSWin32-x86-multi-thread)"

Any ideas?

I got PPM3, but that only works online, not locally. So you get this:

ppm3 install --location=. Wx

"Unknown option: location
Package 'Wx' not found; 'search' for it first."

(N.B: I've stuck with AP 623 because newer builds didn't work with all
modules or Mingw would not compile wxPerl, e.g. on AP 631)

Thanks,

Marcus

Re: [wxperl-users] Wx::FontEnumerator

[Mattia B. <mb...@ds...>]

On Wed, 9 Oct 2002, Marcus wrote:

>How do you call Wx::FontEnumerator?
>
>Would this be correct?
>-------------------
>use strict;
>use Wx qw(:everything);
>
>my @fonts = Wx::FontEnumerator::GetFacenames();
>-------------------
my $enum = Wx::FontEnumerator->new;

my @fonts = $enum->GetFaceNames;

>(PPM is broken, so I otherwise need to compile wxPerl myself which is a
>hassle on this slow machine.)
If you explain what is broken, it _may_ be possivle to fix it...

Regards
Mattia

[wxperl-users] Wx::FontEnumerator

[Marcus <li...@wo...>]

How do you call Wx::FontEnumerator?

Would this be correct?
-------------------
use strict;
use Wx qw(:everything);

my @fonts = Wx::FontEnumerator::GetFacenames();
-------------------

Just wondering whether my wxPerl is not up to date, or I got the syntax
wrong.

(PPM is broken, so I otherwise need to compile wxPerl myself which is a
hassle on this slow machine.)

Thanks,

Marcus

Re: [wxperl-users] WxPerl component library

[Jouke V. <jo...@pv...>]

On Tue, Oct 08, 2002 at 01:47:50PM -0600, boo radley wrote:
> hello, all
> 
> 	I thought it might be good for us to start a repository of wxperl 
> components that we've created. I've about a half dozen components that I 
> use for different things all the time, and would like to put them up for 
> the common good. Is there a desire for such a thing?
This is what CPAN is for I think!

-- 
 ---------------------------------------------------------------------- 
| Jouke Visser            | http://jouke.pvoice.org  (personal)        |
|                         | http://www.pvoice.org    (pVoice & pStory) |
| Perl GUI Geek           | http://wxperl.pvoice.org (wxPerl)          |
 ---------------------------------------------------------------------- 

[wxperl-users] WxPerl component library

[boo r. <boo...@at...>]

hello, all

	I thought it might be good for us to start a repository of wxperl 
components that we've created. I've about a half dozen components that I 
use for different things all the time, and would like to put them up for 
the common good. Is there a desire for such a thing?

boo

Re: [wxperl-users] Install problem

[DH <cra...@ya...>]

PPM (the shell) has a wee bug in that sometimes it gets confused like you've seen.

That is why I sometimes have to run
the following program (also available from http://crazyinsomniac.perlmonk.org/perl/ppm/ )

Just download a binary from either http://wxperl.sourceforge.net/download.html
extract it some place, cd to that directory, and run this program.
It's basically what PPM does when it's installing modules

#!/usr/bin/perl -w
use Cwd;
use strict;
use Config;
use ExtUtils::Install;

use ActivePerl::DocTools;
my %current_package;
##########################################################################################
#$current_package{'NAME'} = 'Wx';
print "Enter the package name :";
$current_package{'NAME'} = <STDIN>;
chomp($current_package{'NAME'});
#################################################################################
    my $inst_archlib = $Config{installsitearch};
    my $inst_root = $Config{prefix};
    my $packlist = MM->catfile("$Config{installsitearch}/auto",
        split(/-/, $current_package{'NAME'}), ".packlist");

    # copied from ExtUtils::Install
    my $INST_LIB = MM->catdir(MM->curdir,"blib","lib");
    my $INST_ARCHLIB = MM->catdir(MM->curdir,"blib","arch");
    my $INST_BIN = MM->catdir(MM->curdir,'blib','bin');
    my $INST_SCRIPT = MM->catdir(MM->curdir,'blib','script');
    my $INST_MAN1DIR = MM->catdir(MM->curdir,'blib','man1');
    my $INST_MAN3DIR = MM->catdir(MM->curdir,'blib','man3');
    my $INST_HTMLDIR = MM->catdir(MM->curdir,'blib','html');
    my $INST_HTMLHELPDIR = MM->catdir(MM->curdir,'blib','htmlhelp');

    my $inst_script = $Config{installscript};
    my $inst_man1dir = $Config{installman1dir};
    my $inst_man3dir = $Config{installman3dir};
    my $inst_bin = $Config{installbin};
    my $inst_htmldir = $Config{installhtmldir};
    my $inst_htmlhelpdir = $Config{installhtmlhelpdir};
    my $inst_lib = $Config{installsitelib};

    while (1) {
        my $cwd = getcwd();
        $cwd .= "/" if $cwd =~ /[a-z]:$/i;
        eval {
            ExtUtils::Install::install({
            "read" => $packlist, "write" => $packlist,
            $INST_LIB => $inst_lib, $INST_ARCHLIB => $inst_archlib,
            $INST_BIN => $inst_bin, $INST_SCRIPT => $inst_script,
            $INST_MAN1DIR => $inst_man1dir, $INST_MAN3DIR => $inst_man3dir,
            $INST_HTMLDIR => $inst_htmldir,
            $INST_HTMLHELPDIR => $inst_htmlhelpdir},0,0,0);
        };
        # install might have croaked in another directory
        chdir($cwd);
        # Can't remove some DLLs, but we can rename them and try again.
        if ($@ && $@ =~ /Cannot forceunlink (\S+)/) {
            my $oldname = $1;
            $oldname =~ s/:$//;
            my $newname = $oldname . "." . time();
            unless (rename($oldname, $newname)) {
                return 0;
            }
        }
        # Some other error
        elsif($@) {
            return 0;
        }
        else { last; }
    }

ActivePerl::DocTools::UpdateHTML();
ActivePerl::DocTools::WriteTOC();


--- Johannes Gamperl <in...@de...> wrote:
> Hello List,
> 
> i'm new to wxperl .. so i would try it out, but i got an intall error.
> i use activeperl v5.6.1 on w2k. this is the error-msg.:
> 
> Installing package 'Wx'...
> Error installing package 'Wx': Read a PPD for 'Wx', but it is not
> intended for this build of Perl (MSWin32-x86-multi-thread)
> 
> any ideas what to do?
> 
> thx a lot
> hannes
> 
> 
> 
> 
> -------------------------------------------------------
> This sf.net email is sponsored by:ThinkGeek
> Welcome to geek heaven.
> http://thinkgeek.com/sf
> _______________________________________________
> wxperl-users mailing list
> wxp...@li...
> https://lists.sourceforge.net/lists/listinfo/wxperl-users


__________________________________________________
Do you Yahoo!?
Faith Hill - Exclusive Performances, Videos & More
http://faith.yahoo.com

[wxperl-users] Install problem

[Johannes G. <in...@de...>]

Hello List,

i'm new to wxperl .. so i would try it out, but i got an intall error.
i use activeperl v5.6.1 on w2k. this is the error-msg.:

Installing package 'Wx'...
Error installing package 'Wx': Read a PPD for 'Wx', but it is not
intended for this build of Perl (MSWin32-x86-multi-thread)

any ideas what to do?

thx a lot
hannes

Re: [wxperl-users] wxPerl 0.12 - STC error (CVS 06/10/2002)

[Mattia B. <mb...@ds...>]

>   I got the wxPerl CVS on 06/10/2002, and STC doesn't compile with VC++ 6
>   and wxWindows 2.3.3 on Win32!!!
> 
>   The problem is with the link cmd!
Rule I for bug reports: _post the error message!_
STC compiles and links for me with current wxWindows CVS,
and it did with 2.3.3, too (both MSVC 5 and GCC).

Regards
Mattia