Hi,
Can you try this?:
procedure TMainForm.UniFormCreate(Sender: TObject);
var
I: Integer;
LineSeries: TUniLineSeries;
begin
LineSeries := TUniLineSeries.Create(UniChart1);
LineSeries.Name:= 'NewLineSeries1';
LineSeries.Parent := UniChart1;
for I := 1 to 25 do
LineSeries.Add(Random(1000), IntToStr(I));
LineSeries := TUniLineSeries.Create(UniChart1);
LineSeries.Name:= 'NewLineSeries2';
LineSeries.Parent := UniChart1;
for I := 1 to 25 do
LineSeries.Add(Random(1000), IntToStr(I));
end;