UpdateText is a procedure used to update the textual contents of the reply in AReply using a reply from the collection. 

When the number of lines in TIdReply.Text is 0 (zero), the contents for the instance are updated using an existing collection item. 

UpdateText calls Find to locate the collection item with the numeric value indicated in AReply. If an existing collection item cannot be located with the numeric value, no action is performed. If a collection item does exist with the indicated numeric value, the text for the collection item is assigned to the text in AReply.