Loading ...
Sorry, an error occurred while loading the content.

[Clip] Notetab. Clip. Pepa4

Expand Messages
  • Manuel
    ¡Olé tu pepa! :) Hi¡ my clipfriends. I think is very practice to find and select text bewteen two words. Sorry for the coments in spanish, but I think we
    Message 1 of 1 , Jan 29, 2000
    • 0 Attachment
      ¡Olé tu pepa! :)

      Hi¡ my clipfriends. I think is very practice to find and select text
      bewteen two words. Sorry for the coments in spanish, but I think we
      know OLE muuuuu.. toro bull :)

      ---
      pepa4
      ;Creado el sab 29'ene-00 por manuel123@...
      ;Nos pregunta la palabra o palabras inicial y final y
      ;nos selecciona el texto
      ;HEMOS DE COLOCAR EL CURSOR AL INICIO DEL DOCUMENTO
      ;SI DESEAMOS EMPEZAR DESDE EL INICIO
      ;Nos pregunta la/s palabra/s, da igual mayús. que minúsc.
      ^!Set %Fword%=^?{primera palabra}; %Lword%=^?{Ultima palabra}
      ;Busca la primera palabra
      ^!Find ^%Fword% IS
      ;Si no existe la primera sale del clip
      ^!IfError End
      ;Activa el documento actual
      ^!FocusDoc
      ;Selecciona hasta el final
      ^!Jump Select_End
      ;Coge el número de fila y columna para Start
      ^!Set %Start%=^$GetRow$:^$GetCol$
      ;Busca la seugunda palabra
      ^!Find ^%Lword% IS
      ;Si no existe sale del clip
      ^!IfError End
      ;Salta a la 1a palabra
      ^!Jump Select_Start
      ;Asigna a End fila y columna
      ^!Set %End%=^$GetRow$:^$GetCol$
      ;Selecciona desde Start (1a palabra) hasta End (ultima)
      ^!SetCursor ^%Start%
      ^!SelectTo ^%End%

      ;TEXTO PARA PROBAR
      ;Ley nº 1: "todo lo que se afirme en Sociología es discutible;
      ;y su valor es relativo... cuando no francamente perjudicial".
      ;Ley nº 2: "la diferencia entre un sociólogo y el "tonto del
      ;pueblo" es real... aunque no siempre sea evidente".
      ---
      ----
      Manuel P. Herrera Spain. manuel123@...
      http://members.xoom.com/aula123/solotxt/ (textos electrónicos)
      http://members.xoom.com/aula123 (cursos por correo)
    Your message has been successfully submitted and would be delivered to recipients shortly.