Alguien me puede decir ¿cuál es la mejor manera que puedo automáticamente insertar una línea en blanco en la parte superior y la parte inferior de estos recién creado .los archivos rtf, para estas dos piezas separadas de código?
Primera pieza de código (por si el portapapeles contiene texto enriquecido):
try
set richTextfromClipboard to get the clipboard as «class RTF »
on error eStr number eNum
display dialog eStr & " number " & eNum buttons {"OK"} default button 1 with icon caution
return
end try
try
set fileHandle to open for access theRichTextFilepath with write permission
write richTextfromClipboard to fileHandle
close access fileHandle
on error eStr number eNum
display dialog eStr & " number " & eNum buttons {"OK"} default button 1 with title "File I/O Error..." with icon caution
try
close access fileHandle
end try
end try
Segunda pieza de código (por si el portapapeles contiene HTML):
try
do shell script "osascript -e 'try' -e 'get the clipboard as «class HTML»' -e 'end try' | awk '{sub(/«data HTML/, \"3C68746D6C3E\") sub(/»/, \"3C2F68746D6C3E\")} {print}' | xxd -r -p | textutil -convert rtf -stdin -stdout > " & quoted form of theRichTextFilepath
on error eStr number eNum
display dialog eStr & " number " & eNum buttons {"OK"} default button 1 with icon caution
end try
Las líneas en blanco no tiene que ser de un determinado tipo o tamaño de fuente; las líneas en blanco, simplemente debe coincidir con el estilo de los alrededores .archivo rtf (es decir, el estilo de los ricos de texto en el portapapeles).