¿ Label ?

[!3d1@n]

Holas a todos:
Amigos estoy haciendo una aplicación en Delphi 6, donde me he dado cuenta que utilizo un mismo pedazo de código en varios procedimientos. ¿ Sabrán como se podría llamar para no estar repitiendolo ?

ejemplo :

Código Delphi [-]
 procedure ... caso1
 begin
  ...
  ...
  Listas de codigos
  ...
  ...
 end;
 
 procedure ... caso2
 begin
  Listas de codigos
  ...
  ...
  ...
  ...
 end;

nota : Los (...) son otros códigos. He oido hablar de Label y despues llamarlas pero no se como hacerlo. Por favor si alguin me ayudara, se lo hiba a agradecer.