Programme delphi
Résolu/Fermé
A voir également:
- Programme delphi
- Telecharger delphi 7 - Télécharger - Langages
- Programme demarrage windows 10 - Guide
- Désinstaller programme windows 10 - Guide
- Programme démarrage windows 10 - Guide
- Forcer la fermeture d'un programme - Guide
2 réponses
nicocorico
Messages postés
799
Date d'inscription
dimanche 19 juin 2011
Statut
Membre
Dernière intervention
3 juillet 2018
138
5 sept. 2011 à 05:41
5 sept. 2011 à 05:41
Il suffit d'aller dans le menu 'Projet' puis 'Ajouter au projet'...
nicocorico
Messages postés
799
Date d'inscription
dimanche 19 juin 2011
Statut
Membre
Dernière intervention
3 juillet 2018
138
Modifié par nicocorico le 5/09/2011 à 17:19
Modifié par nicocorico le 5/09/2011 à 17:19
Oui c'est normal qu'il y ait des erreurs car tu ne respectes pas les types, il faut déclarer une variable de type 'GInt' et utiliser 'FStrToGint ' pour transformer la chaine en GInt...
Pour la liste des fonctions, reportes-toi à la doc Pdf fournie avec les unités...
Pour la liste des fonctions, reportes-toi à la doc Pdf fournie avec les unités...
nicocorico
Messages postés
799
Date d'inscription
dimanche 19 juin 2011
Statut
Membre
Dernière intervention
3 juillet 2018
138
5 sept. 2011 à 20:40
5 sept. 2011 à 20:40
Et tu as mis l'unité dans la clause Uses ?
KX
Messages postés
16752
Date d'inscription
samedi 31 mai 2008
Statut
Modérateur
Dernière intervention
31 août 2024
3 017
6 sept. 2011 à 11:02
6 sept. 2011 à 11:02
Lorsque tu l'as téléchargé, l'unité GInt devait se présenter sous la forme d'un fichier GInt.pas
Tu dois donc spécifier son utilisation avec le mot clé uses :
Tu dois donc spécifier son utilisation avec le mot clé uses :
program SansTitre; uses Forms, GInt;
5 sept. 2011 à 11:27
même Problème.
5 sept. 2011 à 12:15
5 sept. 2011 à 14:54
var m:Comp;
a:Integer;
begin
m:=strtoFloat(Edit1.Text);
a:=Trunc(m);
If 0=(a-5) mod 6 Then
le message dit:" Le projet Projet1.exe à provoqué une class d'exeption EconvertError avec le message 587412541321n'est une valeur entier correct'
ar m:NewGint;
a:Integer;
begin
m:=strtoFloat(Edit1.Text);
a:=Trunc(m);
If 0=(a-5) mod 6 Then
Error Identificateur Non déclarer:'NewGint' tellement je déclare :'NewGint' dans menu Projet puis 'Ajouter au projet'...
et Merci