

With Scriptlet1
.Visible=False
.Width=.Width-200
.Width=.Width+200
.Visible=True
End With
ChatRTF.SelStart = intStart
ChatRTF.SelLength = 2
ChatRTF.selRTF = smile.TextRTF
Сейчас этот форум просматривают: AhrefsBot, Google-бот, Yandex-бот и гости: 3