[VFP] Que control reemplaza al EditBox

[ZeRoberto]

Con que control puedo reemplazar al EditBox pero que sea multicolumnas osea que salte lineas cuando de enter y no en forma automática.

Saludos

--
btnMyVideo.Click()

[Luis Maria Guayan]

Un control Grid

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

[ZeRoberto]

Es para texto, el Editbox cada vez que se llena el control me salta la linea sin dar enter osea tiene un retorno de carro automático. yo quiero que sea como el NotePad que se siga escribiendo hasta dar enter

Saludos

--
btnMyVideo.Click()

[Analyzer]

Y como qué deseas lograr con eso de no dar enter?...

Para ver de que otra forma se puede resolver..

Saludos!

[ZeRoberto]

Probe con el RitchText Y funciona igual que el EdtiBox

--
btnMyVideo.Click()

[Víctor Hugo Espínola Domínguez]

Hola ZeRoberto

El editbox no tiene retorno de carro automático, es simplemente un efecto visual. Si escribes un texto largo sin pulsar <Enter> en el control lo verás como si estuviera compuesto de varias líneas, pero en realidad es una sola. Puedes probarlo así: click en el edit box, escribe algo largo sin pulsar <Enter>, <Ctrl+A>, <<Ctrl+C> y luego en la ventana de comandos <Ctrl+V>.

Saludos,

[Fernando D. Bozzo]

Hola Roberto, no es necesario que cambies de control, si querés forzar a que no pase de campo hasta pulsar ENTER podés usar SET CONFIRM ON, disponible desde FoxBase

Joder... cuántos años con Fox....  :-)

[ZeRoberto]

Hola Fernando no es eso lo que quiero, sino que conforme vaya escribiendo no se baje a la siguiente linea cuando el texto supera el tamaño del editbox. solo lo haga al presionar enter

NO QUIERO

-------------------- 

    1         2

12345678901234567890

--------------------

ESTO ES UNA PRUEBA D

E CARACTER QUE SOBRE

PASA EL TAMAÑO DEL E

DITBOX 

QUIERO COMO ESTO

-------------------- 

    1         2

12345678901234567890

--------------------

ESTO ES UNA PRUEBA DE CARACTER QUE SOBRE PASA EL TAMAÑO DEL EDITBOX 

ESTA LINEA VA ACA PORQUE PRESIONE ENTER

Saludos

El 4 de mayo de 2013 12:37, Fernando D. Bozzo <fdb...@gmail.com> escribió:

Hola Roberto, no es necesario que cambies de control, si querés forzar a que no pase de campo hasta pulsar ENTER podés usar SET CONFIRM ON, disponible desde FoxBase

Joder... cuántos años con Fox....  :-)

--
btnMyVideo.Click()

[Víctor Hugo Espínola Domínguez]

Hola ZeRoberto

Mira este enlace: http://weblogs.foxite.com/bernardbout/2013/03/02/ease-into-vfp-controls/

No es exactamente lo que quieres, pero quizás se pueda modificar.

Saludos,

Víctor.

[ZeRoberto]

Gracias Victor pero no es lo que busco, probé con el RitchEdit pero también es como el editbox

--
btnMyVideo.Click()

[Víctor Hugo Espínola Domínguez]

Hola ZeRoberto.

Puedes modificar esa clase para que a medida que se vaya escribiendo el control se ensanche dinámicamente.

Insisto en lo que te comenté anteriormente, el cambio de línea dentro del editbox es solamente un efecto visual, dentro del memo asociado el dato es guardado sin retorno de carro.

Saludos,

Víctor.

 

[ultraton500]

Justamente lo que busca Roberto es ese efecto visual, el mismo que se dá en el block de notas de Windows cuando no está tildada la opción  Formato -> Ajuste de línea, o lo mismo que sucede en el editor de código de nuestro vfp: que a medida que vamos escribiendo y se llega al margen derecho de la pantalla la nueva escritura continúa en la misma línea mientras que el resto de lo ya escrito va desapareciendo en el márgen izquierdo.

Saludos,
Javier.

[Daniel Sánchez]

