Bonjour, je n'arrive pas a mettre en parametre un type dans une procedure, voici le code:
Code :
- type Carte= record
- Couleur:(Coeur,Trefle,Carreau,Pique);
- Numero:1..13;
- Ref: 1..52;
- end;
- var
- Carte1:Carte;
|
Code :
- procedure testP(VAR resultat_randomP:Integer;VAR test_couleurP:integer;Carte1:Carte) ;
|
La procedure marche sans "Carte1:Carte" ,
Merci de vos reponces