Label de Pascal en Delphi

[vic_ia]

hola....

yo nunca he utilizado esa declaración pero se me ocurrio probarlo y funciona sin problema :

Código Delphi [-]
procedure prueba;
var
  i : Integer;
label
   saltoprueba;
begin
  ...
  goto saltoprueba;
  ...
  saltoprueba:
  ...
end;

la prueba la hice con Delphi 6; haz de notar que al colocar el label a donde quieres que salte se termina con : y no con ;

Nota : no faltara quien te diga que no es una buena practica de programación sobre todo en delphi pues la utilización de las sentencias goto y label no son "bien vistas" en la POO.

saludos