Amigos del foro Buen dia
Como puedo guardar propiedades de texto en una DBF es eso posible?
Por ejemplo propiedades de color es mi caso exactamente, quiero resaltar el texto y poder grabar es condición en una dbf.
gracias de antemano
Jairo
Amigos del foro Buen dia
Como puedo guardar propiedades de texto en una DBF es eso posible?
Por ejemplo propiedades de color es mi caso exactamente, quiero resaltar el texto y poder grabar es condición en una dbf.
gracias de antemano
Jairo
INI oIni FILE "color.ini"
SET SECTION "Cores" ENTRY "COR1" TO "111111111" OF oIni
SET SECTION "Cores" ENTRY "COR2" TO "222222222" OF oIni
ENDINI
cCor1 := RGB( Val(Left(COR1,3)),Val(Subs(COR1,4,3)),Val(Right(COR1,3))) ou nRGB( ..., ... ,...) no me acuerdo
cCor2 := RGB( Val(Left(COR2,3)),Val(Subs(COR2,4,3)),Val(Right(COR2,3)))
@ 1, 1 SAY "TESTE COLOR" COLOR cCor1, cCor2 OF oDlg
el mismo concepto a DBFRobeiro gracias por tu respuesta, usted seria tan amable de explicarme como lo harÃa con una dbf un ejemplo quisa?
Gracias Robeiro
Jairo Barbosa
Jairo
nColor:=ChooseColor()
nRedText:=nRGBRed(nColor)
nGreenText:=nRGBGreen(nColor)
nBlueText:=nRGBBlue(nColor)
remplazas en tu dbf
afile->Rojo := nRedText
afile->Verde := nGreenText
afile->Azul := nBlueText
y cuando quieras verlo
REDEFINE SAY PROMPT "color de mi texto" ID 103 OF oDlg ;
COLOR nRGB(nRedText,nGreenText,nBlueText),nRGB(nRedText,nGreenText,nBlueText)
saludos
paco
Francisco Gracias
Jairo
Paco con los buenos dÃas
Me podrÃas pasar tu correo? quiero ordenar algunas preguntas
Gracias
Jairo
Jairo,
Para un texto con mutiples colores, etc, lo idóneo es que uses un control RichEdit, luego salvas el texto como RTF y asi lo almacenas en la DBF
Al volver a cargarlo en el RichEdit mostrará los colores, distintos tipos de fonts, etc. de forma automática ![]()
Antonio
Gracias por tu orientación y respuesta, he tenido mucha dificultad, pero no lo habÃa pensado de esa forma
El Señor te siga Bendiciendo
Jairo