|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
|
2018/12/11 8:28:32 |
标题: |
XE10.3 在Grid中分色显示数据的一个问题 |
浏览:625 |
|
加入我的收藏 |
楼主: |
procedure TMainForm.Grid1DrawColumnCell(Sender: TObject; const Canvas: TCanvas; const Column: TColumn; const [Ref] Bounds: TRectF; const Row: Integer; const [Ref] Value: TValue; const State: TGridDrawStates); var str1:string; begin
i := Column.Index; Str1 := FDQuery1.FieldByName('BM').AsString; //Memo1.lines.add(str1);
上面这行在XE10.0中运行正常,能分色显示数据,
升级为XE10.3后,Str1 就成了一个固定的值 各行显示成了同一种颜色,如何能准确取出字段BM的值(在第3列)
Column.Field.DataSet.FieldByName('BM').AsString 也不对
----------------------------------------------
▄︻┻┳═ |
作者: |
|
2018/12/11 9:07:22 |
1楼: |
你这个Grid是什么Grid?确定它会让FDQuery1的记录定位好吗?如果FDQuery不能自动定位,那你需要自己处理,比如Locate(当然这个可能比较慢)。
----------------------------------------------
-广袤璀璨的银河,永无止境的梦想(梦无止境游银河) 博客挂了……
|
作者: |
|
2018/12/11 9:59:39 |
2楼: |
Grid1: TGrid;
在 Delphi XE10.0中运行正常,郁闷!
----------------------------------------------
▄︻┻┳═
|
|