PDA

View Full Version : کلیک بروی یه coloumn



bebakhshid
شنبه 28 خرداد 1384, 18:06 عصر
سلام

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

میخوام کاری کنم که اگر کاربر مثلا روی یه فیلد از رکوردی کلیک کرد مثلا فیلد 1 از رکورد 2

یه صفحه دیگه باز شود و اگر مثلا روی قیلد 2 از رکورد 2 کلیک کرد یه صفخه دیگه باز بشه

روح اله معینی زاده
یک شنبه 29 خرداد 1384, 13:17 عصر
سلام خدمت دوست گرامی

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



Try
Dim hti As DataGrid.HitTestInfo = DirectCast(sender, DataGrid).HitTest(New Point(e.X, e.Y))
Dim bmb As BindingManagerBase = _
Me.BindingContext(DirectCast(sender, DataGrid).DataSource, DirectCast(sender, DataGrid).DataMember)
If hti.Row < bmb.Count AndAlso hti.Type = DataGrid.HitTestType.Cell AndAlso _
hti.Row <> hitRow Then
If Not (Me.ToolTip1 Is Nothing) AndAlso Me.ToolTip1.Active Then
Me.ToolTip1.Active = False
End If
End If
Dim tipText As String = ""
tipText = DirectCast(sender, DataGrid)(hti.Row, hti.Column).ToString()
If tipText <> "" Then
hitRow = hti.Row
Me.ToolTip1.SetToolTip(DirectCast(sender, DataGrid), tipText)
Me.ToolTip1.Active = True
Else
hitRow = -1
End If
Catch
End Try


البته این کد محتویان یک سلول رو برای نمایش توسط ToolTip مهیا می کنه که احتمالا در همون قسمت شما بتونید با تغییر کد برنامه، از اون برای منظور خودتون استفاده کنید.

با احترام- خدانگهدار

علیرضا مداح
یک شنبه 29 خرداد 1384, 23:24 عصر
سلام .


Private Sub DataGrid1_CurrentCellChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGrid1.CurrentCellChanged
Dim IntRow, IntColumn As Integer
IntRow = DataGrid1.CurrentCell.RowNumber 'Row Number(Record Number)
IntColumn = DataGrid1.CurrentCell.ColumnNumber ' Column Number(Field Number)
If IntColumn = 1 And IntRow = 2 Then
'Do Something
End If
End Sub