procedure TcmOrderTracePicListFrm.pgPicListClose(Sender: TObject; var AllowClose: Boolean); begin AllowClose := true; end;
5,379
社区成员
262,722
社区内容
加载中
试试用AI创作助手写篇文章吧