Discussion :

[nour74]

bonjour
j'ai ecrit une procédure 'enTouteLettre' qui me cite un nombre en toute lettres dans une unité 'unit1' et je n'ai pas réussi à faire appel à cette procédure dans une autre unité 'unit2'?
merci pour vos aide.

[bsdocuments]

bonjour
j'ai ecrit une procédure 'enTouteLettre' qui me cite un nombre en toute lettres dans une unité 'unit1' et je n'ai pas réussi à faire appel à cette procédure dans une autre unité 'unit2'?
merci pour vos aide.

Voici un petit exemple;

code de l'unité n°1

Code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Unit Unit1;
interface
 
procedure enTouteLettre;
 
implementation
 
procedure enTouteLettre;
begin
 {votre code..}
end;
 
end.

code de l'unité n°2

Code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Unit Unit2;
interface
uses Unit1;
 
implementation
 
procedure _Exemple_de_Procedure_;
begin
 enTouteLettre;
 {continuez votre code..}
end;
 
end.

pour plus de clairessissement postez votre code.

a+