¿ Label ?
 

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.

Código Delphi [-]
procedure Listas_de_codigos;
begin
  { Aquí el código que se repite }
end;

procedure ... caso1
 begin
  ...
  ...
  Listas_de_codigos;
  ...
  ...
 end;
 
 procedure ... caso2
 begin
  Listas_de_codigos;
  ...
  ...
  ...
  ...
 end;

No caería mal que te leyeras un libro con los conceptos básicos de programación estructurada.

// Saludos

Gracias!!!
 

Me alegra mucho saber que ahi esta mi respuesta. Por cierto, sabes en donde podría encontrar alguna documentación sobre eso. También te lo agradecería.