......Hab jetzt den Thread nicht ganz verfolgt, aber ich lege die 
Textstysledaten in der DB folgendermaßen ab, und es geht. 

textstyle Feld in der DB als binary anlegen

dim a, b as string
a =  EncodeBase64(self.TextFeld.text,0)
b =  EncodeBase64(self.TextFeld.TextStyleData,0)

Diese Daten in die DB ... 

Bei Rausholen dann wieder DecodeBase64, in ein DataControl z.B. so:

a=DecodeBase64(DataControl1.Recordset.IdxField(8).StringValue
b=DecodeBase64(DataControl1.Recordset.idxfield(9).StringValue
TextFeld.SetTextAndStyle a,b

Vielleicht kannst Du was damit anfangen.....

Gruß
Achim





  




Antwort per Email an