FiveTech Software tech support forums

... Function Main() Local oDlg, oImagem Local cImagem := "..\bitmaps\pngs\2.png" DEFINE DIALOG oDlg SIZE 800, 600 ; STYLE nOr( WS_CHILD, WS_POPUP ) ; COLOR CLR_BLACK, CLR_BLACK TRUEPIXEL SetDlgGradient( { { 0.7, CLR_WHITE, CLR_WHITE }, ; { 0.3, CLR_BLACK, CLR_BLACK }, .F. ...

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..

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

Gracias.

Regards, saludos.

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 ...

Carlos,

Prueba con:

oEdit:WinStyle( ES_READONLY, .F. ) // ó .T. si necesitas volver a aplicarlo

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,

... oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon @ nRow, 0 TITLE oTitle OF oDlg SIZE 1025, 65 NOBORDER ; oTitle:aGrdBack ...

... oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon @ nRow, 0 TITLE oTitle OF oDlg SIZE 1025, 65 NOBORDER ; oTitle:aGrdBack ...

... DIALOG oDlg SIZE nWd , nHt PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, RGB( 245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) @ nRow, 0 TITLE oTitle OF oDlg SIZE 1025, 65 NOBORDER //PIXEL oTitle:aGrdBack ...

... oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon @ nRow, 0 TITLE oTitle OF oDlg SIZE 1025, 65 NOBORDER ; oTitle:aGrdBack ...

A response is given to look at TSwitch control.
A further response is given that the control is incomplete because it doesn't have a prompt ability, nor does it have resource implementation

... :wink: And most of us are developing desktop applications since so many years. Those desktop apps are working excellent and do not need any WLAN nor internet. But I think you are right... the time will come and your visions will succeed... more and more of us will have to learn about those new ...

... might appreciate the convenience and efficiency of Microsoft solutions. I don't know any computer stores that even unpack the devices anymore. Nor do I know any service technicians who would bother to do this work and uninstall things. Regarding Microsoft, I think you need to revise your opinion, ...

... PROMPT "&Three" OF oDlg PIXEL SIZE 50,30 ACTION MsgInfo("Three")           oBtn[2]:nStyle:= nOR(WS_CHILD, WS_VISIBLE)    ACTIVATE DIALOG oDlg CENTEREDRETURN NIL Hi Carlos, Your example works great but if i put this solution (I use pelles ...