build RTF text

we have: function RTFConcat(t: array of string; f: array of TFont): string; The function (attached) takes a number of tokens and fonts (one font for each text) and outputs the concatenated RTF text. This function has an unexpected behaviour. The displayed RTF text does not mach the font settings of the underlying grid. In fact from the code in [login to view URL] you would expect that text displayed in cells[1,1] and cell[2,2] be the same. Instead, screenshots [login to view URL] and [login to view URL] show a different text. The coder will fix the current RTFConcat so that plain text and RTF text both have the same font size and shape in a ProfGrid. ProfGrid is available (in trial version) at [login to view URL] . If the selected coder wants to rewrite RTFConcat from scratch. he had better looking at the following code [login to view URL]