X-Git-Url: http://git.asbjorn.biz/?p=swftools.git;a=blobdiff_plain;f=spec%2Flinks.py;fp=spec%2Flinks.py;h=39e44cd00645fafd857d40cae6d5ca56908f3b92;hp=0000000000000000000000000000000000000000;hb=8ab521b2e55858851de2ee5bd00b50792529c444;hpb=3d7393729761993b7d7e1d8db602560d339adac2

diff --git a/spec/links.py b/spec/links.py
new file mode 100644
index 0000000..39e44cd
--- /dev/null
+++ b/spec/links.py
@@ -0,0 +1,26 @@
+from sys import * 
+from pdflib_py import * 
+p = PDF_new() 
+PDF_open_file(p, "links.pdf")
+
+PDF_set_parameter(p, "usercoordinates", "true")
+PDF_set_info(p, "Creator", "links.py")
+
+width=200
+height=200
+
+PDF_begin_page(p, width, height)
+def draw_link(x1,y1,x2,y2,url):
+    action = PDF_create_action(p, "URI", "url="+url);
+    optlist = "action={activate "+str(action)+"} linewidth=5"
+    PDF_create_annotation(p, x1,y1,x2,y2, "Link", optlist);
+draw_link(0, 0, 100, 100, "http://www.swftools.org")
+draw_link(0, 100, 100, 200, "http://www.quiss.org")
+PDF_end_page(p)
+
+PDF_begin_page(p, width, height)
+draw_link(0, 0, 100, 100, "http://www.pdf2swf.org")
+PDF_end_page(p)
+
+PDF_close(p)
+PDF_delete(p);