FiveTech Software tech support forums

Paco,
Mira en Find - Find in files, no lo he probado pero creo que es eso lo que buscas.

Un abrazote.

Hola, si he visto que con CTRL+SHIFT+F buscas en todos los ficheros de una o varias rutas, pero no veo como buscar solo en *.prg por ejemplo
Un abrazooote

pgfdz wrote:Hola, si he visto que con CTRL+SHIFT+F buscas en todos los ficheros de una o varias rutas, pero no veo como buscar solo en *.prg por ejemplo
Un abrazooote

Amigo lo tienes alli mismo



en el boton "..." aparecen la opciones, puedes incluir o excluir tipos de archivos, carpetas, etc

En Find->Find in files utiliza una expresión regular, por ejemplo :

Find : EXPRESION A BUSCAR
Where : e:\getex\source\,*.prg

Puedes incluso reemplazar una expresion por otra (con prudencia eh?)
en Replace :
Si lo dejas vacío y simplemente das al botón Find, solamente busca.

José Luis Sánchez wrote:Hola,

Ya está publicado en http://cincomundos.wordpress.com/2012/12/18/sublime-text-2/

Espero vuestros comentarios y aportaciones.

Saludos,
José Luis

José Luis:
Buen trabajo para empezar.
Algunas sugerencias :
1) Podemos crear un proyecto en GitHub (amigo Rafa TheFull un clable !! )
2) En el proyecto, creamos un pequeño tutorial con el resultado de nuestras investigaciones, así será más facil que alguien mas vaya colaborando.
3) En mi modesta opinión, deberíamos llamar a la sintaxis HARBOUR y no clipper (aunque nos duela a los viejos), ya que podemos ir incorporando las extensiones del lenguaje, que clipper no tenía.

Te dejo un poco de codigo para que lo incorpores en tu proyecto, mas que nada para no ir dispersando antes de que tengamos una solucion colaborativa.
Entre mis primeros descubrimientos, el uso de la egex (?i) que tiene en cuenta las palabras reservadas tanto en mayúsculas como en minúsculas.
Sabrás que hay quien tiene manias de escribir en mayúsculas FOR, WHILE, etc... o las funciones del lenguaje de manera irregular... DbAppend()
Ahi va el código :

Code: Select all  Expand view

{ "name": "Harbour",
  "scopeName": "source.harbour",
  "fileTypes": ["prg","ch"],
  "patterns": [
      {  
         "comment" : "sentencias de control",
         "match" : "(?i)(?:do|case|endcase|otherwise|switch|if|else|endif|while|end|enddo|exit|function|return|for|next)",
         "name": "keyword.control.harbour"
      },
      {  
         "comment" : "funciones",
         "match" : "(?i)(?:AADD|ABS|ACHOICE|ACLONE|ACOPY|ADEL|ADIR|AEVAL|AFIELDS|AFILL|AINS|ALERT|ALIAS|ALLTRIM|ARRAY|ASC|ASCAN|ASIZE|ASORT|AT|ATAIL|BIN2I|BIN2L|BIN2U|BIN2W|BOF|BREAK|BROWSE|CDOW|CHR|CLIPINIT|CMONTH|COL|CTOD|CURDIR|DATE|DAY|DAYS|DBAPPEND|DBCLEARFILTER|DBCLOSEALL|DBCLOSEAREA|DBCOMMIT|DBCOMMITALL|DBCREATE|DBDELETE|DBEDIT|DBEVAL|DBF|DBFILTER|DBGOBOTTOM|DBGOTO|DBGOTOP|DBRECALL|DBRLOCK|DBRLOCKLIST|DBRUNLOCK|DBSEEK|DBSELECTAREA|DBSETDRIVER|DBSETFILTER|DBSKIP|DBSTRUCT|DBUNLOCK|DBUNLOCKALL|DBUSEAREA|DELETED|DESCEND|DEVOUTPICT|DIRCHANGE|DIRREMOVE|DISKSPACE|DOW|DTOC|DTOS|ELAPTIME|EMPTY|EOF|ERRORSYS|EVAL|EXP|FCLOSE|FCOUNT|FCREATE|FERASE|FERROR|FIELDBLOCK|FIELDGET|FIELDNAME|FIELDPOS|FIELDPUT|FIELDWBLOCK|FILE|FLOCK|FOPEN|FOUND|FREAD|FREADSTR|FRENAME|FSEEK|FWRITE|GETENV|HARDCR|HB_ANSITOOEM|HB_DISKSPACE|HB_FEOF|HB_KEYPUT|HB_LANGNAME|HB_LANGSELECT|HB_OEMTOANSI|HB_OSNEWLINE|HB_PVALUE|HB_SetKeyCheck|HB_SetKeyGet|HB_SETKEYSAVE|HB_VALTOSTR|HEADER|I2BIN|INDEXEXT|INDEXKEY|INDEXORD|INKEY|INT|ISAFFIRM|ISALPHA|ISDIGIT|ISDISK|ISLOWER|ISNEGATIVE|ISUPPER|L2BIN|LASTKEY|LASTREC|LEFT|LOG|LOWER|LTRIM|LUPDATE|MAKEDIR|MAX|MAXCOL|MAXROW|MCOL|MEMOTRAN|MEMVARBLOCK|MIN|MOD|MONTH|MROW|dbSkipper|hb_ColorIndex|NATIONMSG|NETERR|NEXTKEY|ORDBAGEXT|ORDBAGNAME|ORDCONDSET|ORDCREATE|ORDDESTROY|ORDFOR|ORDKEY|ORDLISTADD|ORDLISTCLEAR|ORDLISTREBUILD|ORDNAME|ORDNUMBER|ORDSETFOCUS|OS|OUTERR|OUTSTD|PADC|PADL|PADR|PCOUNT|PROCFILE|PROCLINE|PROCNAME|RAT|RDDLIST|RDDNAME|RDDSETDEFAULT|READKEY|READVAR|RECCOUNT|RECNO|RECSIZE|REPLICATE|RIGHT|RLOCK|ROUND|ROW|RTRIM|SECONDS|SECS|SELECT|SET|SETKEY|SETMODE|SETTYPEAHEAD|SPACE|SQRT|STR|STRTRAN|STRZERO|SUBSTR|TBrowseDB|TBROWSENew|TClass|TIME|TONE|TRANSFORM|TRIM|TYPE|U2BIN|UPPER|USED|VAL|VALTYPE|VERSION|W2BIN|WORD|YEAR)",
         "name": "support.function.basic.harbour"
      }
  ],
  "uuid": "abb4076f-47f3-4909-a5b7-72cabff0f8db"
}
 

