WebLabel is not displaying the caption property once you've set it to a multi-line string.
once you've assigned a multi-line value to WebLabel.Caption, it no longer reflects forthcoming changes. (in this small example, with ShowMessage I can check that the Caption property is actually updated with the correct values, but it's not displayed anymore ).
procedure TForm1.BtnMultiLineClick(Sender: TObject);
begin
weblabel1.Caption := webmemo1.Text;
end;
procedure TForm1.BtnSingleLineClick(Sender: TObject);
begin
if webmemo1.Lines.Count > 0 then
weblabel1.Caption := webmemo1.Lines[0]
else
weblabel1.Caption := '';
end;
procedure TForm1.BtnCheckClick(Sender: TObject);
begin
showmessage(WebLabel1.Caption);
end;
