مشاهده فایل
Poolakey
با سلام و درود خدمت دوستان عزیز انسرسنتر .
برایتان کتابخونه آورده ایم اونم چه کتابخونه ای.
پولکی بله.
بازار کتابخونه درون پرداختشو تغییر داده و دیگه با نسخه قدیمی نمیشه رو اندرویدهای جدید درون پرداخت پیاده کرد. از طرفی این کتابخونه نسخه b4a نداره و خب برای دوستان b4a خیلی خوشایند نبود این قضیه. طبق معمول وارد عمل شدیم و طی یک عملیات واقعا پیچیده کتابخونه رو برای b4a پیادوندیم. امیدوارم مورد استفاده تون باشه.
برای استفاده هم اول به شکل زیر کتابخونه رو تعریف و اینشیالایز کنید و درنهایت به سرویس بازار متصل کنید.
Dim poolakey As Poolakey
poolakey.init("public_key","poolakey")
poolakey.connect
Private Sub poolakey_connectionSucceed
Log("connectionSucceed") 'اینجا یعنی همه چی اکی بوده و میتونید خرید رو شروع کنید
End Sub
برای خرید محصولات غیر اشتراکی به شکل زیر
poolakey.purchaseProduct("product_id","payload")
Private Sub poolakey_purchaseSucceed(purchaseInfo As PurchaseInfo)
If purchaseInfo.payload=="buy_100_coin" Then ' اینجا اگه محصول مصرفی بود باید اونو مصرف کنید که بتوه دوباره بخره کاربر
CallSubDelayed2(Me,"consumeProduct",purchaseInfo.purchaseToken)
End If
End Sub
Private Sub consumeProduct(purchaseToken As String)
poolakey.consumeProduct(purchaseToken)
End Sub
Private Sub poolakey_purchaseCanceled
ToastMessageShow("purchaseCanceled",False)
ProgressDialogHide
End Sub
Private Sub poolakey_purchaseFailed(error As String)
ToastMessageShow("purchaseFailed::"&error,False)
End Sub
Private Sub poolakey_consumeSucceed
ToastMessageShow("consumeSucceed",False)
End Sub
Private Sub poolakey_consumeFailed(error As String)
ToastMessageShow("consumeFailed::"&error,False)
End Sub
برای محصولات اشتراکی هم از کد زیر
poolakey.subscribeProduct("product_id","payload")
---------------------------------------------------------------------------------------------------------------------------------------
توجه: نیازی به جایگزینی فایلهای sdk نیست. نسخه آخر sdk و ریسورسها رو از سایت مرجع بگیرید نبایدئ مشکلی باشه
دانلود آموزش کار با کتابخانه
سورس نسخه 3
ارسال کننده
محمدرضا شاهپیری
ارسال
۰۱/۰۳/۲۰
دسته
کتابخانه ها