2 x DXE_Tabpage : Bemerkung

Fragen rund um diverse Windows-Versionen, ihr Verhalten unter Xbase++ und den Umgang mit der API

Moderator: Moderatoren

2 x DXE_Tabpage : Bemerkung

Beitragvon AUGE_OHR » Do, 12. Mär 2015 2:36

man kann ja 2 x XbpTabpage() auf einer DrawingArea haben.

wenn man DXE_Tabpage benutzt gibt es DXE_TabCtl() und die Method o:AddItem.
nun wir das Tabpage Control durch DXE_TabCtl() repräsentiert also nur 1 x während es bis zu 255 Tabs + Body haben kann.

wenn man also 2 x DXE_Tabpage haben will so muss man 2 eigene Class schreiben wo man DXE_Tabpage() einbaut.
Code: Alles auswählen
   ::oViewLeft  := TabViewLeft():New():Create()
   ::oViewRight := TabViewRight():New():Create()

   ::oViewLeft:AddTab("Left", nIcon1)
   ::oViewRight:AddTab("Right,nIcon2)


CLASS TabViewLeft  FROM XbpDialog
   CLASS VAR oTabCtl            // nur 1 x mal für alle
   CLASS VAR aTabs              // nur 1 x mal für alle
INLINE METHOD Init( oParent,oOwner,aPos,aSize,aPresParam,lVisible )
INLINE METHOD Create( oParent,oOwner,aPos,aSize,aPresParam,lVisible )
INLINE METHOD Destroy()
INLINE METHOD AddTab(cCaption,nRes)

CLASS TabViewRight  FROM XbpDialog
   CLASS VAR oTabCtl            // nur 1 x mal für alle
   CLASS VAR aTabs              // nur 1 x mal für alle
INLINE METHOD Init( oParent,oOwner,aPos,aSize,aPresParam,lVisible )
INLINE METHOD Create( oParent,oOwner,aPos,aSize,aPresParam,lVisible )
INLINE METHOD Destroy()
INLINE METHOD AddTab(cCaption,nRes)
DXE_DualTabView.JPG
DXE_DualTabView.JPG (184.67 KiB) 875-mal betrachtet
gruss by OHR
Jimmy
Benutzeravatar
AUGE_OHR
Marvin
Marvin
 
Beiträge: 10205
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg

Zurück zu Windows, API

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 1 Gast

cron