ron_xin的专栏

1、设为trueprocedure TFrmWebTicketForm.btnCheckClick(Sender: TObject);var txtVoyageCode, tbLugBoxNo ,chkUpdateLugBox, txtKeyCode: OleVariant;begin //设置/取值代码 txtVoyageCode := wbgetticket.OleObject.Document.GetElementByID('ctl00_ContentPlaceHolder1_

<WechatPay> <add key="UnifiedOrderUrl" value="1111"/> <add key="OrderQueryUrl" value="2222"/> <add key="PayAPIKey" value="3333"/> <add key="Appid" value="4444"/&gt...