[prev in list] [next in list] [prev in thread] [next in thread]
List: kde-perl
Subject: Re: [Kde-perl] Perl-Qt4?
From: "Agbaria, Rasheed" <rasheed.agbaria () intel ! com>
Date: 2006-05-31 14:00:58
Message-ID: 3F7160719EE8BB4583803E15D600E2B6A7350B () hasmsx414 ! ger ! corp ! intel ! com
[Download RAW message or body]
There is already reported WA,
Define your own table :
package MyTable;
use strict;
use Qt;
use Qt::isa qw(Qt::Table);
sub NEW {
shift->SUPER::NEW(@_);
}
sub Qt::Table::takeItem {
}
1;
===============================
Inside your code use MyTable instead of table:
package main;
use MyTable;
use strict;
use Qt;
my $a = Qt::Application(\@ARGV);
my $table = MyTable();
$table->setNumRows( int(1) );
$table->setNumCols( int(1) );
$table->setText(0,0,'Hello');
$a->setMainWidget($table);
$table->show;
# Uncomment out either of the next to lines to reproduce the problem
$table->setNumRows(0);
#$table->removeRow(0);
exit $a->exec;
this code worked fine.
-----Original Message-----
From: Joe Claborn [mailto:joe@claborn.net]
Sent: Wednesday, May 31, 2006 4:24 PM
To: kde-perl@kde.org
Subject: Re: [Kde-perl] Perl-Qt4?
Ole,
Thanks for the reply. I think the problem is more fundamental than your
solution suggests. Here is the code that crashes.
use strict;
use Qt;
my $a = Qt::Application(\@ARGV);
my $table = Qt::Table();
$table->setNumRows( int(1) );
$table->setNumCols( int(1) );
$table->setText(0,0,'Hello');
$a->setMainWidget($table);
$table->show;
# Uncomment out either of the next to lines to reproduce the problem
$table->setNumRows(0);
#$table->removeRow(0);
exit $a->exec;
gives
*** glibc detected *** double free or corruption (fasttop): 0x085b1c10
***
Aborted
So if I can not add text to a table and then reduce the size of the
table, I'm
not show that it is usable.
Thanks again,
Joe
On Wednesday 31 May 2006 12:27 am, Ole Christensen wrote:
> Joe,
>
> sorry for responding late.
>
> Your problem can probably be solved by holding references to all table
> items in a "shadow table". I once used that approach for some other
issue
> with table items. Works without any problem for me. Sorry, I am in a
hurry.
> So, very brief:
>
> Put a copy (the reference) of each item you create in the Qt table
into a
> raw Perl table (array of refs to arrays). When you have deleted the
item,
> you can finally remove the item's copy.
>
> Let me know, if this is too short to understand.
>
> Cheers,
> Ole.
>
> Joe Claborn wrote:
> > On Tuesday 30 May 2006 4:30 pm,
> >
> >> You;re not getting the point, I've over 20,000 lines of code
written in
> >> Perl-Qt for PhoeNUX's GUI tools and DO NOT want to port to yet
another
> >> language. Please Ashley, say that there is a port planned :)
> >
> > We too have a substantial number of lines written in Perl-Qt. And
as we
> > have not been able to solve the setNumRows(0) crashes, I'm looking
at
> > Ruby or C++. I like what I've read about Ruby, but I worried about
> > getting into another situation where I'm not writting in the 'base'
> > language of the tool. If we port to Ruby, and then in a couple of
years
> > Ruby-Qt fades away as it appears that Perl-Qt is, then I'm going to
wish
> > I'd ported to C++.
> >
> > Any ideas? Is there a way to keep Perl-Qt alive?
--
Joe Claborn
joe@claborn.net
254-829-2448
_______________________________________________
Kde-perl mailing list
Kde-perl@kde.org
https://mail.kde.org/mailman/listinfo/kde-perl
_______________________________________________
Kde-perl mailing list
Kde-perl@kde.org
https://mail.kde.org/mailman/listinfo/kde-perl
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic