, omdanne tekst rte i irland og rtp i portugal, bidragyder: robert cram,,,,,,, hvorfor ikke bruge det trichedit kontrol at gøre arbejdet for dig?jeg skabte en, udvidet richedit kontrol med en rtftext ejendom, som du kan læse og skrive til.gør omregninger, bare sæt teksten ejendom af kontrol, og læs rtftext og omvendt.,,, taxrichedit = klasse (trichedit), private, (private erklæringer), fstream: tmemorystream;,, procedure setrtftext (richtext: string), fungerer getrtftext: string., offentlig, {offentlige erklæringer), konstruktøren skabe (aowner: tcomponent); gearvalg;,, destructor ødelægge; gearvalg;,, der er offentliggjort, (offentliggjort erklæringer), ejendom rtftext: string læse getrtftext skrive setrtftext,,,,,,,,,, - gennemførelse, konstruktøren taxrichedit. skabe (aowner: tcomponent), begynder,,,, som skaber (aowner);,,, fstream: = tmemorystream. skabe,,,,,,,,,,,,,, destrukfor taxrichedit. ødelægge;, begynder,,, fstream. gratis;,,, arvede ødelægge,,,,,,,,,,,, procedure taxrichedit. setrtftext (richtext: string), begynder,,, fstream. klart,,, fstream. writebuffer (richtext [1], længde (richtext), fstream. stilling: = 0, baner. loadfromstream (fstream);,,,,,,,,,,, funktion taxrichedit.getrtftext: string;, begynder,,, fstream. klart, baner. savetostream (fstream);,, resultat: = pchar (fstream. hukommelse);,,,,,,,,,,, hth, robert cram, rcram @ knoware. nl,,