Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Creating Headers and text above images in RTF format

by ikkon (Monk)
on Nov 05, 2007 at 15:48 UTC ( #649045=perlquestion: print w/ replies, xml ) Need Help??
ikkon has asked for the wisdom of the Perl Monks concerning the following question:

I am using RTF::Writer to create a report

the mock-up has a images on the first page with text written above it, this text is dynamic so I have to duplicate it.

I know how to set a image but have yet figure out how to add text on top of the image.

my other problem is I need to make a header for every page but the header only consists of a image.

I can't find anytthing on making headers

does anyone know how to accomplish these or any documentation that explains this??

UPDATE:

I think I figured out the header problem

this is what I have to for text above the image
$fh->paragraph( \'\qc', 'Some Text', $fh->image( 'filename' => "image.png", "wgoal" => inches(4), "hgoal" = +> inches(3)) );

Comment on Creating Headers and text above images in RTF format
Download Code
Re: Creating Headers and text above images in RTF format
by gamache (Friar) on Nov 05, 2007 at 16:01 UTC
    We'll be able to answer you better if you provide some snippets of the code you've been trying...
      Honestly I wasn't sure where to begin, I added regular text but knew thats not what I wanted I need to send the image to the background but couldn't find any syntax that showed doing this.

      I updated with some code above
Re: Creating Headers and text above images in RTF format
by ikkon (Monk) on Nov 05, 2007 at 20:53 UTC
    ok I got close, I tried this code that gives me part of the image and the text on the other side of the page
    $fh->print(\'\titlepg'); $fh->paragraph( \'\pard\pvmrg\phmrg\posxc\posyc\qc', + 'Company Name', ); $fh->paragraph( \'\background', $fh->image( 'filename' => "images/CoreIO_front.png", " +wgoal" => inches(8.5), "hgoal" => inches(10),), );
    this will give me text on the bottom of the image
    $fh->paragraph( \'\pard\pvmrg\phmrg\posxc\posyc\qc', $fh->image( 'filename' => "images/CoreIO_front.png", " +wgoal" => inches(8.5), "hgoal" => inches(10),), 'Company Name', );
    but still can get it to go on top of the image

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://649045]
Approved by ikegami
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (11)
As of 2014-11-27 11:53 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (184 votes), past polls