首页 > 代码库 > 使用 IntraWeb (15) - 基本控件之 TIWEdit、TIWMemo、TIWText
使用 IntraWeb (15) - 基本控件之 TIWEdit、TIWMemo、TIWText
TIWEdit //单行文本框, 通过 PasswordPrompt 属性可以作为密码框TIWMemo //多行文本框TIWText //相当于多行的 TIWLabel 或不能编辑的 TIWMemo
TIWEdit 所在单元及继承链:
IWCompEdit.TIWEdit < TIWCustomEdit < TIWCustomControl < TIWBaseHTMLControl < TIWBaseControl < TIWVCLBaseControl < TControl < TComponent < TPersistent < TObject
主要成员:
property Text: TCaption //文本property PasswordPrompt: Boolean //是否以 * 代替文本; 以做密码字段property Alignment: TAlignment //对齐方式property BGColor: TIWColor //背景色property FocusColor: TIWColor //获取焦点时的背景色property DoSubmitValidation: Boolean //在提交时是否执行验证property Editable: Boolean //能否编辑property NonEditableAsLabel: Boolean //= True, 且 Editable = False 时, 将以 IWLabel 呈现property MaxLength: Integer //最大长度property ReadOnly: Boolean //是否是只读property Required: Boolean //是否是必填字段property OnSubmit: TNotifyEvent //在其获取焦点后, 按 Enter 将引发 OnSubmit; 如果没有使用该事件, 将调用当前窗体的 OnDefaultAction 事件.property OnAsyncChange: TIWAsyncEvent //procedure Clear //清空
TIWMemo 所在单元及继承链:
IWCompMemo.TIWMemo < TIWCustomMemo < TIWCustomControl < TIWBaseHTMLControl < TIWBaseControl < TIWVCLBaseControl < TControl < TComponent < TPersistent < TObject
主要成员:
property Lines: TStringList //property Text: TCaption //property BGColor: TIWColor //property Editable: Boolean //property InvisibleBorder: Boolean //是否隐藏边框property HorizScrollBar: Boolean //是否显示横向滚动条property VertScrollBar: Boolean //是否显示纵向滚动条property Required: Boolean //property OnAsyncChange: TIWAsyncEvent //procedure Clear //
TIWText 所在单元及继承链:
IWCompText.TIWText < TIWCustomText < TIWCustomControl < TIWBaseHTMLControl < TIWBaseControl < TIWVCLBaseControl < TControl < TComponent < TPersistent < TObject
主要成员:
property BGColor: TIWColor //property ConvertSpaces: Boolean //是否转换连续的空格; 如果不转换连续的空格将只呈现为一个空格, 默认 Falseproperty Lines: TStringList //property RawText: Boolean //有这个属性的控件还有: TIWLabel、TIWLink、TIWUrl, 但它在 TIWText 在应该最常用property UseFrame: Boolean //是否使用框架property WantReturns: Boolean //是否将将换行符识别为 <br>, 默认是 Trueproperty Text: TCaption //procedure Clear //
RawText 属性测试:
procedure TIWForm1.IWAppFormCreate(Sender: TObject);begin IWText1.Clear; IWText1.RawText := True; with IWText1.Lines do begin Add(‘<table border="1" rules="all" width="100%">‘); Add(‘<tr><td>111</td><td>222</td></tr>‘); Add(‘<tr><td>333</td><td>444</td></tr>‘); Add(‘</table>‘); end;end;
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。