encapsular codigo de delphi

[thelibmx]

hola amigos desde hace tiempo tengo esta duda, hay manera de que un codigo que se va ejecutar muchas veces en diferentes partes de un programa en delphi se pueda encapsular para su reutilizacion?, no se si me explique bien, suponiendo que tengamos una ventana con un panel, en el cual tenga 5 cajas de texto tedit; entonces podemos dar altas bajas y modificaciones, entonces cuando se trata de altas blanqueamos los tedit y pues de igual manera en modificacion, y bajas, entonces iria algo asi como

Código Delphi [-]
edith1.text:='';
edith2.text:='';
edith3.text:='';
edith4.text:='';
edith5.text:='';

suponiendo que hay un boton de alta, otro de baja y otro de modificacion, iria esas 5 lines en cada boton, y si lo encapsulo pues solo mando llamar ese proceso o ese conjunto de instrucciones en una sola linea y no repito el codigo 5 veces, este es un ejemplo muy sencillo pues son 5 lineas, pero que pasa cuando son mas de 50 lineas de codigo, hay alguna manera de encapsularlo y reutilizarlo sin tener que repetir todo el codigo espero haberme explicado bien, gracias