Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,027

HOME > .NET Framework > Forum > WinApp ช่วยดูโค้ดให้หน่อยครับ พอเลือน scrollbar เพื่อ ขยายขนาดแล้ว ปุ่มไม่เลื่อนตามครับ



 

WinApp ช่วยดูโค้ดให้หน่อยครับ พอเลือน scrollbar เพื่อ ขยายขนาดแล้ว ปุ่มไม่เลื่อนตามครับ

 



Topic : 130635



โพสกระทู้ ( 4,434 )
บทความ ( 23 )



สถานะออฟไลน์
Facebook



พอดีลองทำตามโค้ดนี้อยู่ครับ

https://www.thaicreate.com/community/vb-datagridview-textbox-button.html

แต่เวลาขยายขนาดคอลัมน์ ปุ่มมันไม่ไปตาม แต่อยู่ที่เดิมครับ



Tag : .NET, C#, VS 2013 (.NET 4.x)







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2018-03-21 23:12:34 By : lamaka.tor View : 1161 Reply : 13
 

 

No. 1



โพสกระทู้ ( 74,058 )
บทความ ( 838 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

มันมี Property อยู่น่ะครับ ประมาณว่า Fixed หรือว่าจะขยายไปตามขนาดของหน้าจอครับ






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-22 17:41:08 By : mr.win
 


 

No. 2

Guest


@lamaka.tor
--- มันไม่ง่ายที่จะทำ (ในเวลาที่จำกัด)
--- และมันคงไม่ยากเกินไปสำหรับคุณ (ถ้ามีเวลาพอ)

ผมมีโฟกัสหลายจุด แต่หนึ่งในนั้นไม่มีคำว่า "Windows Application" ปะปนอยู่ (แน่นอนว่าบางกรณีผมอาจจำเป็นต้องใช้มัน/เขียนเอง)

ผมแอบชื่นชมคุณนะ(สมัยผมยังเป็นเด็กฯ อายุไกล้ฯ 40 ณ.ตอนนั้น) (ผมแยกแยะออกเสมอ โดยแต่ละเหตุผล/สถานะการณ์)

Good Luck.


ปล. ...
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-22 17:55:21 By : หน้าฮี
 

 

No. 3

Guest


จาก #NO 2 ถ้านับอายุจริงผมก็คงจะมากกว่าพวกคุณทุกฯคน (ไม่ยกเว้นแม้แต่ Admin/Chinaha/etc...)
--- ผมคิดถึงหลายฯคน อทิเช่น "คุณห้ามตอบเกินวันละสองกระทู้" (แต่ผมไม่มีวาสนาที่จะได้เจอเขาในชีวิตจริง)
------ แน่นอนว่า ผมมองในเง่มุมที่ดีดีเสมอสำหรับมนุษย์คนหนึ่ง
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-22 18:08:41 By : หน้าฮี
 


 

No. 4

Guest


@lamaka.tor ถ้าคุณคิดแบบธรรมชาติ ด้วยวัยอายุของผม
--- มันไม่ควรที่จะเขียนโปรแกรม (เอาให้สุดฯ ควรจะตายไปตั้งนานแล้ว) ถ้าคุณยังสงสัย

มันมีคำอธิบายได้ว่า "หลังความตาย" มักจะมีคนกล่าวถึงคนคนนั้นอยู่เสมอ อทิเช่น ไอสไตร์/นิวตัน/ปิกัสโซ/etc..

ชื่อเสียงมักจะมาได้หลังความตาย (อาจย้อนหลังไปอีกหลายร้อยปี ณ. วันเวลาปัจจุบัน)

+55555

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-22 18:23:16 By : หน้าฮี
 


 

No. 5



โพสกระทู้ ( 4,434 )
บทความ ( 23 )



สถานะออฟไลน์
Facebook

ตอบความคิดเห็นที่ : 1 เขียนโดย : mr.win เมื่อวันที่ 2018-03-22 17:41:08
รายละเอียดของการตอบ ::
มันออกมาเป็นแบบนี้ครับ

555

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-22 19:31:44 By : lamaka.tor
 


 

No. 6

Guest


ตอบความคิดเห็นที่ : 5 เขียนโดย : lamaka.tor เมื่อวันที่ 2018-03-22 19:31:44
รายละเอียดของการตอบ ::
ของผมขึ้นยุนะพี่
66

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-23 16:31:37 By : JK
 


 

No. 7



โพสกระทู้ ( 4,434 )
บทความ ( 23 )



สถานะออฟไลน์
Facebook

ตอบความคิดเห็นที่ : 6 เขียนโดย : JK เมื่อวันที่ 2018-03-23 16:31:37
รายละเอียดของการตอบ ::
ลากขนาดขนาด แล้ว มันเปลี่ยนด้วยไม๊ครับ รึว่ายังอยู่ที่เดิม


แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-23 16:34:36 By : lamaka.tor
 


 

No. 8



โพสกระทู้ ( 47 )
บทความ ( 0 )



สถานะออฟไลน์


ตอบความคิดเห็นที่ : 7 เขียนโดย : lamaka.tor เมื่อวันที่ 2018-03-23 16:34:36
รายละเอียดของการตอบ ::
ปรับขนาดดูมันก็เปลี่ยนตามตลอดนะครับ พอรัน

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-24 08:10:04 By : 1354452254604116
 


 

No. 9



โพสกระทู้ ( 4,434 )
บทความ ( 23 )



สถานะออฟไลน์
Facebook

มันก็แปลกนะครับผมก๊อบโค้ดมาวางเลย

อันนี้รูปก่อนที่จะลาก ขยาย คอลัมน์
1

อันนี้คือ หลังจากที่ ผมลากเพื่อขยาย คอลัมน์

2

Code (VB.NET)
Public Class Form1
    Private btnSelector As New Button()
    'สร้าง Buttnon
    Private pCase As Integer
    'สำหรับ เก็บส่วนของการเลือก Column

    Private Sub SelectorClick(ByVal sender As Object, ByVal e As EventArgs)
        Select Case pCase
            Case 1
                'value from dataGridView1_CellEnter
                If True Then
                    MessageBox.Show("Show Dialog here!!")
                    Exit Select
                End If
        End Select
    End Sub

    Private Sub CreateButton(ByRef myButton As Button)
        myButton.FlatStyle = FlatStyle.Flat
        myButton.FlatAppearance.BorderSize = 0
        myButton.Size = New Size(30, 19)
        myButton.ImageAlign = ContentAlignment.MiddleCenter
        myButton.FlatAppearance.MouseDownBackColor = Color.Transparent
        myButton.FlatAppearance.MouseOverBackColor = Color.Transparent
        myButton.BackColor = Color.Transparent
        myButton.Image = WindowsApplication1.My.Resources.finds
        ' myButton.Image = Image.FromFile(CurDir() + "\pic\SearchBc.png")

        'กำหนดรูปภาพ
        myButton.Hide()
        AddHandler myButton.Click, New EventHandler(AddressOf Me.SelectorClick)
        '--------------------------------------------
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        CreateButton(btnSelector)
        DataGridView1.Controls.Add(btnSelector)
    End Sub

    Private Sub DataGridView1_CellEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEnter
        If e.ColumnIndex = 0 Then

            pCase = 1
            Dim Loc As Rectangle = DataGridView1.GetCellDisplayRectangle(e.ColumnIndex, e.RowIndex, False)
            Dim Wid As Integer = DataGridView1.CurrentCell.Size.Width
            btnSelector.Location = New Point(Loc.X - 25 + Wid, Loc.Y)
            btnSelector.Show()
        End If
    End Sub

    Private Sub DataGridView1_CellLeave(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellLeave
        If btnSelector.Focused <> True Then
            btnSelector.Hide()
        End If

    End Sub
End Class

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-24 09:43:11 By : lamaka.tor
 


 

No. 10



โพสกระทู้ ( 14 )
บทความ ( 0 )



สถานะออฟไลน์


ผมดูโค้ดจากที่ให้มาเหมือนกับว่ามันขาดไปบางอย่าง จริงอยู่ที่สร้างปุ่มให้แสดงมาใน Even CellEnter
ตอนขยายคอลัมภ์ให้ถึงแม้ว่า Cell ที่ถูกเลือกจะอยู่ที่เดิมก็ตามเพราะคำสั่งมันถูกทำไปแล้วตอนเลือก Cell ครั้งแรก
จึงเป็นสาเหตุว่าทำไมปุ่มมันถึงไม่ย้ายตามในขณะที่ขยายคอลัมภ์

จากโค้ดข้างบนผมลองปรับดังนี้

1. ย้าย Dim Loc As Rectangle และ Dim Wid As Integer ออกจาก Even CellEnter ไปไว้ข้างบนแทน เพื่อใช้ร่วมกันกับ Even ColumnWidthChanged ที่จะสร้างให้ย้ายปุ่มตอนขยายคอลัมภ์

Code (VB.NET)
Private btnSelector As New Button()
    'สร้าง Buttnon
    Private pCase As Integer
    'สำหรับ เก็บส่วนของการเลือก Column

    Dim Loc As Rectangle 'ย้ายมาข้างบน เพื่อใช้กับ DataGridView1_ColumnWidthChanged
    Dim Wid As Integer 'ย้ายมาข้างบน เพื่อใช้กับ DataGridView1_ColumnWidthChanged


2. ปรับโค้ดใน Even CellEnter

Code (VB.NET)
Private Sub DataGridView1_CellEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEnter
        If e.ColumnIndex = 0 Then

            pCase = 1
            Loc = DataGridView1.GetCellDisplayRectangle(e.ColumnIndex, e.RowIndex, False)
            Wid = DataGridView1.CurrentCell.Size.Width
            btnSelector.Location = New Point(Loc.X - 30 + Wid, Loc.Y)
            btnSelector.Show()
        End If
    End Sub


3. เพิ่ม Event ColumnWidthChanged สำหรับย้ายปุ่มตอนขยายคอลัมภ์

Code (VB.NET)
Private Sub DataGridView1_ColumnWidthChanged(sender As Object, e As DataGridViewColumnEventArgs) Handles DataGridView1.ColumnWidthChanged

        Loc = DataGridView1.GetCellDisplayRectangle(0, DataGridView1.CurrentRow.Index, False)
        Wid = DataGridView1.CurrentCell.Size.Width
        btnSelector.Location = New Point(Loc.X - 30 + Wid, Loc.Y)

    End Sub


ผลของการทดสอบ

ก่อนขยาย
T1

หลังขยาย
T02


ประวัติการแก้ไข
2018-03-24 13:02:33
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-24 12:26:26 By : Itsaret
 


 

No. 11



โพสกระทู้ ( 4,434 )
บทความ ( 23 )



สถานะออฟไลน์
Facebook

ตอบความคิดเห็นที่ : 10 เขียนโดย : Itsaret เมื่อวันที่ 2018-03-24 12:26:26
รายละเอียดของการตอบ ::
แบบนั้นใช่เลยครับ



แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-24 14:59:29 By : lamaka.tor
 


 

No. 12

Guest


Quote:
รบกวนผู้ชำนาญการหน่อยครับ ขอบคุณมากครับ
(สำหรับผู้ที่เข้ามาแดกดัน ถากถางคนอื่น ดูถูกคนอื่นขอให้ผ่านไปเลยครับ ไม่อยากให้เว็บดีๆมีเรื่องแย่ๆครับ)


ขำดีว่ะไอ้พวกปัญญาอ่อน รกโลกงานโปรแกรมมิ่ง

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-24 23:50:39 By : หน้าฮี
 


 

No. 13

Guest


ทุกวันนี้มีใครเขาโง่ใช้ Web service บ้างว่ะ +55555
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2018-03-25 00:00:10 By : หน้าฮี
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : WinApp ช่วยดูโค้ดให้หน่อยครับ พอเลือน scrollbar เพื่อ ขยายขนาดแล้ว ปุ่มไม่เลื่อนตามครับ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 01
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2024 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่