New topic: 

Tooltip with OverlayMBS

<http://forums.realsoftware.com/viewtopic.php?t=37384>

         Page 1 of 1
   [ 1 post ]                 Previous topic | Next topic          Author  
Message        matt86          Post subject: Tooltip with OverlayMBSPosted: Wed 
Feb 02, 2011 7:30 am                         
Joined: Sun Apr 11, 2010 4:33 am
Posts: 10                Hi, 
guys how can create a tooltip like this with OverlayMBS?



I write this, but i don't now how add the arrow and the close button, can you 
help me?

Code:Sub CreateToolTip(wBox as integer, hBox as integer, b as Boolean)
 Dim hRect, wRect, lButton, tButton as integer
 wRect = wBox-200
 hRect = hBox-30
 lButton = (toolWin.popupFormati.frameLeft-toolWin.popupFormati.frameWidth)
 tButton = (toolWin.popupFormati.frametop+toolWin.popupFormati.frameHeight)*1.7

 pTT = new Picture(wBox,hBox,32)
 mTT = new Picture(wBox,hBox,32)
 oTT = new toolTipLocalita(lButton,tButton,wBox,hBox,b)
 oTT.Pict = pTT
 oTT.Mask = mTT
 oTT.Show
 TimerOverlay.Mode=2
 dim pg as Graphics = oTT.Pict.Graphics
 dim mg as Graphics = oTT.Mask.Graphics
 pg.ForeColor=&c000000
 pg.FillRoundRect 190,10,wRect,hRect,50,50
 pg.ForeColor=&c000000
 dim stp as StyledTextPrinter
 stp = txtToolTip.StyledTextPrinter(pg,wRect-20)
 stp.DrawBlock wBox-wRect,30,hRect-20
 mg.ForeColor=&c333333
 mg.FillRoundRect 190,10,wRect,hRect,50,50
End Sub


Thanks   
                             Top            Display posts from previous: All 
posts1 day7 days2 weeks1 month3 months6 months1 year Sort by AuthorPost 
timeSubject AscendingDescending          Page 1 of 1
   [ 1 post ]      
-- 
Over 1500 classes with 29000 functions in one REALbasic plug-in collection. 
The Monkeybread Software Realbasic Plugin v9.3. 
http://www.monkeybreadsoftware.de/realbasic/plugins.shtml

[email protected]

Reply via email to