Modifier directement un champ RTF

Posté par ramses le 4/7/2005 14:56:03
Hug,

Je savais pas quoi faire aujourd'hui alors un petit tip pour modifier directement la couleur & autre dans un RTF:

Créer un champ de saisie de type RTF et 1 bouton avec le code suivant:

CHARFORMAT est une structure
	cbSize est un entier sans signe
	dwMask est un entier
	dwEffects est un entier
	yHeight est un entier
	yOffset est un entier
	crTextColor est un entier
	bCharSet est un caractère
	bPitchAndFamily est un caractère
	szFaceName est une chaîne fixe sur 32
FIN
SETTEXTEX est une structure
	flags est un entier
	codepage est un entier sans signe
FIN

CHARFMT est une CHARFORMAT
SETTEXT est une SETTEXTEX

CHARFMT:cbSize=60
CHARFMT:crTextColor=RVB(255, 32, 0)
CHARFMT:dwMask=OUBinaire(0x20000000,4)
CHARFMT:dwMask=OUBinaire(CHARFMT:dwMask,2)
CHARFMT:dwMask=OUBinaire(CHARFMT:dwMask,0x40000000)
CHARFMT:dwEffects=OUBinaire(4,2)

SETTEXT:flags=2
TheTEXT est une chaîne="Ramses Will Be Back!"+Caract(0)
SendMessage(Handle(Saisie1), 0x400+97, &SETTEXT, &TheTEXT)

SendMessage(Handle(Saisie1), 0xD3, 0x3 , 20+20*Puissance(2,16))

SendMessage(Handle(Saisie1),0x400+68, 4, &CHARFMT)


Yo...


Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=2475&post_id=10439