Daniel Garcia-Gil wrote:

pgfdz wrote:Hola, si he visto que con CTRL+SHIFT+F buscas en todos los ficheros de una o varias rutas, pero no veo como buscar solo en *.prg por ejemplo
Un abrazooote

Amigo lo tienes alli mismo



en el boton "..." aparecen la opciones, puedes incluir o excluir tipos de archivos, carpetas, etc

Ok, gracias "troesma"

Joaquim Ferrer wrote:En Find->Find in files utiliza una expresión regular, por ejemplo :

Find : EXPRESION A BUSCAR
Where : e:\getex\source\,*.prg

Puedes incluso reemplazar una expresion por otra (con prudencia eh?)
en Replace :
Si lo dejas vacío y simplemente das al botón Find, solamente busca.

Gracias

Daniel Garcia-Gil wrote:

Kleyber wrote:Lo que me hace falta en estos editores de codigo es la posibilidad de se tener varias pantallas de un mismo prg. Eso lo hacia el editor BRIEF (solo para DOS) en mis tiempos de Clipper. Nunca encontré algo asi en los editores actuales. Si alguien conoce algun editor que haga esto, indicame por favor.

Saludos,

Si es posible

Fantastico!!!! Gracias!

pgfdz wrote:ALT+SHIFT+1
ALT+SHIFT+2
ALT+SHIFT+3
ALT+SHIFT+4

Para partir la pantalla en 1, 2, 3 o 4 columnas

ALT+SHIFT+8 2 FILAS
ALT+SHIFT+9 3 FILAS

Paco,

Muchisimas gracias por el dato.

Saludos,

Mejoras en la sintaxis

Te dejo correcciones del JSON;
{
“comment” : “sentencias de control”,
“match” : “\\b(do|case|endcase|otherwise|switch|if|else|endif|while|end|enddo|exit|function|return|for|next)\\b”,
“name”: “keyword.control.clipper”
},
{
“comment” : “sentencias de control”,
“match” : “\\b(catch|finally|try|throw)\\b”,
“name”: “keyword.control.clipper”
},
{
“comment” : “declaraciones”,
“match” : “\\b(local|default|field|static|public|static|external|REQUEST)\\b”,
“name”: “storage.type.clipper”
}

Lo que hace \\b es que marca cosas como Local locali=1 , locali lo marca, quedando mal.
He metido la declaracion del try/catch que yo uso en Harbour aunque sea una simulacion a traves del Begin..Sequence.

Saludos y muchas gracias.

Joaquim, ya tienes el proyecto creado con las mejoras en GITHUB.

Ir a https://github.com/rafathefull/clipper para obtenerlo lo último.

A ver si podemos ampliarlo y mejorarlo.

Desde aquí muchas gracias Jose Luis

Yo también lo uso para los proyectos web y es sencillamente brutal.

Seria muy bueno usarlo para [x]Harobour y FW.

Saludos a los viejos rockeros, os veo enchufados!

thefull wrote:Joaquim, ya tienes el proyecto creado con las mejoras en GITHUB.

Ir a https://github.com/rafathefull/clipper para obtenerlo lo último.

A ver si podemos ampliarlo y mejorarlo.

Desde aquí muchas gracias Jose Luis

Co*nio Rafa, que rapido eres !!!
Pues nada, ya está el proyecto en marcha, ahora a crear snippets ... (jajaja chuletillas ?
Veo que te parece bien llamarle Clipper y no Harbour como proponia ... en fin, sin problemas.
Creia que era mejor 'promocionar' entre la comunidad que utiliza ST2 el nombre de harbour, ya que en realidad, la compatibilidad con CA-Clipper ya fue superada, ahora Harbour es otra cosa.
En fin, para gustos...
Creamos una lista de trabajo ? Mas que nada, por no hacer todos los mismo.
Saludos y gracias por el esfuerzo !

manuelcalerosolis wrote:Yo también lo uso para los proyectos web y es sencillamente brutal.

Seria muy bueno usarlo para [x]Harobour y FW.

Saludos a los viejos rockeros, os veo enchufados!

Manuel, mucho gusto en re-encontrarte por aquí.
Y ya ves, seguimos dando guerra !

Un manual básico para quien lo necesite, me fue util en mis comienzos con ST2

http://www.jorgesanchez.net/programacio ... eText2.pdf