Bonjour à tous, voila j'écrit un programme de libellé de chèques, je pense que tous le monde sait ce que c'est donc je passe les détails.
Dans ce programme j'ai une fonction qui me permet de vérifier si la valeur de l'utilisateur est un million ou un multiple; c'est cette fontion qui bloque, regarder plutot

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
function millionseul (var franc) : boolean;
var nbr : longint;
begin
	nbr := franc mod 1000000;
	if(nbr > 0) then 
		begin
			millionseul := FALSE;
		end
	else
		begin
			millionseul := TRUE;
		end;
end;
C'est à la ligne : nbr := franc mod 1000000;
Que le compilateur me dit "operateur overloaded"
En sachant que franc est en longint.

Voila j'espère que vous pourrez m'aider.

Cordialement.