procedure TForm1.FormCreate(Sender: TObject);
begin
Button1.Hint:='Delphi'+#13#10+'page';
Button1.ShowHint:=True;
end;