Manipular Arquivo Texto

Caros amigos,

Estou precisando de uma rotina que me possibilite o seguinte:

Em um arquivo texto está gravado a seguinte linha por exemplo:

manga, pera, maçã, uva (002233)

realizado o procedimento ou a função fique da seguinte maneira no form:

Memo1: manga, pera, maçã, uva

Memo2:(002233)

Estou precisando muito,

Desde já agradeço. http://forum.imasters.com.br/public/style_emoticons/default/joia.gif