Lo que se me ocurrió que podría hacer un truco para que simule el efecto deseado pones un objeto tipo contenedor y ahí adicione el editbox y lo que hice fue que el editbox dentro del contenedor sea muchísimo más grande al menos de ancho, pero para que funcione adicione en el keypress calcular la posición del selstar y sobre eso de acuerdo a esa posición más o menos logre que se desplace conforme avanzaba el texto dentro del contenedor cambiando el left del editbox, pero oh sorpresa el seltext da la posición no en la línea si no de todo el texto ingresado eso quiere decir que al adicionar el enter la nueva linea no iniciaba en 0 o 1 la posición si no que seguía contabilizando los caracteres ingresados así que esta idea no funciono, que mala suerte pensé que podría haber sido una solución.

Saludos

--
Daniel Sánchez Escobar
Investigación y Desarrollo
Reset Software & Sistemas
Móvil +051-949398047
Trujillo - Perú

[Víctor Hugo Espínola Domínguez]

Hola ZeRoberto

Un truco que puedes probar es combinar DEFINE WINDOW y MODIFY FILE.

La solución más sencilla es en el GOTFOCUS del control edit:

ThisForm.nWidth = This.Width

This.Width = ThisForm.Width - This.Left - 20

This.Refresh()

En el LOSTFOCUS del control edit:

This.Width = ThisForm.nWidth

No es exactamente lo que quieres, pero es lo más parecido y fácil ;-)

Saludos,

Víctor.

[Víctor Hugo Espínola Domínguez]

También puedes usar DEFINE WINDOW con MODIFY MEMO

Saludos,

Víctor.

[ZeRoberto]

Ese es el dilema, no existirá algún activex que haga eso?

--
btnMyVideo.Click()

[ZeRoberto]

En mi pc encontré un activex que es mucho mejor que el RitchText32 del windows, pero no se como se llama el archivo ocx ya que solo me da el nombre de la clase alguna forma de averiguar a que ocx pertenece?

Saludos

--
btnMyVideo.Click()

[Miguel Canchas]

Pasanoslo para averiguar…

 

MK

[Fernando D. Bozzo]

Hola Ricardo:

Aunque luego de releer los posts no me queda del todo claro todavía cómo necesitás que funcione esto, tampoco entiendo porqué necesitás que funcione así. Tengo algunas preguntas, a ver si podés aclararme un poco:

¿Cuál es el caso de uso?
¿Por qué es tan importante que el control se vaya estirando mientras escribe (eso entendí) y no sirve un ancho fijo?
¿Es mucho texto el que se quiere escribir?

Algo importante a tener en cuenta es que cualquier ActiveX que uses puede significarte un dolor de cabeza si hay que instalarlo en todos los equipos, en el caso de que sean muchos usuarios.

Saludos.-

[Analyzer]

Gracias por este tipo de comentarios. Son comentarios que enseñan mucho.

Saludos!

[ZeRoberto]

Osea no quiero que el control se estire sino que no se vea asi

Saludos

El 8 de mayo de 2013 17:49, Fernando D. Bozzo <fdb...@gmail.com> escribió:

--
btnMyVideo.Click()

[Analyzer]

Por fin te entendí desde que enviaste esa figura, pero lo que pides es casi como tener un control que la haga de "Block de notas" con barras de desplazamiento pero insertado en el form.

La ventaja que le veo a algo como eso sería solo para reducir el espacio que ocupa el texto (el control, mas bien) dentro de un form.

Saludos!

[Fernando D. Bozzo]

¿Y si lo hacés con el ancho del formulario no te sirve? No sé, intento simplificar el problema, ya que no veo el beneficio para el usuario.

Me da la sensación de que querés que tenga un slider horizontal como si fuera un grid o un RichText, pero el problema con eso sería que el usuarios dejaría de ver el texo escrito cuando pase el límite del borde derecho...

En fin, sería más útil si contaras un poco más en detalle. En otro post anterior te puse 3 preguntas y no contestaste ninguna. Es un poco difícil ayudarte así :-(


Saludos.-

[Jose Mario]

como lo va a ver si no sirve elelnace

[Robert Martínez]

Imagino que lo que quieres es tener scroll horizontal y vertical. De ser esa tu situación, es fácil de lograr, para eso puedes usar el "Microsoft Forms 2.0 TextBox" este control corresponde al FM20.DLL que creo lo instala el Microsoft Office. Para ponerlo en tu formulario en tiempo de diseño, agrega un OleControl y selecciónalo de la ventana de Objeto.



Luego cambia las siguientes propiedades:
scrollbars=3
multiline=.T.
enterkeybehavior=.T.
wordwrap=.F.