Bonjour,

j'ai un petit programme en freepascal qui m'affiche des montants.
je voudrais aligner les montants à droite. il y a une option qui fait cela ?
exemple de ce que j'ai fait :
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
23
24
25
26
27
28
29
30
 
	clrscr;
	writeln('*** Situation des comptes ***');
	writeln;
	gotoxy(1,3);write('Compte');
	gotoxy(10,3);write('Total');
	gotoxy(30,3);write('pointé');
 
	for j:=1 to nbcpt do
	begin
		for i:=1 to nbr do
		begin
			if lowercase(compte[i])=cpt[j] then
			begin
				mntcpt[j]:=mntcpt[j]+mnt[i];
				if (pointage[i] <>'') and (pointage[i] >' ')  then mnpcpt[j]:=mnpcpt[j]+mnt[i];
			end;
		end;
		//writeln('pour le compte ',cpt[j]);
 
		gotoxy(1,j+3);
		write(cpt[j]);
		gotoxy(10,j+3);
		write(mntcpt[j]:6:2);
		gotoxy(30,j+3);
		writeln(mnpcpt[j]:6:2);
	end;
	writeln;
	enter;
end;
et ça me sort ça par exemple

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
*** Situation des comptes ***
 
Compte   Total               pointé
per      -17258.49           -1206.43
cai      918.42                0.00
san      -28.92                0.00
ccp      1252.14             1322.14
cad      -94.70              -94.70
une petite idée ?

et bonne année 2012 !