I am writting the Tcl interface to HARU Free PDF Library.
It is not well documented and tested yet.
But I finished to write code at first glance.
If you are interested in it, please test it.
I am happy if you send bugs or any suggestions to me.
** Features
1. Generating PDF files with lines, text, images.
2. Outline, text annotation, link annotation.
3. Compressing document with deflate-decode.
4. Embedding PNG, Jpeg images.
5. Embedding Type1 font and TrueType font.
6. Creating encrypted PDF files.
7. Using various character set (ISO8859-1~16, MSCP1250~8, KOI-8R).
8. Supporting CJK fonts and encodings.
** License
BSD
** Url
http://reddog.s35.xrea.com/wiki/tclhpdf.html
** Haru Free PDF Library
http://libharu.sourceforge.net/
Regards
Ohtsuka Yoshio wrote:
> Hello, c.l.t,
>
> I am writting the Tcl interface to HARU Free PDF Library.
> It is not well documented and tested yet.
> But I finished to write code at first glance.
> If you are interested in it, please test it.
> I am happy if you send bugs or any suggestions to me.
Wow! Very nice and quick results running the demo's
on Windows XP with supplied binaries. This is obviously
a low level interface that gives wide access to PDF
capabilities. I think it will be very useful to many
people who need to package application output in a
highly portable way.
Many thanks for good work shared!
Roy
Sorry, this was a bug of demo script.
Here is a patch for the bug.
--- demo/image_demo.tcl ( 1)
+++ demo/image_demo.tcl ( )
@@ -109,8 +109,8 @@
# Skewing image.
set angle1 10
set angle2 20
- set rad1 [expr {$angle1 / 180 * 3.141592}]
- set rad2 [expr {$angle2 / 180 * 3.141592}]
+ set rad1 [expr {$angle1 / 180.0 * 3.141592}]
+ set rad2 [expr {$angle2 / 180.0 * 3.141592}]
$page gSave
@@ -128,7 +128,7 @@
# Rotating image
set angle 30 ;# rotation of 30 degrees.
- set rad [expr {$angle / 180 * 3.141592}];# Calcurate the radian
value.
+ set rad [expr {$angle / 180.0 * 3.141592}];# Calcurate the radian
value.
$page gSave