在DBGrid的DataSet新增一個Calculated欄位,型態是Integer。接著在CalcFields事件中
[pascal]
AdoQuery1.FieldByName(‘AutoNo’).AsInteger := ABS(DataSet.RecNo);
[/pascal]
大型網站架構..net 架構師.rabbitMQ.redis.行動開發.APP開發教學.PHP Laravel開發..net core C# 開發.架構師之路.Delphi開發.資料庫程式.進銷存.餐飲POS系統
在DBGrid的DataSet新增一個Calculated欄位,型態是Integer。接著在CalcFields事件中
[pascal]
AdoQuery1.FieldByName(‘AutoNo’).AsInteger := ABS(DataSet.RecNo);
[/pascal]