Welcome to بیسیک فور ایکس

Register now to gain access to all of our features. Once registered and logged in, you will be able to contribute to this site by submitting your own content or replying to existing content. You'll be able to customize your profile, receive reputation points as a reward for submitting content, while also communicating with other members via your own private inbox, plus much more! This message will be removed once you have signed in.

  • 0
Sina

فیلم برداری از صفحه

سوال

با سلام

من دارم یک برنامه می سازم و می خوام هنگام بسته بودن برنامه از صفحه فیلم بگیرم

۱ - چطور هنگام بسته بودن برنامه هنوز کار کنه؟

۲- چطوری از صفحه اندروید فیلم بگیرم؟

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

4 پاسخ به این سوال تا کنون داده شده است

  • 0

سلام دوست عزیز :wink1: 


 


در رابطه با سوال اولتون باید بگم این کار با استفاده از سرویس انجام می شه 


و در رابطه با سرویس باید بگم زمانی که یه پروژه جدید در B4A میسازید 


دربالای صفحه یه اکتیویتی میبینید به نام "Starter" که البته اون اکتیویتی نیست سرویسه



startservice(نام سرویس)

با کد بالا هم میتونید سرویس رو فعال کنید



StopService(نام سرویس)

با کد بالا هم سرویس متوقف میشه


 


و اما سوال دوم 


ساخت نرم افزاری که از صفحه فیلم یا عکس بگیره تنها با دسترسی روت ممکنه


و B4A هم کتاب خانه کاملی در زمینه روت نداره 


ولی خوب شاید در سایت مرجع بتونید کتاب خانه ای پیدا کنید که مناسب کارتون باشه


با احترام :bye2: 


پسند شده توسط H@mid.RS، salmana و Sina

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

برای عکس گرفتن بدون روت از این کد استفاده می کنم حالا سوال من این است می تونیم با دستکاری این کد فیلم بگیریم

Dim Obj1, Obj2 As Reflector
   Dim bmp As Bitmap
   Dim c As Canvas
   Dim Obj1, Obj2 As Reflector
   Dim Out As OutputStream


   Obj1.Target = Obj1.GetActivityBA
   Obj1.Target = Obj1.GetField("vg")
   bmp.InitializeMutable(Activity.Width, Activity.Height)
   c.Initialize2(bmp)
   Dim args(1) As Object
   Dim types(1) As String
   Obj2.Target = c
   Obj2.Target = Obj2.GetField("canvas")
   args(0) = Obj2.Target
   types(0) = "android.graphics.Canvas"
   Obj1.RunMethod4("draw", args, types)
   Out = File.OpenOutput(File.DirRootExternal & "/" , "m.jpg", False)
bmp.WriteToStream(Out, 100, "JPEG")
Out.Close

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

یک سوال دیگه کسی RSVideoRecord را میشناسه اصلا واسه چی هست؟

این رو از سایت منبع پیدا کردم آیا میشه با این فیلم گرفت؟

Dim n As videoThumbnail 
  Dim AppBmp As Bitmap 
  AppBmp = n.CreateVideoThumb(File.DirRootExternal & "/download/Vid.mp4")

  Dim Out As OutputStream    
  Out = File.OpenOutput(File.DirRootExternal, "/download/Vid.jpg", False)    
  appbmp.WriteToStream(Out, 100, "JPEG")    
  Out.Close

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

  • 0

سلامی دوباره


 


نمی دونم شاید هم بشه


RSVideoRecord نام یک کتابخانه است که براتون پیوست کردم


امتحان کنید ببینید میشه یا نه 


Libraries.zip

پسند شده توسط Sina و salmana

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !


ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید


ورود به حساب کاربری