realbasic-nug
[Top] [All Lists]

Re: printing htmlviewer in MacOSX

To: REALbasic NUG <realbasic-nug@lists.realsoftware.com>
Subject: Re: printing htmlviewer in MacOSX
From: Norman Palardy <npalardy@great-white-software.com>
Date: Sun, 31 May 2009 09:23:50 -0600
Authentication-results: mx.google.com; spf=neutral (google.com: 74.124.194.228 is neither permitted nor denied by best guess record for domain of realbasic-nug-bounces@lists.realsoftware.com) smtp.mail=realbasic-nug-bounces@lists.realsoftware.com
Delivered-to: listarchive@realsoftware.com
In-reply-to: <45a1b53e0905301613t4c6ae09dtcdc0c23e775a922c@mail.gmail.com>
References: <45a1b53e0905301613t4c6ae09dtcdc0c23e775a922c@mail.gmail.com>
Reply-to: REALbasic NUG <realbasic-nug@lists.realsoftware.com>
Sender: realbasic-nug-bounces@lists.realsoftware.com

On 30-May-09, at 5:13 PM, Wade Maxfield wrote:

I am also trying to print the htmlviewer content in realbasic. 2009R2

I have this code, thanks to Shawn Giese, software.sirkevi.com, and it
mostly works:

dim filestring as string
dim f, f1,f2 as folderitem
dim execString as String

f = GetFolderItem("PointerToHTMLFile.html")
 f1 = SpecialFolder.Documents
   filestring = f1.ShellPath+"/cwoutput.pdf"

   if f <> nil and f1 <> nil then
     execString = "/System/Library/Printers/Libraries/convert -f "+
f.ShellPath +" -o " + filestring
     s.execute execString
 // added hoping would fix launch
     execString = "chmod a+rwx "+filestring
     s.Execute execString
//
     f2 = GetFolderItem(filestring)
     if f2 = Nil then Return
     f2.launch
   end if


What if for f2 you do
     f2 = GetFolderItem(filestring, FolderItem.PathTypeSell)

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>


<Prev in Thread] Current Thread [Next in Thread>