No that doesn work I tried various ways this was the latest
my $tableVal2 = [2500,1900,1200, 1400];
my @tableData2 = (
[[\'\cb3', 'this'], "bnlut", 'jhsdfhjsa', 'thing'],
["that", "this", 'kjhsadfh', 'ben'],
["me", "none", 'slhdfjhsf', 'prat'],
);
&table($tableVal2, @tableData2); ## calls the table function
which uses the array for values
sub table(){
my($localVal, @localData) = @_;
my $decl = RTF::Writer::TableRowDecl->new('widths' =>
$localVal );
$fh->row($decl, @$_) for @localData;
}
-----Original Message-----
From: Todd Beverly [mailto:[EMAIL PROTECTED]
Sent: Thursday, March 22, 2007 11:36 AM
To: Ben Eagle
Cc: [email protected]
Subject: Re: RTF Tables
Ben Eagle wrote:
> Not quite what I ment, My apologies,
>
> I know how to make a color table, but I am making a actual table in
the
> rtf document, in which I need one cell of that table to be colored, I
> know its possible but I can't figure out exactly how to do that using
> rtf code od RTF::Writer, either or.
>
>
>
There was another section at the bottom of my note: \cbN, where N is the
corresponding number from the color table, does that work?
> and then using
> \cfN -- select foreground color #N (from color table)
> \cbN -- select background color #N (from color table)
>
>
>
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
