| | | | | |

2024年1月21日

摘要：对应的编辑控件为ComboBoxEx1 procedure TForm13.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawSta 阅读全文

posted @ 2024-01-21 14:02 涂磊阅读(106) 评论(0) 推荐(0)

StringGrid1单元格内绘图

摘要： var Rect: Trect; begin Rect:= bg.CellRect(4,3); bg.Canvas.Brush.Color:= clwhite; bg.Canvas.FillRect(rect); bg.Canvas.Draw( rect.Left +trunc(( rect.Rig 阅读全文

posted @ 2024-01-21 09:18 涂磊阅读(79) 评论(0) 推荐(0)