[alfcen]

Hi Andrew,
Looks really great. Thanks so much, indeed !
Just a small finding,

web.IsOffline causes a "NotSupportedException" error on the device

Sub CheckOffline
  If hc.IsOffline Then
    Msgbox("Device is offline."," Tenki",cMsgBoxNone,cMsgBoxAsterisk)
  End If
  Return hc.IsOffline
End Sub

Would it be a great effort to add methods to influence font size and
text wrapping?

Cheers
Robert