摘要: var cxlayoutitemtag: Integer; labeltag: Integer; listPutFileName: TStringList; procedure TFormTestPutFiles.cxbtn_putfilesClick(Sender: TObject); begin if OpenDialog1.Execute then begin ... 阅读全文
posted @ 2017-09-14 18:25 夏天的西瓜君 阅读(312) 评论(0) 推荐(0)