[ابو انس]

(17-12-21, 11:20 PM)سعود كتب :

إقتباس :يعني ممكن بدل من ايجاد احداثيات مؤشر الكتابة ان نقوم بايجاد احدثايات الخلية الحالية في داتا جريد فيو والتي نقوم بالكتابة بها

اخي الكريم ... الوضع يختلف الان!
تحديد موضع خلية له احداثيتان صف و عمود
نقطة تقاطعها تمثل خلية.

شوف كود بسيط جدا و اعتذر[لقد اكثرت من الاعتذار]

اهلا سعود شكرا جزيلا لك
لكن انت كتبت اخر مشاركتك الجملة التالية /شوف كود بسيط جدا و اعتذر/
لماذا تعتذر انت والزملاء تفيدونني
وكلمة شوف كود بسيط   ... اين الكود ؟؟؟ هناك رمزين لصورتين ولكن الصور لا تظهر  لا اعرف ما المشكلة
لا اعرف اذا كان هناك مشكلة بالمنتدى لاني اليوم حاولت كثيرا ارفاق مثال صغير ولكن يظهرلي رسالة خطأ
على كل حال سأرفق الكود

كود :

   Private Sub DGV_CellEnter(sender As Object, e As DataGridViewCellEventArgs) Handles DGV.CellEnter
       Dim columnName As String = DGV.Columns(e.ColumnIndex).Name

       If columnName = "ITEME" Then
           Dim RowHeight1 As Integer = DGV.Rows(e.RowIndex).Height
           Dim CellRectangle1 As Rectangle = DGV.GetCellDisplayRectangle(e.ColumnIndex, e.RowIndex, False)

           Dim DisplayPoint1 As Point = PointToScreen(New Point(CellRectangle1.X, CellRectangle1.Y))

           TextBox1.Text = DisplayPoint1.ToString
           ListBox1.Location = New Point(CellRectangle1.X, CellRectangle1.Y)
       End If
   End Sub

ارجو التعديل على الكود بحيث تظهر الليست بوكس في المكان المناسب مثلا تحت الخلية التي يتم الكتابة بها
....
تعديل //نجحت في ارفاق المثال المثال في المرفقات