I'm trying to make a custom shaped window with some code from the NUG. Why 
isn't the following code doing anything?

 Sub Constructor()
  
  dim t As integer = self.MakeTransparentMBS
  
  self.HasNoTitleBarMBS = true
  self.HasBorderMBS = false
  
  self.Height = dropdownmask.Height
  self.Width = dropdownmask.Width
  dim context as CGContextMBS = self.CGContextMBS
  context.ClearRect(CGRectMBS.Make(0, 0, dropdownmask.Width, 
dropdownmask.Height))
  context.DrawPicture(CGCreateImageMBS(dropdown, dropdownmask), 
CGMakeRectMBS(0, 0, self.width, self.Height))
  
  'self.NSWindowMBS.Level = NSWindowMBS.NSMainMenuWindowLevel   //between the 
menubar and the status items!
  
End Sub

What is the last commented out line doing? It gives a syntax error.

dropdown and dropdownmask are my images. I saw that the mask needs to be white 
in the foreground and black in the background.

RealStudio 2011r4, Mac OS 10.8, MBS plugins from 22.12.2012.


Mit freundlichen Grüßen/Regards

Trixi Willius

http://www.mothsoftware.com
Mail Archiver X: The email archiving solution for professionals

_______________________________________________
Mbsplugins_monkeybreadsoftware.info mailing list
[email protected]
https://ml01.ispgateway.de/mailman/listinfo/mbsplugins_monkeybreadsoftware.info

Reply via email to