رفتن به مطلب

mehdi1376

کاربر رو به رشد
  • تعداد ارسال ها

    88
  • تاریخ عضویت

  • آخرین بازدید

درباره mehdi1376

مشخصات پروفایل

  • محل زندگی
    فارس - لامرد

آخرین بازدید کنندگان نمایه

بلوک آخرین بازدید کننده ها غیر فعال شده است و به دیگر کاربران نشان داده نمی شود.

دستاورد های mehdi1376

علاقه‌مند

علاقه‌مند (6/14)

  • Reacting Well
  • Conversation Starter
  • First Post
  • Collaborator
  • Week One Done

نشان‌های اخیر

44

اعتبار در سایت

  1. mehdi1376

    باز کردن actvity با باتن

    سلام دوستان دیدید که مثلا توی یه باتن دستور باز شدن یه باتن دیگه رو میذارن ؟ مثلا اینجوری: Sub Button2_Click Button1_Click End Sub خب حالا من میخوام توی همین باتن 2 به جای اینکه بگم باتن 1 باز بشه میخوام activity create باز بشه یعنی ایجوری: Sub Button2_Click Activity_Create End Sub ولی وقتی این کد رو مینویسم میگه : Error description: Syntax error (missing parameter) خب چه جور بنویسمش تا دستور باز شدن activity create توی باتن ایجاد بشه؟ ممنون
  2. mehdi1376

    مشکل با دیتابیس

    نه فک کنم نویکت عکسا رو یه جا ذخیره میکنه و باید اونا رو حذف کنم تا حجمش کم بشه
  3. mehdi1376

    مشکل با دیتابیس

    سلام دوستان من توی دیتابیسم( navicate ) اول چندتا عکس گذاشته بودم و حجم فایل به 17 مگ رسیده بود بعد که اون عکسا رو از توی دیتابیس حذف کردم حجم فایل تغییری نکرد و هنوز همون 17 مگ هست . انگار که عکسا حذف نشده دلیلش چیه ؟ چیکار کنم؟
  4. mehdi1376

    اتصال به دیتابیس

    نه اون رو بلدم عکسای زیر رو ببین [ATTACH=CONFIG]330[/ATTACH] عکس بالا برای موقعی هست که عکس آیتم های لیست ویو رو از فایل برنامه میگیرم و عکس زیر برای زمانی که عکس رو از دیتابیس میگیرم [ATTACH=CONFIG]331[/ATTACH] من میخوام مثل عکس دوم بشه شما بگید توی اون bitmap.initialize چی بنویسم که عکسو از دیتابیس بگیرم؟
  5. mehdi1376

    اتصال به دیتابیس

    ببینید طبق کدی که فرستادم من میخوام عبارت توی پرانتز توی کد زیر ("Btmp.initialize(file.dirassest,"fa.png جای اینکه فقط یه عکس از توی فایل برنامم بگیره و نمایش بده از دیتابیس بگیره یعنی مثلا اینجوری (("Btmp.initialize (cur.getstring("image اما وقتی این کد رو میذارم ارور میده و میگه اینطور پارامتری وجود نداره مشکل چیه؟ عبارت توی پرانتز رو چی بزارم تا عکس رو از دیتابیس بگیره ( در ضمن Btmp همون bitmap در آیتم های لیست ویو هست یعنی bitmap در خط زیر Towlinesandbitmap) امیدوارم منظورمو فهمیده باشید ممنون
  6. mehdi1376

    اتصال به دیتابیس

    سلام دوستان من این کد رو دارم Dim btmp As Bitmap btmp.Initialize(File.DirAssets,"fa.png") و اینم کد لیست ویوم ListView1.AddTwoLinesAndBitmap2(esm,famil,btmp,esm) من میخوام که عکس رو به جای اینکه از فایل برنامم بگیرم از دیتابیسم بگیرم یعنی اینجوری btmp.Initialize(namayesh(cur.getstring("list")) ولی وقتی این کد رو میذارم ارور میده که btmp اینطور پارامتری رو نداره لطفا بگید چیکارش کنم اون namayesh هم مهم نیست فقط تعریفش کردم برای اینکه بتونم عکس رو بگیرم
  7. مهدی آقا من بی صبرانه منتظر آموزش هستم هرچه سریعتر بهتر
  8. آقا مصطفی دمت گرم خیلی ممنون
  9. آقا آرمین توی لینک زیر که خودتون یه سورس جستجو گذاشتید http://answercenter.ir/showthread.php?t=268&page=2 لطفا بگید که چطور آیتم های متناسب با جستجو نمایش داده بشه یعنی مثلا وقتی سرچ کنید سلام تی لیست ویو فقط آیتم هایی که سلام توشون هست نمایش داده بشه ممنون
  10. سلام دوستان من سورس برنامه رو میذارم شما بررسیش کنید ببینید چیکار باید کرد برای اینکه فقط آیتم های مرتبط با لیست ویو نشون داده بشه همه چیرش آمادس فقط آیتم ها رو نشون نمیده ممنون میشم http://uplod.ir/4jdr42zkr1h4/tbl1.zip.htm
  11. دوستای عزیز یعنی نمیشه توی آیتم های لیست ویوی من(عکس اول) مثلا دکمه اشتراک گذاشت؟
  12. مجید جان من میخوام که فقط آیتم هایی که با جستجو متانسب بودن توی لیست نمایش داده بشه وگرنه جستجو رو انجام میده و نتایجو به دست هم میاره مشکلم فقط همینجاس ممنون
  13. mehdi1376

    چگونگی ساختن این نوع لیست ویو

    دوستان یه سوال دیگه هم دارم عکس زیر رو ببینید [ATTACH=CONFIG]298[/ATTACH] همونطور که میبینید یکی از ستاره ها خاموش و دوتا روشنن.اینا رو گذاشتم برای علاقه مندی ها که وقتی کلیک کنن روشن میشه ولی الان ستاره ها جای عکس هستن من نمیخوام جای عکس باشن میخوام ستاره ها توی آیتم باشن تقریبا مثل عکس زیر که اشتراک وکپی و حذف و.. توی آیتم هستن : [ATTACH=CONFIG]299[/ATTACH] چه طور ببرمش توی آیتم ممنون...
  14. سلام آقا مصطفی لطفا کدش رو برام بنویسید چون من مبتدی هستم و تسلط زیادی ندارم مهدی جان از ائن سورس راستشو بخوای زیاد چیزی نفهمیدم اگه میشه یه نگاهی به کدم بنداز ممنون
  15. mehdi1376

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

    سلام دوستان ببخشید من یه لیست ویو ساختم و یه جستجو براش گذاشتم که وقتی سرچ میکنیم موارد رو مشخص مبکنه و حتی بهت میگه {عکس پایین} [ATTACH=CONFIG]296[/ATTACH] حالا میخوام وقتی یه کلمه سرچ میکنم فقط اون آیتم هایی که نتایج جستجو بوده توی لیست نشون داده بشه اینم کل از کد: Sub Process_Globals Dim sql1 As SQL End Sub Sub Globals Private ListView1 As ListView Dim cur As Cursor Dim esm,famil,alamat As String Private Button2 As Button Private Button1 As Button Private EditText1 As EditText Private Button3 As Button End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("frm1") If File.Exists(File.DirInternal,"tbl1.db")=False Then File.Copy(File.DirAssets,"tbl1.db",File.DirInternal,"tbl1.db") End If Activity.AddMenuItem("نشان گذاری شده ها","neshan") End Sub Sub neshan_click cur=sql1.ExecQuery("select esm,alamat from tbl1 where alamat='1'") Dim m As String m="نشان گذاری شده ها "&CRLF For i=0 To cur.rowcount-1 cur.Position=i m=m&CRLF m=m&cur.GetString("esm") Next ToastMessageShow("m",False) End Sub Sub Activity_Resume End Sub Sub Activity_Pause (UserClosed As Boolean) End Sub Sub Button1_Click ListView1.Clear If sql1.IsInitialized=False Then sql1.Initialize(File.DirInternal,"tbl1.db",False) End If cur=sql1.ExecQuery("SELECT * FROM tbl1") For i = 0 To cur.RowCount-1 cur.Position=i esm=cur.GetString("esm") famil=cur.GetString("famil") alamat=cur.GetString("alamat") Dim btmp As Bitmap If alamat=0 Then btmp.Initialize(File.DirAssets,"fab.png") Else btmp.Initialize(File.DirAssets,"fa.png") End If ListView1.AddTwoLinesAndBitmap2(esm,famil,btmp,esm) Next cur.Close End Sub Sub Button2_Click StartActivity(act_3) End Sub Sub ListView1_ItemClick (Position As Int, Value As Object) cur=sql1.ExecQuery("select alamat from tbl1") cur.Position=Position If cur.GetString("alamat")="0" Then sql1.ExecNonQuery("update tbl1 set alama'1' where esm='"&Value&"'") Else sql1.ExecNonQuery("update tbl1 set alama'0' where esm='"&Value&"'") End If ListView1.Clear Button1_Click End Sub Sub ListView1_ItemLongClick (Position As Int, Value As Object) sql1.ExecNonQuery("delete from tbl1 where esm='"&Value&"'") ListView1.RemoveAt(Position) End Sub Sub Button3_Click cur=sql1.ExecQuery("select esm from tbl1 where esm like '%" & EditText1.Text & "%'") Dim btmp As Bitmap If alamat=0 Then btmp.Initialize(File.DirAssets,"fab.png") Else btmp.Initialize(File.DirAssets,"fa.png") End If If cur.RowCount>0 Then Dim m As String m="نتایج به دست آمده "&CRLF For i=0 To cur.rowcount-1 cur.Position=i m=m&CRLF m=m&cur.GetString("esm") Next ToastMessageShow(m,False) Else ToastMessageShow("جستجو نتیجه ای نداشت",False) End If End Sub فکر نکنم خیلی مشکل باشه ... لطفا کمک کنید
×
×
  • اضافه کردن...