سلام من یه اپ دوربین ساختم که بشه باهاش عکس گرفت اما وقتی عکسو میگیرم ذخیره نمیکنه یعنی پیام میده که ذخیره شد اما وقتی به محل ذخیره میرم هیچی اونجا نیست در ضمن دسترسی ها لازم رو به برنامه دادم و از این کد استفاده کردم
Sub Camera1_PictureTaken (Data() As Byte)
camera1.StartPreview
Dim random As Int
random= Rnd(0,99999)
File.MakeDir(File.DirRootExternal,"Ph/pic")
Dim out As OutputStream
out = File.OpenOutput(File.DirRootExternal,"Ph/pic" & random & ".jpg", False)
out.WriteBytes(Data, 0, Data.Length)
out.Close
ToastMessageShow("Image saved: " & File.Combine(File.DirRootExternal, ".jpg"), True)
btnTakePicture.Enabled = True
End Sub
سوال
Mralihjz 0
سلام من یه اپ دوربین ساختم که بشه باهاش عکس گرفت اما وقتی عکسو میگیرم ذخیره نمیکنه یعنی پیام میده که ذخیره شد اما وقتی به محل ذخیره میرم هیچی اونجا نیست در ضمن دسترسی ها لازم رو به برنامه دادم و از این کد استفاده کردم
لینک ارسال
به اشتراک گذاری در سایت های دیگر
2 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.