trichview.support
Re: Is Empty? |
Author |
Message |
Jonas Bilinkevicius |
Posted: 11/24/2003 17:23:31 Thank you Yernar for this translation. This solve does not work correct if only image is present in RicViewEdit, it show that RichView is empty. Any better suggestions? "Yernar Shambayev" <[email protected]> wrote in message news:[email protected]... > > function isEmpty(MyRichView: TCustomRichView): Boolean; > begin > Result := (MyRichView.ItemCount = 0) or ((MyRichView.ItemCount = 1) and > (MyRichView.GetItemStyle(0) >= 0) and > (MyRichView.GetItemText(0) = '')); > end; > |
Powered by ABC Amber Outlook Express Converter