Sender as TFlatButton,TFlatButton是一个按钮,可能是一组按钮中的一个按钮,只不过这组按钮的TAG值事先进行了安排设置,就是说当用户按了TAG值是1的那个按钮时,就对 fSysDM.qSeleInfo(可能是一个数据集组件,)进行写入数据的操作begin
fSysDM.qSeleInfo.First;//移动 fSysDM.qSeleInfo的记录指针到记录集的第一条记录
while not fSysDM.qSeleInfo.Eof do//WHILE循环,遍历事个记录集
begin
fSysDM.qSeleInfo.Edit;//编辑记录
fS...
|