گرفتن موقعیت لیست ویو برای حذف و ویرایش

[imajid 1]

سلام بچه ها امیدوارم که حالتون خوب باشه.

برای نوشتن یک برنامه ای مثل دفترچه تلفن با دیتابیس ، من یک لیست ویو دارم که یک سری اطلاعات توی اون هستش که با 3 تا دکمه میخوام 3 عمل (اضافه کردن و ادیت کردن و حذف را انجام بدم) . 

حالا ببینید من اضافه کردن را پیاده کردم ولی موندم که چطوری وقتی مثلا دکمه حذف را میزنم بتونم اون ردیف از لیست ویو را توی دیتابیس حذف کنم

میدونم باید یک چیزی مثل چک باکس اضافه کنم ولی موندم چطوری ؟ ممنون میشم راهنمایی کنید

[aririkateki 11]

سلام دوستان

 

منم همین مشکل را دارم اگه ممکنه راهنمایی بفرمایید

[Nemesis 1,846]

شما دقیقا کدوم ردیف رو می خوای حدف کنی

 

دکمه حذف در چه قسمتی هست ؟

[aririkateki 11]

فرم من قراره یه لیست ویو داشته باشه یه دکمه حذف.

لیست ویو اطلاعات پایگاه داده را نمایش میدهد.

یه خط از لیست ویو را که انتخاب میکنیم و دکمه حذف را میزنیم رکورد معادل در جدول پایگاه داده نیز حذف شود.

[aririkateki 11]

توی فرم من یک لیست ویو هست که اطلاعات جدول پایگاه داده را نمایش میدهد.

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

[shahab.es 5,429]

سلام برادرم

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

اول بگید به من که از singleline اتستفاده میکنید یا single line 2

اگر از singleline2 (که بهتر هم هست) استفاده میکنید......

یه متغیر تعریف کنید در Process Globals به اسم Meghdar

Dim meghdar as string

 

در رویداد کلیک لیست ویو، میاین و به این صورت عمل میکنید...

meghdar = value

در رویداد کلیک دکمه تون،  به این شکل عمل میکنید

sql1.exenonquery("DELETE FROM tbl WHERE id = " meghdar)

موفق باشید...

[aririkateki 11]

ممنون

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

cur = db.ExecQuery("SELECT * FROM tblnumber")
	cur.Position = cur.RowCount-1
	ListView1.AddSingleLine(cur.GetString("id")&"-"&cur.GetString("number")&"-"&cur.GetString("text")&"-"&cur.GetString("test"))

[مجید آرتا 5,874]

سلام

روشی که شهاب گفتن رو انجا بدید میشه راخت انجام داد.

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

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

خب یک همچین کدی میشه :

Sub lv_ItemLongClick (Position As Int, Value As Object)
	Dim r As Int = Msgbox2("آیا قصد دارید این رکورد را حذف کنید","پیغام","بله","","خیر",LoadBitmap(File.DirAssets,"del.png"))
	 If r = DialogResponse.POSITIVE Then
		SQL.ExeNonQuery("DELETE FROM tbl1 WHERE id="&Value)
		lv.RemoveAt(Position)
	Else If (r = DialogResponse.NEGATIVE) Then
	     Return
	End If
End Sub

ببینید این Valu  همون مقدار Return Value  هستش که موقع ADD  کردن رکورد بهش نسبت میدید.

[shahab.es 5,429]

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

cur = db.ExecQuery("SELECT * FROM tblnumber")
	cur.Position = cur.RowCount-1
	ListView1.AddSingleLine2(cur.GetString("id")&"-"&cur.GetString("number")&"-"&cur.GetString("text")&"-"&cur.GetString("test"),cur.getint("id"))