Discussion :

[prison_break]

Bonjour,

J'ai une date sous forme de chaine de caractere (ex: Lundi 3 mars) et j'aurais voulu savoir comment faire pour la transformer en une donné de type DATE et vice versa.

Je viens juste de commencer l'ADA dans mon entreprise alors que je n'en ai jamais fait.

Cordialement

[Lowelace]

Bonjour,

Ton problème est, si je comprends bien, plus un problème de manipulation de String plutot qu'un problème de conversion de type.
Je m'explique : Tu dois en fait extraire les informations pertinentes de Date dans une chaine de caractères.

Regarde vers le paquetage Ada.Strings.Bounded, & Ada.Strings.Unbounded (et un certain nombre de paquetage enfants de Ada.Strings d'ailleurs.), tu trouveras un tas de routine qui te permetttront d'extraire et tester des chaines de caractères à partir d'une chaine de caractère.

Si tu veux un peu plus d'aide, n'hésite pas en fonction des problèmes plus spécifiques que tu rencontreras

[prison_break]

Alors la je ne comprend rien
C'est la premiere fois que je fais de l'ada et la c'est comme si tu me parlai en chinois lol
Est ce que tu aurais pas un petit exemple stp

[Lowelace]

Ok,

Corrige moi si je me trompe.

La date est dans ta chaine de caractères : "Lundi 3 Mars". Tu veux quelque chose qui ressemble à un record (une structure) du type :

Code :

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

1
2
3
4
5
6
7
8
9
 
type T_Jour_Semaine is (Lundi, Mardi, Mercredi, Jeudi, Vendredi, Samedi, Dimanche);
type T_Jour_Mois is positive range 1..31;
type T_Mois is (Janvier, ..., Decembre);
type T_Date is record
   Jour_Semaine : T_Jour_Semaine ;
   Jour_Mois : T_Jour_Mois ;
   Mois : T_Mois;
end record;

Donc tu veux convertir "Lundi" en Lundi, "3" en 3 et "Mars" en Mars.

Dis-moi si c'est bien ca et on voit après.

[Lowelace]

Pour le cas Date vers chaine de caractères, c'est assez simple :

Code :

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

1
2
3
4
5
6
7
 
 
function To_String(Date : in T_Date) return String is
 
return Date.Jour_Semaine'Image & ' ' & Date.Jour_Mois'Image & ' ' & Date.Mois'Image ;
 
end To_String;

L'attribut 'Image permet de récupérer la cahine de caractères corrspondant à un type énuméré.

Dans l'autre sens, sur le principe, on cherche dans la chaine de caractères les 'image des énémérés pour reconstituer la date.

[prison_break]

Je te remercie pour toutes ces informations, ca va vraiment m'aider dans mon premier projet en entreprise.

Cordialement

[Lowelace]

De rien, pour le 'image, je ne suis pas sur de la syntaxe (je me trompe tout le temps ) :

Code :

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

1
2
3
4
 
Date.Jour_Semaine'Image 
 
T_Jour_Semaine'Image(Date.Jour_Semaine)

Good luck.

Ps : si tu as besoin d'autres tuyaux, n'hésite pas (15 ans d'Ada ca peut aider )