|
|
« Sujet précédent | Sujet suivant »
|
|
Edguy
|
Newbie
|
|
|
|
|
|
|
|
Messages: 1
|
|
Inscrit(e) le: 19/05/2004
|
|
Lieu de résidence : Montréal
|
|
Déconnecté(e)
|
|
|
|
|
Publié le 19/05/2004 à 20:12
|
|
|
get sur un type enumeratif
|
Bonjour j'aimerais un coup de main pour faire un get sur un type enumeratif
--------------------------------------------------------------------------------------------------------------
Si je fais un get sur un type entier je ferais ceci
PACKAGE ES_Entiers IS NEW Integer_IO (Integer);
ES_Entiers.get(vcomm.Nombre);
--------------------------------------------------------------------------------------------------------------
si je veux mettre un get sur le type enumeratif ??????????????
type Tprod is (E1001, E1002, E1003);
Type tcomm is Record
Produit:Tprod; --de type Tprod(enumeratif)
Nombre:Integer;
end record;
vcomm: Tcomm; --var de type tcomm
??????????.get(vcomm.Produit);
----------------------------------------------------------------------------------------------------------
merci
|
|
|
|
|
|
ftbass
|
Administrator
|
|
|
|
|
|
|
Messages: 72
|
|
Inscrit(e) le: 27/02/2004
|
|
Déconnecté(e)
|
|
|
|
|
Publié le 21/05/2004 à 17:10
|
|
|
RE : get sur un type enumeratif
|
Après quelques tests, je dois dire que c'est plus dur que je ne le pensais. J'y travaille...
Si quelqu'un sait comment s'y prendre, je suis intéressé 
@+
|
|
|
http://ftprods.free.fr
|
|
|
|
|
103e
|
Newbie
|
|
|
|
|
|
|
|
Messages: 1
|
|
Inscrit(e) le: 25/07/2004
|
|
Déconnecté(e)
|
|
|
|
 Publié le 25/07/2004 à 12:19
|
|
|
RE : get sur un type enumeratif
|
type Tprod is ( E1001, E1002, E1003 );
type Tcomm is
record
Produit : Tprod;
Nombre : Integer;
end record;
package Produit_IO is new Ada.Text_IO.Enumeration_IO ( Tprod );
Vcomm : Tcomm;
...
Produit_IO.Get ( Vcomm.Produit );
-----------------------------------------------
C'est un peu tard pour répondre mais tant pis.
|
|
|
|
|
|
ftbass
|
Administrator
|
|
|
|
|
|
|
|
Messages: 72
|
|
Inscrit(e) le: 27/02/2004
|
|
Déconnecté(e)
|
|
|
|
|
Publié le 25/07/2004 à 13:56
|
|
|
RE : get sur un type enumeratif
|
Il n'est jamais trop tard...
Merci beaucoup 103e 
Ca sert toujours...
|
|
|
http://ftprods.free.fr
|
|
|
|
|
|
« Sujet précédent | Sujet suivant »
|
