من راه اندازی کردم و خرید موفقه ، ولی تو بازی هیچ سکه ای اضافه نشد. یعنی تایید خرید به بازی برنگشت تا سکه اضافه بشه. دلیلش چیه احتمالا؟
به جای اون "buy_100_coin" ای دی خرید بازار رو گذاشتم، کلا برنامه متوقف شد و پرداکت ای دی رو که میزارم هیچ اتفاقی نمیافته.
پ ن :استرینگ buy_100_coin تو سورس من هم به همین نامه
Private Sub poolakey_purchaseSucceed(purchaseInfo As PurchaseInfo)
If purchaseInfo.payload=="buy_100_coin" Then
ToastMessageShow("سکه افزوده شد",False)
Main.sekke=Main.sekke + 100
coiner.Text=Main.sekke
File.WriteString(File.DirInternal,"raad.txt",Main.sekke)
poolakey.consumeProduct(purchaseInfo.purchaseToken)
' CallSubDelayed2(Me,"consumeProduct",purchaseInfo.purchaseToken)
End If