bonjour,


pour imprimer un Tchart j'utilise le code suivant:

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
 
procedure TForm6.Imprimer1Click(Sender: TObject);
begin
printer.Printerindex:=prna4;
printer.Orientation:=polandscape;
 
With Chart1 do
begin
 	PrintMargins.Left := 15 ;
 	PrintMargins.Top  := 15 ;
 	PrintMargins.Right:= 15 ;
 	PrintMargins.Bottom:= 15 ;
end;
 
if printersetupdialog1.Execute then
begin
printer.BeginDoc;
chart1.PrintPartial(rect(200,300,6500,4500));
printer.EndDoc;
end;
end;
question 1: concernant le réglage des marges:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
PrintMargins.Left := 15 ;
ce me met une erreur sous delphi 2007
[DCC Erreur] Unit6.pas(377): E2064 La partie gauche n'est pas affectable
Alors que sous delphi 3 ca fonctionnait !

question 2: concernant la ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
 chart1.PrintPartial(rect(200,300,6500,4500));
comment on determine les 4 valeurs dans rec
pour l'instant j'y vais au pif et je fait des essais

question 3: est ce que mon code est globalement correct ou il y a des oublis ?

merci