Pierdo datos de memo.text a label.caption

[jgarcias2]

He estado haciendo pruebas, y lo que si puedo hacer es esto

comport1.ReadStr(str, count);
memo1.Text := memo1.text + str;
label2.caption := memo1.Text;

asi si que funciona bien, sin embargo esto no lo hace:

Código Delphi [-]
 
  comport1.ReadStr(str, count);
  memo1.Text := memo1.text + str;
  label2.caption := str;  // asi se pierden caracteres...

Como es posible esto, no lo entiendo...
Por cierto uso el delphi 7.

Saludos. Gracias.