Új hozzászólás Aktív témák
-
Shievone
újonc
Sziasztok,
A következő problémával találtam szembe magam:
Adott egy winform és rajta két darab TabControl komponens. Az egyik TabControl-on pedig van néhány TabPage. Két dolgot szeretnék megoldani:
1) A TagPage-ek sorba rendezhetők legyenek adott TabControl-on belül. (drag&drop technika)
2) A TabPage áthelyezhető legyen egyik TabControl-ból a másikba és akár vissza. (drag&drop technika)
Az 1) már készen van. Erre létrehoztam egy saját komponenst az alábbi kóddal, viszont a 2) ponthoz még a neten sem találtam használható infó:
public partial class customTabControl : TabControl
{
public customTabControl()
{
InitializeComponent();
this.AllowDrop = true;
}
protected override void OnMouseDown(MouseEventArgs e)
{
int hoverTabPageIndex = this.getHoverTabIndex();
if (hoverTabPageIndex >= 0)
{
this.Tag = this.TabPages[hoverTabPageIndex];
}
}
protected override void OnMouseUp(MouseEventArgs e)
{
this.Tag = null;
}
protected override void OnMouseMove(MouseEventArgs e)
{
if (e.Button != MouseButtons.Left || this.Tag == null) return;
TabPage draggedTabPage = (TabPage)this.Tag;
this.DoDragDrop(draggedTabPage, DragDropEffects.All);
}
protected override void OnDragOver(DragEventArgs e)
{
if (e.Data.GetData(typeof(TabPage)) == null) return;
TabPage draggedTabPage = (TabPage)e.Data.GetData(typeof(TabPage));
int draggedTabPageIndex = this.TabPages.IndexOf(draggedTabPage);
int hoverTabPageIndex = this.getHoverTabIndex();
if (hoverTabPageIndex < 0) { e.Effect = DragDropEffects.None; return; }
TabPage hoverTabPage = this.TabPages[hoverTabPageIndex];
e.Effect = DragDropEffects.Move;
if (draggedTabPage == hoverTabPage) return;
Rectangle dragTabPageRect = this.GetTabRect(draggedTabPageIndex);
Rectangle hoverTabPageRect = this.GetTabRect(hoverTabPageIndex);
if (dragTabPageRect.Width < hoverTabPageRect.Width)
{
Point tcLocation = this.PointToScreen(this.Location);
if (draggedTabPageIndex < hoverTabPageIndex)
{
if ((e.X - tcLocation.X) > ((hoverTabPageRect.X + hoverTabPageRect.Width) - dragTabPageRect.Width))
this.swapTabPages( draggedTabPage, hoverTabPage);
}
else if (draggedTabPageIndex > hoverTabPageIndex)
{
if ((e.X - tcLocation.X) < (hoverTabPageRect.X + dragTabPageRect.Width))
this.swapTabPages(draggedTabPage, hoverTabPage);
}
}
else
{
this.swapTabPages(draggedTabPage, hoverTabPage);
}
this.SelectedTab = draggedTabPage;
}
private int getHoverTabIndex()
{
for (int i = 0; i < this.TabPages.Count; i++)
{
if (this.GetTabRect(i).Contains(this.PointToClient(Cursor.Position)))
return i;
}
return -1;
}
private void swapTabPages(TabPage draggedTabPage, TabPage hoverTabPage)
{
int draggedTabPageIndex = this.TabPages.IndexOf(draggedTabPage);
int hoverTabPageIndex = this.TabPages.IndexOf(hoverTabPage);
this.TabPages[hoverTabPageIndex] = draggedTabPage;
this.TabPages[draggedTabPageIndex] = hoverTabPage;
this.Refresh();
}Valakinek ötlete esetleg?
Előre is köszönök minden építő jellegű hozzászólást.
Új hozzászólás Aktív témák
● ha kódot szúrsz be, használd a PROGRAMKÓD formázási funkciót!
- Samsung Galaxy Z Fold7 - ezt vártuk, de…
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Trollok komolyan
- Hardcore café
- Google Pixel topik
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- lkristóf: Prohardver fórum userscript – hogy lásd, mikor neked válaszoltak
- God of War - Kratos színésze szerint félrevezető lehet az első forgatási kép?
- Mesterséges intelligencia topik
- Mikrotik routerek
- További aktív témák...
- FANTASZTIKUS áron eladó dobozos új Hp Laptop 17 /Ryzen 5-7520U/16 GB RAM /512 SSD/FHD/IPS/Garancia/
- Corsair 2x16GB 3600MHz (32GB) Vengeance RGB RS DDR4 kit / 105Hó Alza.hu garancia / Beszámítás OK!
- Erős (Lenovo LOQ) gamer Laptop! -i7 13650HX, RTX 4060 8gb, 16gb DDR5, 1tb SSD
- msi Vector 17 HX Nagyképernyős Gamer laptop 17" -35% i9-14900HX 16/1TB RTX 4070 8GB QHD+ 240Hz
- TCL 65C79K MiniLED 144hz Bang&Olufsen
- BESZÁMÍTÁS! GIGABYTE B550M R7 5700X 32GB DDR4 512GB SSD RTX 4070 Super 12GB NZXT H510i NZXT 850W
- ÚJ/BONTATLAN Microsoft Surface Laptop 7 X Elite 16GB 512GB
- PCIe 5.0/4.0/3.0 Riser kábelek 90-os hajlított csatlakozóval (220mm/300mm)
- -68%OFF HP Spectre x360 14 (14-ef2276ng) i7-1355U/16GB/1TBSSD/3K 3000X2000 Amoled
- Creality HALOT ONE gyantás nyomtató
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
