FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour UNA de Checkbox
Posts: 479
Joined: Fri Feb 16, 2007 10:29 AM
UNA de Checkbox
Posted: Thu Sep 03, 2009 11:40 AM

Compañeros:

Al abrir la ficha de un cliente, necesito abrirla en modo "VER". Para ello, en los GET's hago:

redefine get o[1] var pnombre id 4012 of ocama1 WHEN iif(nuevo=3,(.f.,o[1]:lDisColors:=.f.),.t.) && Si nuevo toma valor 3 significa que está en modo VER

Esto funciona perfectamente.... pero no funciona con los CHECKBOX, aun utilizando DISABLE el ratón permite clikear en el "cajetín"

¿ Como lo haceis vosotros ?
Mil gracias.
LORENZO

Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Re: UNA de Checkbox
Posted: Thu Sep 03, 2009 03:44 PM

Así es como lo hago yo y funciona perfectamente:

REDEFINE CHECKBOX oChe1 ID 450 OF oDlg WHEN cNuevo = 3

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 479
Joined: Fri Feb 16, 2007 10:29 AM
Re: UNA de Checkbox
Posted: Fri Sep 04, 2009 12:14 PM
Estimado manuel

Lo que me indicas es precisamente lo que hacía yo. Es decir:

Code (fw): Select all Collapse
  redefine checkbox o[10] var pltips id 4028 of ocama1 when iif(nuevo=.3.,.f.,.t.)


Pretendo que en modo "VER" el usuario solo vea y no pueda modificar ni alterar ninguna ficha... Ahora mismo, a pesar de que la variable NUEVO toma el valor 3, el usuario puede clikear en el checkbox y alterarlo aunque no se graba en el DBF.

¿ Como puedo evitar eso ?
Utilizo FWH 8.06
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: UNA de Checkbox
Posted: Fri Sep 04, 2009 12:54 PM
Loren, como dice Manuel, trabaja perfectamente:

redefine checkbox o[10] var pltips id 4028 of ocama1 when nuevo=3

Saludos.
Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql

Continue the discussion