Ho bisogno di creare questa funzione lavorando su un TMemo... come posso fare?

Grazie Mille