Bonjour,
Je me permet d'ouvrir un nouveau post concernant un problème de type de variable sur XE2.
Voici le bout de code que j'aimerais faire fonctionner:
L'erreur à la compilation est la suivante:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 procedure TCalcVEDebb.Button1Click(Sender: TObject); const N4=3600; // secondes N5=100; //mm en m var N1: integer; // Largeur en mm N2: integer; // Hauteur en mm N3: integer; // Débit Resultat:integer; // Vitesse en m/s begin N1:=StrToInt(EDLar.Text); N2:=StrToInt(EDHaut.Text); N3:=StrToInt(EDDeBR.Text); Resultat:=N3/N4/(N1/N5)/(N2/N5) ; // calcul du résultat Label5.Caption:=Resultat;//affichage du résultat dans un label -->chiffre à virgule end;
E2010 Types incompatibles : 'Integer' et 'Extended'
J'ai essayé de changer le type des variables mais j'arrive à rien, c'est pour cette raison que je recherche des informations clairs à ce sujet.
Par la suite, j'aimerais que l'utilisateur à ne saisir que des chiffres dans mes trois Tedit.
Le résultat dans le Label5 devrait afficher la valeur calculée à deux chiffres après la virgule.Mais je ne sais pas comment paramétrer ça.
Ps: J'ai travaillé il y a de ça quelques années sur un programme en visual basic 6 que j'utilisais pour mon travail. Le parc informatique à ''subit'' une MAJ sur windows 7 et mon programme en VB6 ne se lance plus, sauf sur une machine virtuel XP, pas vraiment pratique.
Je cherche donc à comprendre par de petit bout de code (comme celui faisant l'objet de ce post) comment fonctionne Delphi. D'une fois que je serait plus au clair, je compte ''convertir mon code en VB6 vers Delphi qui tourne très bien sur des system en 32 et 64 bits.
D'avance merci pour votre aide et vos conseils.
Partager