ron_xin的专栏

1、设为true procedure 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...