Drag-Drop di un testo da una cella di una GridView ad una cella di un'altra GridView
Da Gambas-it.org - Wikipedia.
Versione del 22 ott 2013 alle 12:49 di Vuott (Discussione | contributi) (Creata pagina con 'Mostriamo un semplice esempio per effettuare il trascinamento di un testo da una cella di una ''GridView'' e successivo rilascio in una cella di un'altra ''GridView''. '''Pub...')
Mostriamo un semplice esempio per effettuare il trascinamento di un testo da una cella di una GridView e successivo rilascio in una cella di un'altra GridView.
Public Sub Form_Open() With GridView1 .Columns.Count = 3 .Rows.Count = 3 End With GridView1[1, 0].Text = "testo qualsiasi" With GridView2 .Columns.Count = 3 .Rows.Count = 3 .Drop = True End With End Public Sub GridView1_MouseDrag() ' Preleviamo e trasciniamo il testo individuando precisamente la cella della "GridView": GridView1.Drag(GridView1[GridView1.RowAt(Mouse.Y), GridView1.ColumnAt(Mouse.X)].Text, "text/html") End Public Sub GridView2_Drop() ' Rilasciamo nella cella della seconda "GridView" il testo prelevato nella prima "GridView": GridView2[GridView2.RowAt(Drag.Y), GridView2.ColumnAt(Drag.X)].Text = Drag.Data End