首页 > 代码库 > 使用 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;