procedure TForm1.Button1Click(Sender: TObject);
 begin
   StaticText1.Caption:='Linea Uno'+#13+'Linea Dos';
 end;