Comme dans la pluspart des langages.
Me souviens plus si on peut faire ca en Perl, mais en C/C++, tu pourra pas faire ca dans un switch.
A+,

Ca sert à quoi se genre topic ?

Delphi et Kylix non plus on peut pas.
en PHP par contre on peut (mais bon c'est pas du Pascal )

[jfdsdjhfuetppo]--Message édité par antp--[/jfdsdjhfuetppo]

ça sert a bouffer 1ko d'espace sur un serveur de plusieurs dizaine de MEGA
 
Enfin c pas grave j'ai utllisié des if then eles to moche avec des or tout moches aussi.    
 
faut que je me mette au c++ ça va me servir l'année prochaine. merchi

[jfdsdjhfuetppo]--Message édité par karim63--[/jfdsdjhfuetppo]

karim63 a écrit a écrit :   ça sert a bouffer 1ko d'espace sur un serveur de plusieurs dizaine de MEGA   Enfin c pas grave j'ai utllisié des if then eles to moche avec des or tout moches aussi.       faut que je me mette au c++ ça va me servir l'année prochaine. merchi

Le Pascal est 1 langage + structuré que le C++ ce qui en fait 1 langage + propre mais 1 peu plus contraignant que le C++
Et même en C/C++ j'aime mieux faire des if...else if... else que des switch (de toute façon ça revient au même vu qu'il y a pas 36 façon de le faire en asm....)
 

bah de toute façon en C++ non plus on peut pas faire un switch avec des string donc y a vraiment pas de quoi commencer à lancer un débat que je sens arriver  

si tu tiens absolument à utiliser case of en pascal tu peux le faire si si...
 
il suffit d'utiliser une TStringList par exemple
 
...
liste.add('un';
liste.add('deux';
liste.add('trois';
...
case liste.indexof(chaine) of
 0 : // ici si chaine='un'
 1 : // ici si chaine='deux'
 2 : // ici si chaine='trois'
...
end;

[jfdsdjhfuetppo]--Message édité par Taureau--[/jfdsdjhfuetppo]

et ça on peut pas faire en VC++    
 
nan c pour rire, je lance pas un débat  
 
mais bon TStringList c'est du Delphi/Kylix/C++Builder, je suis pas sûr que ça existe en FreePascal, si ?

... = array of string
...[0] := 'string1'; et ainsi de suite
 
For i := 0 to High(...)
   if ...[i] = 'MonString' then ref := i
 
case Ref of
 
et pas besoin de liste
 
Quoi c'est bourrin ?
Que... mais... Non... euh
OK, je sors !

il y a bien une TStringList sous freepascal mais je ne sais pas si elle fonctionne comme sous delphi...
 
ciler c'est pas que ce soit bourrin...c'est juste que le case of devient inutile avec ton approche    

Taureau a écrit a écrit : il y a bien une TStringList sous freepascal mais je ne sais pas si elle fonctionne comme sous delphi...   ciler c'est pas que ce soit bourrin...c'est juste que le case of devient inutile avec ton approche

 
Ben c'est lui qui veut du case hein... ce que j'en dit moi