AFFICHE LES SEQUENCES D'HEURES D'UNE JOURNEE

cs_Delphiprog
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
9 janvier 2013
- 3 mai 2003 à 10:00
cs_Delphiprog
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
9 janvier 2013
- 3 mai 2003 à 10:04
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/12519-affiche-les-sequences-d-heures-d-une-journee

cs_Delphiprog
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
9 janvier 2013
31
3 mai 2003 à 10:04
Arf...
C'était tellement "énorme" que ça m'a échappé : la fonction ne renvoie AUCUNE valeur. Ce qui est un non sens.
A la place de "function", tu devrais mettre "procedure" :
procedure HeureMinute(t: integer);
cs_Delphiprog
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
9 janvier 2013
31
3 mai 2003 à 10:00
L'usage de l'unité forms n'est pas nécessaire et sera remplacée par une directive {$APPTYPE CONSOLE}.
De même, la directive {$R *.res} n'a pas de sens pour une application console.

Un conseil : pour toute fonction que l'on écrit, il est souhaitable d'initialiser le résultat dès le début. Ca peut éviter des effets inattendus.