cnavarro wrote:Pablo, lo has probado?
Antonio Linares wrote:Cristobal,
Yo he estado este fin de semana trabajando en la versión de fivedit.prg (antes sciedit.prg) de FWH para ver si lo completo y asi podemos ofrecer algo terminado y funcionando
Una vez lo termine, revisaré todas tus mejoras y novedades y a ver en que puedo ayudar
Cristobal,
Se ve muy bien! 
La prueba de fuego es poder olvidarnos de nuestro editor habitual y trabajar comodamente desde el nuevo 
Me gusta !
Las teclas CTRL+O ( Open )
CTRL + S ( Save )
Son clásicas en los editores de textos.
saludos.
por ejemplo MultiEdit,
cuando escribes, (, ", [ {
se cierran automáticamente,
y si escribes,
IF, case, while, etc.
serian unas excelentes mejoras !!
nos olvidaríamos de mucho editores que ya no tienen soporte.
saludos.
Cesar,
Yo estoy terminando de completar el ejemplo FWH\samples\sciedit.prg (renombrado ahora como Fivedit.prg) y no he querido publicarlo aún, pues quiero que la primera versión que se ofrezca gratuitamente y con todo el código fuente incluido, tenga un nivel de funcionalidad que permita realmente ya trabajar con él. De ahí que no quiero poner en circulación versiones incompletas.
De todas formas, si alguien quiere probar lo que ya está hecho y ver como está quedando solo tiene que decirlo 
Cesar, gracias
Y respecto a tus comentarios, son detalles que tendre en cuenta, espero que haya muchas mas peticiones
Cristobal,
se ve de cine. Muchas gracias por compartir.
Antonio, no tienes más que enviarlo y lo probaré.
Muchas gracias a ambos.
Un abrazo,
El repositorio está abierto
https://bitbucket.org/navarro_cristobal/fivedit
Ir a la seccion de descargas ( ahi está todo lo necesario para probarlo ) o descargar el repositorio entero (aunque no es necesario, ya que aun no incluye codigo fuente)
Agradeceria vuestros comentarios
mastintin wrote:Cristobal , he implementado lo del zoom en sciedit de fivemac, pero tu codigo de zoom no me funcionaba adecuadamente y lo he repensado ....
el codigo en la clase :
METHOD SetZoom( nZ ) CLASS TScintilla Local nZoomFactor := ::SendEdit( SCI_GETZOOM, 0, 0 ) DEFAULT nZ := 0 if nZ > -11 .and. nZ < 21 ::SendEdit( SCI_SETZOOM, nZ, 0 ) endif nZoomFactor := ::SendEdit( SCI_GETZOOM, 0, 0 ) Return nZoomFactor
He colocado un boton Flat con el prompt con el porcentaje , al pulsarlo asigno 0 al zoom y coloco el prompt adecuadamente.
. el slider lo he limitado para que coja valores desde -9 a 20
He calculado el porcentaje con ( nValorSlider+10 ) *10 siendo -9 el 10% o el 100% y 20 el 300%
el codigo del editor. Ojo es codigo fivemac pero adaptable a fwh faclimente ...
@ 2, 210 BUTTON oSayZoom PROMPT "Zoom : 100%" OF oWnd SIZE 110, 16 ; ACTION oSayZoom:setText("Zoom : "+ alltrim(str( ( ( oEditor:setZoom( 0 )+10)*10 ) ) )+ "%" ) oSayZoom:SetBezelStyle( 13 ) @ 1, 324 SLIDER oSlide SIZE 100,18 OF oWnd oSlide:SetMinMaxValue( -9, 20 ) oSlide:bChange := {|| oSayZoom:setText("Zoom : "+ alltrim(str( ( ( oEditor:setZoom( oSlide:GetValue() )+10)*10 ) ) )+ "%" ) }
cnavarro wrote:El repositorio está abierto
https://bitbucket.org/navarro_cristobal/fivedit
Ir a la seccion de descargas ( ahi está todo lo necesario para probarlo ) o descargar el repositorio entero (aunque no es necesario, ya que aun no incluye codigo fuente)
Agradeceria vuestros comentarios
// Uso de la funcion
if( <cond>, <Accion/Func .T.>, <Accion/Func .F.> )
// Si funciona bien con
iif(<cond>, <Accion/Func .T.>, <Accion/Func .F.> )if < cond >
return < uValor >
endifNi idea
Voy a verlo en Windows 7, yo uso Windows 8.1