Como criar uma nova classe com um Memo como variáv

http://forum.imasters.com.br/public/style_emoticons/default/excl.gif Olá, pessoal:

Gostaria de criar uma nova classe (numa unit separada do formulário) chamada TApagador. Esta classe teria por objetivo apenas criar um memo temporariamente em tempo de execução, utilizá-lo para algumas coisas e, depois, removê-lo. A classe deveria conter:

MeuMemo : TMemo;

Procedure CriaMemo;

Procedure DestroiMemo;

Qual deve ser a ancentral da classe TApagador (TObject, TComponent, ou outra)?

Como faço para implementar as duas procedures e criar e destruir o memo dentro delas? Já tentei o que sei e continua dando erro. Às vezes, até compila, mas dá erro na hora da execução.

Um abraço.