在TcxGridDBColumn.Properties := ExtLookupComboBox;关联到另一个数据集上,请问如何在下拉选择时给另一个字段赋值?
解决方案 »
- XP的文件共享功能Delphi能实现吗?
- 输入法自动切换的遗留问题,琢磨好久了,一直没解决,哪位高手指点下,不甚感激
- 在vc中怎样实现Delphi中的Application.ProcessMessages功能
- 请解决DBchart的问题。
- 每天24:00从远程服务器上拷贝文件到本地,怎么做?
- 请问谁知道在抓屏幕时把鼠标抓下?
- 如何在delphi使用Script脚本,最好给个实例提示一下!灌水勿入
- 求助各位大虾,如何将Excel表中的数据导入Paradox表中?
- ado如何处理网络中断,服务器关闭等异常?
- 请各位帮我看看这段代码
- 关于图形控件,做这方面的朋友可以进来看一下,应该能有点帮助。
- 手机短信问题
好久没用cxgrid了,就记的这些了。
http://www.anylib.com
请大侠看看,急啊。
procedure TfrmSEQ.cxGridDBTableView1D_NamePropertiesEditValueChanged(
Sender: TObject);
var
Edit: TcxCustomEdit;
Value: Double;
View: TcxGridDBTableView;
AnotherColumn: TcxGridColumn;
begin
Edit := Sender as TcxCustomEdit;
if VarIsStr(Edit.EditValue) then
begin
Value := Edit.EditValue;
View := cxGrid.FocusedView as TcxGridDBTableView;
AnotherColumn := View.GetColumnByFieldName('D_Unit');
View.DataController.SetEditValue(AnotherColumn.Index, frmDM.ADOEqu.FieldByName('Equ_Unit').AsString,evsValue );
end;
end;