Con los Buenos días para todos
Antonio con el ánimo de hacerle mejoras a la aplicación de la Biblia
Alojo la información de texto de _ en un arreglo richedit, como coloreo o le doy negrilla al texto de un solo campo? En este caso Versiculo->concor.
Cada que presento un libro, por ejemplo ese campo debería salir en negrilla.
Gracias
*-----------------------------------------------------------------------------------
DEFINE Window oWnd1 child from lPos1,lPos2 to lPos3,lPos4;
title "Libro :"+space(2)+(cTitulo) pixel Icon oIco1
go top
cTotal:= space(10)+alltrim(Versiculo->Concor)+renglon+ ;
Rtrim(Versiculo->Verso)+space(2)+ alltrim(Versiculo->Contenido)+ renglon
aadd(aSubtit,versiculo->concor) // aadd(aSub,versiculo->Verso)
skip
while .not.eof()
cTotal:=cTotal +space(10)+alltrim(Versiculo->concor)+renglon+;
rTrim(Versiculo->Verso)+ space(2)+ rtrim(Versiculo->Contenido)+ renglon
aadd(aSubtit,versiculo->concor)
// aadd(aSub,versiculo->Verso)
skip
end
@ 1.9,0 RICHEDIT oRich VAR cTotal OF oWnd1 Font oFont
oRich:gotoline(1)
Mejorar la Biblia
- Jairo Barbosa
- Posts: 188
- Joined: Fri Jan 23, 2009 2:50 am
- Location: Cali Valle Colombia
- Contact:
- Jairo Barbosa
- Posts: 188
- Joined: Fri Jan 23, 2009 2:50 am
- Location: Cali Valle Colombia
- Contact:
Re: Mejorar la Biblia
Uploaded with ImageShack.us
Buscando entre los colegas que dominen la clase, esta enseñanza
Gracias por su ayuda
Re: Mejorar la Biblia
espero que pronto te ayuden seguramente al terminar las vacaciones
si supiera mas del tema con gusto...
Saluditos
si supiera mas del tema con gusto...
Saluditos
Que es mejor que programar? creo que nada
Atropellada pero aqui ando
I love Fivewin
séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ
Atropellada pero aqui ando
I love Fivewin
séʌǝɹ ןɐ ɐʇsǝ opunɯ ǝʇsǝ