I can merge two rtf as below ( i take it from a VB code )
THISFORM.oleRTF.SelStart = 0
THISFORM.oleRTF.SelLength = Len(THISFORM.oleRTF.Text)
THISFORM.oleRTF1.SelStart = 0
THISFORM.oleRTF1.SelLength = Len(THISFORM.oleRTF1.Text)
THISFORM.oleRTF2.SelStart = 0
THISFORM.oleRTF2.SelLength = Len(THISFORM.oleRTF2.Text)
THISFORM.oleRTF2.SelRTF = THISFORM.oleRTF.SelRTF
THISFORM.oleRTF2.SelStart = Len(THISFORM.oleRTF2.Text)
THISFORM.oleRTF2.SelLength = 0
THISFORM.oleRTF2.SelText = CHR(10)
THISFORM.oleRTF2.SelStart = Len(THISFORM.oleRTF2.Text)
THISFORM.oleRTF2.SelLength = 0
THISFORM.oleRTF2.SelRTF = THISFORM.oleRTF1.SelRTF
THISFORM.oleRTF.SelStart = 0
THISFORM.oleRTF.SelLength = 0
THISFORM.oleRTF1.SelStart = 0
THISFORM.oleRTF1.SelLength = 0
Now i want to know how i can do this programmaticaly ?
Can you help me?