Deshacer/hacer ilimitado

[owl]

Hola!

Soy nuevo escribiendo en el foro, pero hace tiempo que me acerco por aqui
A partir de ahora, que he conseguido registrarme(me mete la activacion en el spam ) podre entrar como usuario y realizar mis aportaciones

Les remito mi caso a ver si alguien sabe un poco del tema.

Estoy intentando en una aplicacion, conseguir ese efecto de deshacer/rehacer ilimitado, no restringido a solo texto. Para ello he investigado y se habla mucho de los command design patterns, es decir, guardar un par de pilas con comandos para deshacerlos y no cadenas de string o cosas similares.
Mi pregunta es, cómo creo objetos que sean acciones? utilizo delphi4 y no se muy bien como hacer eso. Si fuese posible echar un vistazo a un código que implementase algo similar seria genial poder verlo para saber por donde van los tiros. No pretendo que se me de el codigo de mi aplicacion, cualquiera me serviria o una simple explicación, lo que me gusta es aprender y me he atascado aqui

Muchas gracias a todos los que dedicaron un par de minutitos a leerme

Un saludo!