Search found 419 matches: readonly

Return to advanced search

Re: Control EDIT y readonly.

Buen día. Carlos, ¿tienes algún ejemplo para probar?

Gracias.

Regards, saludos.
by karinha
Thu Mar 28, 2024 12:28 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Control EDIT y readonly.
Replies: 5
Views: 128

Re: Control EDIT y readonly.

... el cursor actualizo unos GET (hay más que columnas que tiene el Xbrowse) que le permiten editar el registro o no. Normalmente estos GET los tengo :Readonly := .T., y cuando el usuario autorizado pincha en un Button los hago :Readonly := .F., para que se puedan editar. Así un usuario NO autorizado ...
by FiveWiDi
Thu Mar 28, 2024 7:10 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Control EDIT y readonly.
Replies: 5
Views: 128

Re: Control EDIT y readonly.

Muchas gracias Armando, Pero no funciona, tiene el mismo efecto que realizar un Disable(), el SCROLL queda inhabilitado y no permite recorrer el contenido del control. A ver si a alguien más se le ocurre algo. Saludos, Amigo: Prueba con una variable lógica que tu pongas a (.T.) o (.F.) según el cas...
by JoseAlvarez
Tue Mar 26, 2024 10:43 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Control EDIT y readonly.
Replies: 5
Views: 128

Re: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )

You can use the above code to Toggle ReadOnly status during runtime. This code is tested.

From the next version, we have provided DATA lReadOnly. We can toggle this at runtime with oEdit:lReadOnly := .T. or .F..
by nageswaragunupudi
Tue Mar 26, 2024 4:43 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )
Replies: 5
Views: 130

Re: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )

Code: Select all  Expand view

#define EM_SETREADONLY          0x00CF

//
//

     If( oEdit:WinStyle( ES_READONLY ), oEdit:SendMsg( EM_SETREADONLY, 0 ), ;
         oEdit:SendMsg( EM_SETREADONLY, 1 ) ) }
 
by nageswaragunupudi
Mon Mar 25, 2024 5:21 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )
Replies: 5
Views: 130

Re: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )

Carlos, ¿es posible publicar un ejemplo completo para probar, por favor?

Gracias.

Regards, saludos.
by karinha
Mon Mar 25, 2024 2:37 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )
Replies: 5
Views: 130

Re: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )

Carlos, Prueba con: oEdit:WinStyle( ES_READONLY, .F. ) // ó .T. si necesitas volver a aplicarlo Gracias Antonio, Pero no ha funcionado, permitía editar el texto tanto con .F. como con .T.; le he aplicado: oEdit:WinStyle( 2048 /* ES_READONLY */ , .F. ) 2048 lo he encontrado en winapi.ch A ver si se ...
by FiveWiDi
Mon Mar 25, 2024 1:57 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )
Replies: 5
Views: 130

Re: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )

Carlos,

Prueba con:

oEdit:WinStyle( ES_READONLY, .F. ) // ó .T. si necesitas volver a aplicarlo
by Antonio Linares
Mon Mar 25, 2024 11:26 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )
Replies: 5
Views: 130

Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )

Hola a todos,

Veo que en la lógica del control TEDIT está este código:

::nStyle = nOr( ::nStyle, ES_READONLY )

¿Cómo se puede revertir este código en tiempo de ejecución y si es necesario volverlo a aplicar?

Muchas gracias,
by FiveWiDi
Mon Mar 25, 2024 10:50 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Como revertir ::nStyle = nOr( ::nStyle, ES_READONLY )
Replies: 5
Views: 130

Re: Control EDIT y readonly.

Muchas gracias Armando, Pero no funciona, tiene el mismo efecto que realizar un Disable(), el SCROLL queda inhabilitado y no permite recorrer el contenido del control. A ver si a alguien más se le ocurre algo. Saludos, Amigo: Prueba con una variable lógica que tu pongas a (.T.) o (.F.) según el caso...
by FiveWiDi
Mon Mar 25, 2024 10:47 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Control EDIT y readonly.
Replies: 5
Views: 128

Re: Control EDIT y readonly.

Amigo: Prueba con una variable lógica que tu pongas a (.T.) o (.F.) según el caso                IF LoQuieroActivo                    lActivo := (.T.)              &nb...
by Armando
Mon Mar 25, 2024 2:11 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: Control EDIT y readonly.
Replies: 5
Views: 128

Control EDIT y readonly.

Hola a todos, Estoy usando un control EDIT y necesito poder bloquear su edición y según el caso permitir su edición. ¿Cómo lo hago? La Data lReadonly veo que no existe en este control para modificarla en tiempo de ejecución. Si que puedo deshabilitar el control con Disable(), pero entonces el scroll...
by FiveWiDi
Sun Mar 24, 2024 11:13 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Control EDIT y readonly.
Replies: 5
Views: 128

Re: Question about performance RowSet

... than the other libs. If we look back in the forums, we posted speed comparison with other libraries a few years back. When a RowSet is opened for ReadOnly, again the initial reading is faster. oRs := oCn:RowSet( cSql, [aParams], [lReadOnly] ) Execute aData := oCn:Execute( ...
by Eroni
Wed Mar 20, 2024 1:35 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Question about performance RowSet
Replies: 19
Views: 466

Re: Question about performance RowSet

... than the other libs. If we look back in the forums, we posted speed comparison with other libraries a few years back. When a RowSet is opened for ReadOnly, again the initial reading is faster. oRs := oCn:RowSet( cSql, [aParams], [lReadOnly] ) Execute aData := oCn:Execute( ...
by nageswaragunupudi
Sat Mar 16, 2024 10:20 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Question about performance RowSet
Replies: 19
Views: 466

Re: Create a Panel width a text

hi Silvio, As i told you i prefer use Say and not get i have use GET while i had Problem with FW_SayText() and (extra) PANEL :!: GET use MEMO READONLY NO SCROLL but you can use SAY or RTF too --- when Edit Item and copy / paste those 2 Lines, save 4 x Lines, it still display 2 Lines but using ...
by Silvio.Falconi
Mon Feb 26, 2024 8:14 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: Create a Panel width a text
Replies: 29
Views: 2904
Next

Return to advanced search