Hola a todos
Tengo que escribir en mi programa 4 veces la misma rutina,
¿me podrian decir si desde un .PRG se pueden acceder y
modificar las propiedades de los objetos.?
................
SET DELETED OFF
CALCULATE CNT(), SUM(IIF(DELETED(),1,0)) TO _cantidad, _borrados
SET DELETED ON
IF _cantidad <> 1
IF _cantidad = 0
ThisForm.SetAll( "Enabled", .F., "CommandButton")
ThisForm.bAgregar.Enabled = .T.
ThisForm.bSalir.Enabled = .T.
GO TOP
ELSE
SEEK configura.gorecno
ENDIF
ELSE
ThisForm.bBuscar.Enabled = .F.
GO TOP
ENDIF
IF _borrados = 0
ThisForm.bRecupera.Enabled = .F.
ENDIF
ThisForm.LblAyuda.Visible = .F.
ThisForm.LbAyuda3.Visible = .F.
.............
Si dije algo descabellado perdón, si es factible ¿me podrían
dar algún ejemplo?.-
Saludos.
Daniel
