procedure TForm1.Button27Click(Sender: TObject); begin Label1.Caption := '1' #13 '2'; Memo2.Lines.Add('1'); Memo2.Lines.Add('2'); end;