procedure TForm1.Button1Click(Sender: TObject);
begin
OutLine1.Add (0,'This is one');
OutLine1.Add (0,'This is two');
OutLine1.Add (0,'This is three');
OutLine1.Add (0,'This is four');
OutLine1.Add (0,'This is five');
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
OutLine1.ItemS[5].Text :='This is modified';
end;