2020年4月24日
AddObject使用 D10
摘要： 不用 newstr procedure TForm1.cbb1CloseUp(Sender: TObject);begin edt1.Text := PString(cbb1.Items.Objects[cbb1.ItemIndex])^ + ':' + qry1KESMC.AsString;end 阅读全文
posted @ 2020-04-24 09:02 绿水青山777 阅读(243) 评论(0) 推荐(0) 编辑