Description...
Exemple...
Voir aussi...
Traduction...
Pays : PaysSupportes;
Principal
Variable
AP : Nul Ou IAdressePostale;
Debut
...
Selon AP.Pays Faire
Cas Pour PaysAllemagne Faire
Ecran.Ecrire("Pays=Allemagne");
Fin Cas
Cas Pour PaysAngleterre Faire
Ecran.Ecrire("Pays=Angleterre");
Fin Cas
Cas Pour PaysChine Faire
Ecran.Ecrire("Pays=Chine");
Fin Cas
Cas Pour PaysCoreeSud Faire
Ecran.Ecrire("Pays=CoreeSud");
Fin Cas
Cas Pour PaysDanemark Faire
Ecran.Ecrire("Pays=Danemark");
Fin Cas
Cas Pour PaysEspagne Faire
Ecran.Ecrire("Pays=Espagne");
Fin Cas
Cas Pour PaysEtatsUnis Faire
Ecran.Ecrire("Pays=EtatsUnis");
Fin Cas
Cas Pour PaysFinlande Faire
Ecran.Ecrire("Pays=Finlande");
Fin Cas
Cas Pour PaysFrance Faire
Ecran.Ecrire("Pays=France");
Fin Cas
Cas Pour PaysGrece Faire
Ecran.Ecrire("Pays=Grece");
Fin Cas
Cas Pour PaysHollande Faire
Ecran.Ecrire("Pays=Hollande");
Fin Cas
Cas Pour PaysIsrael Faire
Ecran.Ecrire("Pays=Israel");
Fin Cas
Cas Pour PaysItalie Faire
Ecran.Ecrire("Pays=Italie");
Fin Cas
Cas Pour PaysJapon Faire
Ecran.Ecrire("Pays=Japon");
Fin Cas
Cas Pour PaysNorvege Faire
Ecran.Ecrire("Pays=Norvege");
Fin Cas
Cas Pour PaysPologne Faire
Ecran.Ecrire("Pays=Pologne");
Fin Cas
Cas Pour PaysPortugal Faire
Ecran.Ecrire("Pays=Portugal");
Fin Cas
Cas Pour PaysRussie Faire
Ecran.Ecrire("Pays=Russie");
Fin Cas
Cas Pour PaysSuede Faire
Ecran.Ecrire("Pays=Suede");
Fin Cas
Cas Pour PaysSuisse Faire
Ecran.Ecrire("Pays=Suisse");
Fin Cas
Defaut
Ecran.Ecrire("Autre pays");
Fin Defaut
Fin Selon
...
Fin Principal
Land | Country | 国家 | Pais | - | - | - | - |