TextArea and RTF

Is the TextArea.Styled property set?

Styled is ON

I used the following code :

BronTextArea.RTFValue = KlantenRS.Field(“tekst”).StringValue

The field “tekst” is a text (char) field. Not a blob.

And it also contains RTF code?

Here is the code :

{\rtf1\ansi\ansicpg1252{\fonttbl{\f0\fnil LucidaGrande;}{\f1\fnil LucidaGrande-Bold;}}{\colortbl\red0\green0\blue0;}\uc0 \ql\f0\fs26 * g3p2\par * 1973: \b\f1 neusfractuur\b0\f0 \par * 1986: curettage wegens miskraam\par * 1990: \b\f1 lumbago\b0\f0 \par * 1991: 20 kg vermagerd door dieet\par * 1991: recidief lumbago\par * 1992: oktober: sinds een paar weken zwelling thv laterale zijde van rechter knie met pijn bij hurken => CT: enorme kyste, wschl uitgaande van voorste hoorn van laterale meniscus => MNR: wschl ganglionkyste, gezien er geen meniscusscheur kan worden aangetoond en ook gezien de vrij grote afmetingen (+/- 3 op 4 cm) => Dr Van Overschelde: \b\f1 wegname van grote multilobulaire MENISCUSKYSTE, uitgaande van het voorste deel van de fibulaire meniscus => APD: arthrosynoviale kyste\b0\f0 \par * 1996: november: - Rx LUMBALE WERVELZUIL, BEKKEN en HEUPEN: wat degeneratieve discopathie, vooral thv L4-L5. Beperkte statiekafwijkingen\par - CT RECHTER KNIE: geen significante afwijkingen\par * 1999: september: CT LUMBALE WERVELZUIL:\b\f1 aanwezigheid van naar rechts gelateraliseerde discushernia op L4-L5. Licht asymmetrisch beeld van de duraalzak maar mogelijks ontstaat er toch enige compressie van de rechter wortel L5. Slechts geringe migratie van discusmateriaal: mogelijks betreft het hier nog een subligamentaire hernia.\b0\f0 \par * 2006: februari: Rx en ECHO LINKER VOET:\par - kleine coricale onregelmatigheid lateraal op het middendeel van MT3. Cave beginnende\b\f1 stresfractuur\b0\f0 \par - geen argumenten voor tendinitis\par * 2006: juni: Rx en ECHO BEIDE VOETEN:\par - holvoetdeformatie\par - lichte tendinitis thv proneus longus en brevispezen beiderzijds\par * 2006: augustus: MR LUMBALE WERVELZUIL:\par - belangrijke discopathie op niveau L4-L5 met black disc en belangrijke vernauwing van de discusruimte. Foraminaal rechts is er een disco-osteofytair complex. Evenwel geen duidelijke arrgumenten voor radiculaire compressie of prikkeling\par - ook op niveau L5-S1 is er discopathie met black disc\par * 2006: september: Dr CLAESSENS: EMG:\par - slechts minimale neurogene kenmerken bij contractie van de L5-spieren rechts, zonder verarming, zonder duidelijke actuele denervatieactiviteit in rust\par => nog geen duidelijke tekenen van actuele radiculaire irritatie L5 rechts\par }

It works properly here.
Are you sure to build for Cocoa?

Massimo, sorry, I gave you the data from a wrong database.

Here is the other one

