Re: How to automate copying from clipboard to xywrite with ANSI to ASCII conversion

[Manuel Castelao castelao@xxxxxxxx]

Kari:
As far as I know, U2 ANSI2xy performs conversion from ANSI to XyWrite
format (Xy2ANSI, the opposite). Also is possible to use Holmgren's CLIP
to capture the clipboard content. Maybe I am disregarding something in
your message.

Manuel Castelao

Kari Eveli wrote:
> A recipe for capturing ANSI content clips and converting them to ASCII for easy CALLING into
> XyWrite. I use this to get browser content into Virtual PC XyWrite for further processing. By
> pressing F1 in Firefox the selection is captured, the contents of the clipboard are written to disk
> to a temp file (Clip0000.TMP), this is converted and formatted by the Harbour program, appended to
> the Ascii INPUT.TXB file in the Virtual PC Share folder C:\VPCSHARE, to be CALLED later by a single
> keystroke into XyWrite. When I am done collecting clips, I press F2 to go to the Virtual PC session
> and I land directly in XyWrite if it is the topmost window, but, of course, this works equally well
> without Virtual PC, and call the resulting INPUT.TXB file. The clip collecting is instantaneous and
> hidden, courtesy of the "Run, %comspec% [...] min" line.
>
> Main ingredients:
> *************
> Dave Navarro's Clip.exe (difficult to find on the Net, downloadable from: http://www.lexitec.fi/xywrite/clip.zip)
> Autohotkey (http://www.autohotkey.com/)
> Harbour xBase compiler (http://harbour-project.sourceforge.net/)
> Xywrite
> Firefox (or some other modern browser or program you want )
> Virtual PC (optional)
>
> Autohotkey script
> *************
> ; F1 key within Firefox
> $F1::
> IfWinActive, ahk_class MozillaWindowClass
> {
> Send, {CTRLDOWN}c{CTRLUP}
> Run, %comspec% /c c:\util\clip C:\VPCSHARE\Clip0000.TMP /R && c:\util\clipconv.exe && type C:\VPCSHARE\Clip0000.TMP>>C:\VPCSHARE\INPUT.TXB && DEL C:\VPCSHARE\Clip0000.TMP, , min
> }
> else
> Send, {F1}
> return
> ; F2 Key
> F2::WinActivate, DOS - Microsoft Virtual PC 2007
>
> Harbour program
> *************
> proc main
> * read ANSI file
> txa_str=memoread("C:\VPCSHARE\Clip0000.TMP")
> * convert to ASCII
> txb_str=HB_ANSITOOEM(txa_str)
> * line ending
> crlf _pair=chr(13)+chr(10)
> * a line to introduce each separate clip, a TAB chr precedes 'Firefox', visual formatting for Xy
> firefox="«MDDD» Firefox"+crlf _pair+"«MDNM»"
> * write the result to disk
> memowrit("C:\VPCSHARE\Clip0000.TMP",firefox+txb_str+crlf _pair)
> return
>
> Best regards,
>
> Kari Eveli
> LEXITEC Book Publishing (Finland)
> lexitec@xxxxxxxx
>
> *** Lexitec Online ***
> Lexitec in English: http://www.lexitec.fi/english.html
> Home page in Finnish: http://www.lexitec.fi/