© 1999-2048 dssz.net 粤ICP备11031372号
[Delphi] agend delphi
说明: procedure TfrmModExibicao.btOKClick(Sender: TObject); var RecTypes : TIBUpdateRecordTypes; begin RecTypes := []; if cbNaoModificado.Checked then Include(RecTypes,cusUnModified); if cbModificado.Checked then Include(RecTypes,cusModified); if cbInseri<leba1> 上传 | 大小:696kb