{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Microsoft Sans Serif;}}
\viewkind4\uc1\pard\lang1043\f0\fs17 * 1973:\b curettage wegens menoraghie\'ebn
\par \b0 * 1974: \b appendectomie
\par \b0 * 1983:\b curettage wegens onvolledige abortus
\par \b0 * 1991: recidiverende rhinitis en conjunctivitis => bloed: \b duidelijke allergie op huisstof en -mijt; ook op grassen
\par \b0 * 1992: gevoel van ‘vol’ hoofd => Rx SINUSSEN: pansinusitis, vooral links
\par * 1992: november: blijvende klachten van neusobstructie, slijmen in keel en cephalea => Dr STEELANT: pansinusitis en uitgesproken deviatie van het neustussenschot naar links => voorstel tot correctie van kraakbenig tussenschot en endoscopische nazicht van de paranasaalsinussen => CT (Dr L. Vanderstock): matige mucosaverbreding inferieur in de linker maxillaire sinus, wschl op basis van een chronische sinusitis of vroeger doorgemaakte acute sinusitis. Vermoedelijk klein botdefect in de mediale wand van de linker sinus maxillaris. De frontale, sphenoidale en ethmoidale sinussen zijn vrij.
\par * 1993: maart: Dr STEELANT: \b correctie van kraakbenig tussenschot. Curettage van hypertrofische polypeuse mucosa van de paranasaalsinussen bilateraal en thv frontaalsinussen. Breed openen van de ostia van de paranasaalsinussen naar de middenste neusgang
\par \b0 1993: april: blijvende klachten van stekende, kloppende hevige hoofdpijn, vnl links temporaal met uitstraling naar oog en oor, soms gepaard met zwakke vlekken zien, soms nausea, zelden braken, ook fonofotofobie. Komt meer voor bij stress, menstruatie en na drinken van rode wijn of porto. Tachycardie en hypertensie => Dr VAN ORSHOVEN: neurologisch, EEG en CT SCHEDEL: volledig normaal => D/ \b MIGRAINE\b0 => R/ Inderal
\par * 1995: februari: UZ GENT: LONGFUNCTIE: discreet obstructief gestoord.
\par D/ atopie met pereniale hooikoorts naast intermittente klachten van mild asthma bronchiale => R/ Pulmicort turbohaler 2x2 => 2x1, Beconase aqua 2x1, evt Ventolin
\par * 1995: december: ARTHRO-CT RECHTER KNIE:
\par \b - lateralisatie van de patella en vrij belangrijk retropatellair kraakbeen lijden met verdunning en onregelmatige aflijning
\par - ook onregelmatig kraakbeen met defect thv de laterale zijde van de mediale femorale condyle
\par \b0 - menisci en kruisbanden zijn normaal
\par * 1997: juni: Rx LUMBALE ZUIL: geen duidelijke afwijkingen tenzij scheefstand van bekken, rechter heup +/- 1,5 cm hoger dan linker en sinistroconvexe torsiescoliose van lumbale zuil
\par * 1997: september: recidiverende stekende pijn thv rechter flank => Dr TEUGHELS: geen gynecologische oorzaak => IVP: normaal
\par * 2001: juli: Dr VERHOEVEN:\b curettage wegens chronisch bloedverlies.
\par \b0 Thv endocervix komt weinig materiaal vrij. Endocavitair kwam oud gestold bloed vrij: endometriose ? => APD: hoofdzakelijk bloed, miniscule fragmentjes gepseudodecidualiseerd endometrium. Hormonale therapie ?
\par Exocervicaal epitheel zonder diagnostische afwijkingen. Geen verdere diagnose mogelijk.
\par => R/ Orgametril
\par * 2002: mei: Dr VERHOEVEN: \b vaginale hysterectomie en colporaphia anterior wegens uterusprolaps en cystocoele GrII
\par \b0 * 2002: augustus: Dr BECK: wegname nodule thv halsbasis links => APD: matuur fibroadipeus vetweefsel. Lipoompje ?\b
\par }

Still something is shown even with typographic problems. Perhaps the RTF code is not very nice.

I’m going to check out everything.
I have still 2 questions for you :

  1. What is the best (the fastest) way : using a char field or using a blob ?
  2. If I use the following code to write to the database, is that OK or not ?

KlantenRS.Field(“tekst”).Stringvalue = BronTextArea.RTFValue

Tx

RTF is plain text, so even as a String can works, however it can be very long, so it depends how the char field is defined and the DB engine you use.

I use SQLite

Definition of the field :

Name : tekst
Type : text
Length : 0
Decimals : 0
Allow Null : yes
Key : no

Massimo,
After having checked out everything, I am VERY GLAD !!! Reading the data GOES FINE !

I used the following code to write to the database :

SqlTekst = “UPDATE brief SET tekst = '” + DoelTextArea.StyledText.RTFData + “’ WHERE ID=” + mHuidigKlantID
DBName.SQLExecute(SqlTekst)

Wich code must I use now ?

For doing what?

For writing the edited data in the the textarea back to the field in the database.
Using RTFValue

In my previous version of my program I used :

SqlTekst = “UPDATE brief SET tekst = '” + DoelTextArea.StyledText.RTFData + “’ WHERE ID=” + mHuidigKlantID
DBName.SQLExecute(SqlTekst)

But that was going too slow.

Use the RTFValue method to get the RTF source string.

So, am I doing right if I use :

SqlTekst = “UPDATE brief SET tekst = '” + TextArea.RTFValue + “’ WHERE ID=” + mHuidigKlantID
DBName.SQLExecute(SqlTekst)

Yes, for the RTFValue part.

Dear Massimo, thank you very much for your help. Everything is working fine !
Now I am going to update all my code.

And Sam Rowlands, thank you very much also.

Mr Verleysen, there are people here capable to read Dutch, your text appears to be filled with personal information…

It is a weakness of Xojo that it does not support reading and writing of RTF very well. It cannot be too difficult for the folks here to invest in the textarea to do things like Formatted Text Control, now owned by Bob Keeney. It works but I still consider it as very expensive when you only have to use the RTF-reader.

Xojo is investing a lot in new and fancy stuff and in a way I like it but improvement of the textarea or the combination textarea/canvas is a lot more interesting for many customers. For me at least. A webappilcation is nice but hard to get it working from a site. Xojo comes with an own solution and I like that but unfortunately it is needed. Some investment in a way to make the standardcontrols better will be popular, I guess. I do hope that XojoCloud is also not too expensive for people who just want to play with it and want to see things working. So not only for webbased databases. Just some thoughts.

Hallo Tom.
Ik heb gezien dat er inderdaad een aantal Nederlandstaligen op dit forum zijn ingeschreven. Spijtig genoeg heb ik nog maar weinig Nederlandstalige post gezien. Vandaar dat ik op de Engelse gebruikersgroepen zit.
Ondertussen heb ik wel een oplossing gevonden via de raadgevingen van Massimo Valle en Sam Rowlands.
Ik werk alles nu verder uit.
Indien ik in de toekomst nog vragen heb naar dit forum toe, zal ik mijn vraag ook naar de Nederlandstaligen richten.