Вопрос по виндовс формс

Использую конструктор дизайнера форм, скажите как сделать так что бы когда вводишь новое сообщение старое оставалось

Собственно говоря сам код

Unit Unit1;

interface

uses System, System.Drawing, System.Windows.Forms;

type
Form1 = class(Form)
procedure button1_Click(sender: Object; e: EventArgs);
procedure button2_Click(sender: Object; e: EventArgs);
{$region FormDesigner}
private
{$resource Unit1.Form1.resources}
button1: Button;
button2: Button;
textBox1: TextBox;
textBox2: TextBox;
{$include Unit1.Form1.inc}
{$endregion FormDesigner}
public
constructor;
begin
InitializeComponent;
end;
end;

implementation

procedure Form1.button1_Click(sender: Object; e: EventArgs);
begin
textbox2.Text:=textbox1.Text
end;

procedure Form1.button2_Click(sender: Object; e: EventArgs);
begin
textbox2.Text:=''
end;

Textbox2.Text+=textbox1.Text + System.Environment.NewLine;

Если я правильно понял вопрос.

Добавить комментарий