Discussion :

[ninita]

bonjour, j'ai déclaré 5 etiquettes comme ceci:
label 0,1,2,3,4;
au moment ou je lance l'execution, celle-ci s'arrete en m'affichant ce message en bas de ma fenetre: [Erreur] Unit4.pas(63): Etiquette déclarée et référencée, mais pas définie : '2'
je ne comprends pas.

[Franck SORIANO]

Et bien tu as déclaré l'étiquette '2'.

Tu as dû faire un GOTO sur cette étiquette.

Mais tu n'as placé l'étiquette dans le code. Donc le compilateur ne sait pas où doit aller le GOTO.

[Just-Soft]

Salut;

à l'explication de Franck SORIANO j'ajouterais que le GOTO est très déconseiller en Pascal d'où ma question pourquoi l'avoir choisi est-ce vraiment un passage obligé ? dans la plupart des cas le GOTO peut être remplacé qu'en est-il de ton code ? peut-on jeter un œil sur ton code ?

[edam]

voir ici

[Just-Soft]

voir ici

+1.

[Paul TOTH]

bonjour, j'ai déclaré 5 etiquettes comme ceci:
label 0,1,2,3,4;
au moment ou je lance l'execution, celle-ci s'arrete en m'affichant ce message en bas de ma fenetre: [Erreur] Unit4.pas(63): Etiquette déclarée et référencée, mais pas définie : '2'
je ne comprends pas.

tient c'est rigolo, j'ignorais qu'on pouvais faire déclarer des labels numériques...on se croirait presque en programme BASIC dans années 80

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
procedure TForm1.FormCreate(Sender: TObject);
label
  10, 20;
begin
 10: WriteLn('HELLO WORLD');
 20: GOTO 10;
end;

[Gilbert Geyer]

Bonjour,

Moi j'aime bien les GoTo et mieux encore les EXIT : ça ressemble à de la logique câblée.

J'ignorais également qu'on pouvait déclarer des labels numériques et j'ai été surpris quand le compilo n'a pas bronché.

A+.

[Mac LAK]

Un "goto" en Pascal... Déjà que même en C, je trouve ça crade, alors dans du code Delphi, je ne vous dis même pas...
* Enfile sa cagoule à pointe, prépare son kit "Le bûcher facile", et se lance à la recherche de ninita en agitant une fourche et une torche... *


Plus sérieusement, donne ton algo initial, ninita, on t'expliquera bien volontiers comment le faire proprement sans cette immondice de "goto". Il y a plein de choses propres pour casser une exécution, en Delphi : les exceptions (notamment via "Abort"), les clauses "Finally", les "Exit", les "Break", les "Continue"...

Mais pitié, pas un "goto" !!! Encore moins à cinq exemplaires !!

[Kaféine]

Salut,

Juste une reflexion: Le Exit c'est une sorte de goto (fin de fonction) non?

j'aime beaucoup la nouvelle fonctionalité dans delphi Exit(Argument) à la manière du return en c#.

[Mac LAK]

Juste une reflexion: Le Exit c'est une sorte de goto (fin de fonction) non?

C'est un saut inconditionnel, en effet.

La différence, c'est que l'on sait d'avance où il va, comment il y va et avec quelles contraintes (par exemple, le "Finally" est tout de même exécuté, et le retour de fonction correctement retourné. C'est pareil pour le Break, Continue, et Abort : leur comportement est parfaitement défini et connu à l'avance.

Alors qu'un goto "sauvage", lui, peut aller n'importe où (dans les limites du langage, c'est pas du Basic non plus), génère un code-spaghetti parfois infernal à débugger, et surtout, il est source d'erreurs car rien ne t'interdit de te brancher à des endroits idiots et/ou dangereux...