|
——此文章摘自《Delphi开发经验技巧宝典》定价￥特价￥ 购买>>http://tracklinktechcn/?m_id=dangdang&a_id=A&l=&l_type= width= height= border= nosave> 如何获取DataGrid单元格中的内容 本例是通过DataGrid表格单元格单击事件获取单元格中的内容如图所示 在DataGrid的单元格单击事件中使用当前单元格的FieldText属性获取当前单元格中的文本并在当前单元格内容为文本框中显示主要代码如下 procedure TFrmOrderByDBGListCellClick(Column: TColumn); begin EditText := ColumnFieldText; end; http://developcsaicn/delphi/images/jpg> 图 获取DataGrid单元格中的内容 如何锁定文本框中的文本 在应用程序中当用户操作完毕后或不想让其他用户对文本框中的内容进行编辑时可以锁定文本框中的文本如图所示 http://developcsaicn/delphi/images/jpg> 图 锁定文本框中的文本 如果锁定文本框中的文本复选框为选中状态那么设置文本框为只读状态如果锁定文本框中的文本复选框为未选中状态那么设置文本框为可读写状态主要代码如下 procedure TFormchkClick(Sender: TObject); begin if chkChecked then EditReadOnly := true else EditReadOnly := false; end; |
