Funciones Swiss File Knife

Funciones para el uso de mandatos de Swiss File Knife, Sfk, que pueden encontrarse en la direccion http://stahlworks.com/dev/swiss-file-knife.html.

Las funciones de esta página están ordenadas de forma alfabética por las diferentes gramáticas del lenguaje Tol ( Text, Set, Serie, Anything, Code, Date, Real,...) y, dentro de cada gramática, por el nombre de la función. Pueden encontrarse 2 o más funciones con idéntico nombre, pero con distintas maneras de programarse o con diferentes comentarios en diferentes idiomas, estas funciones aparecerán unas a continuación de las otras.

//////////////////////////////////////////////////////////////////////////////
Real SfkWriteClipboard(Text outTxt) // Texto a inyectar en el clipboard
//////////////////////////////////////////////////////////////////////////////
{
  Text WriteFile(SfkTmp, outTxt); // Guarda el texto en el fichero temporal
  Real runSfk = System(SfkDir+"File2Clipboard.bat " + SfkTmp); // Ejecuta Sfk
  Real FileDelete(SfkTmp); // Borra el fichero temporal
  runSfk
};
//////////////////////////////////////////////////////////////////////////////
PutDescription(
"Guarda outTxt en el clipboard y retorna true si lo consigue y false si no.",
SfkReadClipboard);
//////////////////////////////////////////////////////////////////////////////

//////////////////////////////////////////////////////////////////////////////
Text SfkReadClipboard(Text errMsg) // Texto a retornar si hay error
//////////////////////////////////////////////////////////////////////////////
{ 
  Real runSfk = System(SfkDir+"Clipboard2File.bat " + SfkTmp); // Ejecuta Sfk
  Text inpTxt = If(! runSfk, errMsg, ReadFile(SfkTmp)); // Lee el texto
  Real FileDelete(SfkTmp); // Borra el fichero temporal
  inpTxt
};
//////////////////////////////////////////////////////////////////////////////
PutDescription(
"Retorna el texto que haya en el clipboard en caso de error retorna errMsg.",
SfkReadClipboard);
//////////////////////////////////////////////////////////////////////////////