mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 04:22:21 +01:00 
			
		
		
		
	TAChart: Handle Arrow by TChartBasicAxis.Assign.
git-svn-id: trunk@60828 -
This commit is contained in:
		
							parent
							
								
									cfdbda6261
								
							
						
					
					
						commit
						54d3652c78
					
				@ -686,6 +686,7 @@ procedure TChartBasicAxis.Assign(ASource: TPersistent);
 | 
				
			|||||||
begin
 | 
					begin
 | 
				
			||||||
  if ASource is TChartBasicAxis then
 | 
					  if ASource is TChartBasicAxis then
 | 
				
			||||||
    with TChartBasicAxis(ASource) do begin
 | 
					    with TChartBasicAxis(ASource) do begin
 | 
				
			||||||
 | 
					      Self.FArrow.Assign(Arrow);
 | 
				
			||||||
      Self.FGrid.Assign(Grid);
 | 
					      Self.FGrid.Assign(Grid);
 | 
				
			||||||
      Self.FMarks.Assign(Marks);
 | 
					      Self.FMarks.Assign(Marks);
 | 
				
			||||||
      Self.FTickColor := TickColor;
 | 
					      Self.FTickColor := TickColor;
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
		Reference in New Issue
	
	Block a user