رفتن به مطلب
  • 0

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


Radius

سوال

سلام

 

ببخشید من با این آموزش http://answercenter.ir/topic/907-%D8%A7%D9%86%D8%AA%D8%AE%D8%A7%D8%A8-%D8%B9%DA%A9%D8%B3-%D8%A7%D8%B2-%DA%AF%D8%A7%D9%84%D8%B1%DB%8C/ یک عکسی رو انتخاب کردم از گالری ولی میخوام تو یک ImageView دیگه توی یک اکتیویتی دیگه استفاده کنم ازش

 

ممنون میشم راهنمایی کنید

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

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

ارسال های توصیه شده

سلام

 

ببخشید من با این آموزش http://answercenter.ir/topic/907-%D8%A7%D9%86%D8%AA%D8%AE%D8%A7%D8%A8-%D8%B9%DA%A9%D8%B3-%D8%A7%D8%B2-%DA%AF%D8%A7%D9%84%D8%B1%DB%8C/ یک عکسی رو انتخاب کردم از گالری ولی میخوام تو یک ImageView دیگه توی یک اکتیویتی دیگه استفاده کنم ازش

 

ممنون میشم راهنمایی کنید

یه متغیر توی process_globals تعریف کن مثلا

Dim bmp As Bitmap

بعد عکس رو برابر این کن

بعدش توی اکتیویتی دیگه میتونی اینطور ازش استفاده کنی مثلا اگه توی اکتیویتی main گذاشته باشی اینطوری میتونی ازش استفاده کنی

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

من هرچی تلاش میکنم نمیشه

 

این کد صفحه اول ام

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.
	Dim inp As InputStream
	Dim txt As String
	Dim bmp As Bitmap
End Sub

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.

	
	Dim Font As Typeface = Typeface.LoadFromAssets("jannat.ttf")
	Private ScrollView1 As ScrollView
	Private Name As EditText
	Private Panel1 As Panel
	Private ImageView1 As ImageView
	Private Button1 As Button
End Sub
Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("Startt")

End Sub

Sub Activity_Resume
	
End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub Pic_Hacked_Click
    Dim PicChooser As ContentChooser
    PicChooser.Initialize("PicChooser")
    PicChooser.Show("image/*", "عکس پروفایل کسی که میخواید هک کنید را انتخاب کنید")
End Sub
Sub PicChooser_Result(Success As Boolean, Dir As String, FileName As String)
    If Success = True Then

        inp = File.OpenInput(Dir, FileName)
        bmp.Initialize2(inp)
      '  ImageView1.SetBackgroundImage(btm)
    Else
        ToastMessageShow("انجام نشد، دوباره تلاش کنید", True)
    End If
End Sub  

این هم صفحه ای که میخوام عکس نمایش داده بشه

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.

	Private ImageView1 As ImageView
End Sub

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("Start_Tele")
	Startt.bmp.Initialize2(Startt.inp)
	ImageView1.SetBackgroundImage(Startt.bmp)
End Sub

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

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...