درخواست یه Data Graid قوی و زیبا

[حمید زارع 331]

با سلام

کسی یه Data Graid قوی و زیبا سراغ داره ؟

خیلی ضروریه .

[حمید زارع 331]

حالا میفهمم وقتی میگن تحریم باعث پیشرفت میشه یعنی چه !!!

تحریم:o:S:o:S:o:S:o>>==============>> پیشرفت *hendoone*

خودم نوشتمش

Private Sub Cell_LongClick	Dim rc As RowCol	Dim l As Label	l = Sender	rc = l.Tag	SelectRow(rc.Row)	If SubExists(Callback, Event & "_CellLongClick") Then		CallSub3(Callback, Event & "_CellLongClick", rc.Col, rc.Row)	End IfEnd Sub

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

بله همینه دوست عزیز *laugh2*

هر محدودیتی یک پلی برای پیشترفت انسانه *laugh2*

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

امیدوارم که توی همه ی مراحل چه زندگی و چه برنامه نویسی بتونی همینجوری راه حلو پیدا کنی. *solh*

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

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

ببینید واسه اون 2 تا رویداد کدی نوشته با این شکل :

[b]
Private Sub Cell_Click
   Dim rc As RowCol
   Dim l As Label
   l = Sender
   rc = l.Tag
   SelectRow(rc.Row)
   If SubExists(Callback, Event & "_CellClick") Then
       CallSub3(Callback, Event & "_CellClick", rc.Col, rc.Row)
   End If
End Sub

Private Sub Header_Click
   Dim l As Label
   Dim col As Int
   l = Sender
   col = l.Tag
   If SubExists(Callback, Event & "_HeaderClick") Then
       CallSub2(Callback, Event & "_HeaderClick", col)
   End If
End Sub[/b]

خودت باید یک رویداد توی کلاس ماژول واسش تعریف کنی.

[حمید زارع 331]

کسی نمیتونه کمک کنه ؟

[حمید زارع 331]

کسی دیتا گرید قویتر سراغ نداره ؟

*vibre**vibre**vibre**vibre**vibre**vibre**vibre**vibre*