delphi如何使用微信退款

概述openssl pkcs12 -clcerts -nokeys -in apiclient_cert.p12 -out apiclient_cert.pem  这个命令不变 openssl pkcs12 -nocerts -in apiclient_cert.p12 -out apiclient_key.pem  这个需要改一下，不然每次输出key文件的时候，总是要输入一个 密码，烦死了 最后看了

openssl pkcs12 -clcerts -nokeys -in apiclient_cert.p12 -out apiclient_cert.pem  这个命令不变

openssl pkcs12 -nocerts -in apiclient_cert.p12 -out apiclient_key.pem  这个需要改一下，不然每次输出key文件的时候，总是要输入一个 密码，烦死了

最后看了下帮助文件，加一个参数 openssl pkcs12 -nocerts -nodes -in apiclient_cert.p12 -out apiclient_key.pem  就好了

sll.SSLoptions 的 certfile 与 keyfile 分别对应那2个文件。 

procedure TForm1.button1Click(Sender: TObject); begin   WXPay.ClearData;   WXPay.addParams('body','开发测试商品');   WXPay.addParams('out_Trade_no','PXBSDPHD000000002');   WXPay.addParams('total_fee','1');   WXPay.addParams('auth_code',Edit1.Text);   Memo1.lines.Add(WXPay.micropay); end; procedure TForm1.btn1Click(Sender: TObject); begin   WXPay.ClearData;   WXPay.addParams('out_Trade_no','PXBSDPHD000000002');   WXPay.addParams('out_refund_no','PXBSDTHD000000002');   WXPay.addParams('total_fee','1');   WXPay.addParams('refund_fee','1');   WXPay.addParams('op_user_ID','pxb001');   Memo1.lines.Add(WXPay.refund); end; procedure TForm1.FormShow(Sender: TObject); begin   WXPay := TWXPay.create(IDhtp1); end; procedure TForm1.FormDestroy(Sender: TObject); begin   WXPay.Free; end;

总结

以上是内存溢出为你收集整理的delphi如何使用微信退款全部内容，希望文章能够帮你解决delphi如何使用微信退款所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。