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

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


bahman

سوال

سلام دوستان یه سوال داشتم

من با کد

Sub btncopy_Click
    Dim something As BClipboard
    Dim cursor2 As Cursor
    cursor2 = SQL1.ExecQuery("SELECT sms FROM smstb")

    Dim btn2 As Button
    btn2=Sender
    
    cursor2.Position =btn2.Tag
    something.clrText
something.settext(cursor2.GetString("sms"))
    ToastMessageShow("متن در کلیپ بورد کپی شد",False)
    cursor2.Close
End Sub

تو برنامه پیامکیم هر پیامک رو کپی میکنم

حالا میخوام یه دکمه ای قرار بدم اگه زده شد به جای کپی اون پیامک بیاد اون رو تو لایوت l1 در اکتیویتی main بیاد توی Edittext 1 نشون بده

امیدوارم تونسته باشم منظورمو برسونم

 

ممنون

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

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

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

یا مثلا روی اون دکمه زدیم متن خاصی بره قرار بگیره روی

 

edit text

 

البته مورد اولی واجبتره

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

سلام

عزیزم اصلا ربطی به کپی و این چیزا نداره

 

شما توی ساب پراسس گلوبالز یه متغیر ایچجاد کن به اسمmatne_man

dim matne_man as string

تو رویداد کلیک اون دکمه ای که میخوای وقتی روش کلیک شد، متنت بره تو اون ادیت تکست اینطوری کار کن

اسم اتیوتی بعدیت رو میذاریم ادیت تکست و اسم این اکتیویای رو میذاریم متن

matne_man = label1.text
'label1 hamoon label shomas'
startActivity(act_edittext)

توی اکتیویتی کریت Act_edittext به شکل زیر عمل کن

edittext1.text = act_matn.matne_man

:)

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

edtitext1.text = label1.text

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

بحث اینه من وقتی کپی میکنم یه سطری از دیتابیسم کپی میشه و میخوام همون متن توی دیتابیس که کپی شده بره اونجا نشون داده شه

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

ببین، شما باید با متغیر ها کار کنی واسه ارتباط بین دو سطر

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

Sub btncopy_Click
    Dim something As BClipboard
    Dim cursor2 As Cursor
    cursor2 = SQL1.ExecQuery("SELECT sms FROM smstb")

    Dim btn2 As Button
    btn2=Sender
    
    cursor2.Position =btn2.Tag
matne_man = cursor2.GetString("sms") 
    cursor2.Close
End Sub

تو اکتیویتی بعدی هم همونطور که بهتون گفتم کار کنید

کپی میشه

فقط این کد هارو در رویداد کلیک دکمه مربوطه قرار بدید.......

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

بایگانی شده

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

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

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