cxgrid里如何通过代码,根据不同条件,控制同一列的不同行的可编辑属性,也就是Editing,Readonly属性 各位兄弟小虾在此谢谢各位大虾了(最终目的就是在cxgrid在同一列里,根据不同条件有的行不能让用户输入,有的行可以让用户输入) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 oncellenter,然后根据你的条件来处理啊!不知是否正确有用! 下面这段代码是根据列值控制,列的显示颜色!希望它能帮助你!procedure TfrmLdjgbass.cxGridDBColumn18CustomDrawCell( Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);var//ATextToDraw:String; ARec: TRect;begin //ATextToDraw := AViewInfo.GridRecord.DisplayTexts[AViewInfo.Item.Index]; ARec := AViewInfo.Bounds; if AViewInfo.GridRecord.Values[4] < 0 then ACanvas.Canvas.brush.color:=clred; ACanvas.Canvas.FillRect(ARec);end; DELPHI中Tsavetestfiledialog怎么用 發送郵件附件的問題 Cardinal(pChar(ClassName)) 的工作原理问题 dbgrid的列标题如何改名 关于时间计算和dbgrid修改问题,谢谢 Midas中应用服务器和数据库服务器的问题 关于spcomm控件 谁给介绍一下StrFmt function功能? 求完整的Delphi+Access源码。 各位大虾,帮帮小妹 象这样的解压缩怎么做? 关于数据库占用内存的问题。
不知是否正确有用!
procedure TfrmLdjgbass.cxGridDBColumn18CustomDrawCell(
Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
var
//ATextToDraw:String;
ARec: TRect;
begin
//ATextToDraw := AViewInfo.GridRecord.DisplayTexts[AViewInfo.Item.Index];
ARec := AViewInfo.Bounds;
if AViewInfo.GridRecord.Values[4] < 0 then
ACanvas.Canvas.brush.color:=clred;
ACanvas.Canvas.FillRect(ARec);
end;