Page 1 of 1
Efecto en GET deshabilitado
Posted: Wed Oct 12, 2005 9:00 pm
by Alfredo Arteaga
Finalmente he llevado mis aplicaciones a 32 bits con FWH y Harbour, en cuanto se superen las pruebas finales se las muestro y si les agrada algo pos nomas me dicen y listo.
Bueno resulta que en 16 bits los GET deshabilitados podían verse normales si se les indicaba la característica multilínea. En 32 existe algún truco?
Solo dos detalles que no pude superar:
SetDate(dDate) - decrementa un día en la fecha indicada
lRmDir() - no me funcionó.
Gracias.
Posted: Thu Oct 13, 2005 11:23 pm
by Alfredo Arteaga
Será que no se entendió la consulta o no hay trucos al respecto?
Posted: Fri Oct 14, 2005 1:11 am
by Guest
Hola alfredo, si me deschongo mucho me paras un alto va?
ok. para la primer pregunta yo le diria ddate := date() o en su defecto un calendario bonito...
para la segunda, existen funciones para crear directorios en fwh, pero lo que yo uso para crear directorios es la siguiente...
lMkDir( cRutaLogica+"BACKUP" )
asi de esa forma y si me ha dado resultados...
Posted: Fri Oct 14, 2005 1:40 am
by Alfredo Arteaga
Gracias por la respuesta, me refería principalmente al efecto en los GETs, las otras dos situaciones ya fueron resueltas.
Uso SetDate() para facilitarle algunas labores o procesos a los usuarios permitiéndoles cambiar la fecha, pero resulta que cuando la restablesco decrementa un día, bueno fue suficiente con incrementarlo antes de restablecerla. Esta situación se presentó en alguna ocasión con FiveWin hice los comentarios y entonces fue corregida pero hoy la vuelvo a encontrar en FWH.
Sobre lRmDir() o lLFNRmDir(), ninguna de estas dos funciona tuve que agregar a sugerencia de Willy (saludos) la DLL32 y listo, aquí la dejo por si a alguien le interesa.
DLL32 FUNCTION RemoveDir(cPathName AS LPSTR) AS BOOL PASCAL ;
FROM "RemoveDirectoryA" LIB "Kernel32.Dll"
Esperaré lo del control GET se que ahora no se trata del pintado pero talvez alguién ya logro el efecto, posiblemente cambiando de editor de recursos.
Saludos.
Posted: Fri Oct 14, 2005 10:53 am
by fgondi
Hola alfredo,
No se si tu pregunta sobre get se refiere exactamente a esto, pero yo uso
oGet:lReadOnly := .T.
Sin tener que desabilitar el get. De esta forma el get esta habilitado, perminte movimiento hacia arriba y hacia abajo, en el caso de un multilinea, y no se puede escribir nada en él, es sólo de lectura.
Posted: Sun Oct 16, 2005 3:28 am
by Guest
Gracias Fgondi, en mi poca experiencia en FWH (32 bits) empiezo a ver que toma los controles naturales del API Windows (soy algo menso un año de retrazo) ya te avisaré entonces.
Posted: Mon Oct 17, 2005 9:19 pm
by miguel
Yo me encuentro en el mismo punto, pero el problema que tengo es que al recorrer los controles de un array, no todos los controles tienen la propiedad lReadOnly.
Si se pudiera modificar algo para lograr este comportamiento lo agradecería mucho
Un saludo
Posted: Tue Oct 18, 2005 9:35 am
by fgondi
Hola Miguel,
Si los tienes en un array prueba a realizar los siguiente
Code: Select all
For i:= 1 to len(aGet)
...
if aGet[i]:ClassName()=='TGET'
aGet[i]:lReadOnly := .T.
endif
...
next
Posted: Tue Oct 18, 2005 5:13 pm
by miarcod
gracias, pero ReadOnly solo lo puedo usar con los Gets, y el caso es que yo en el array de controles puedo tener CheckBox, combobox, y botones.
Antes, yo desahabilitaba los controles sin preocuparme de que tipo de control era el que estaba desactivando
Si pudiera controlar el color con el que se muestran los objetos desactivados creo que podría solucionar el problema.
Es posible cambiar durante la ejecución el color de los objetos desactivados.
Gracias
Posted: Tue Oct 18, 2005 5:53 pm
by fgondi
Hola
Si se pueden cambiar los colores
Code: Select all
For i:= 1 to len(aGet)
...
aGet[i]:Disable()
aGet[i]:SetColor( CLR_BLACK, nRgb(255,255,128) )
...
next
Yo cambio los colores para que los desabilitados se vean en negro con un fondo amarillo.
Posted: Tue Oct 18, 2005 6:20 pm
by miarcod
Gracias por la respuesta, pero no consigo hacer que un get deshabilitado tenga otro color de fondo, el color se activa cuando sel get vuelve a habilitarse
Un saludo
Posted: Tue Oct 18, 2005 8:21 pm
by fgondi
Intentar poner algo del código para probarlo,
Yo juego mucho con los colores en los gets y no tengo ningun problema.
Por ejemplo desabilito, habilito según el bChange de un checkbox, el valid de Get...