Or without plugin something like this in your Window.Paint event:

  dim offX as integer=me.Left
  dim offY as integer=me.Top
  dim b as integer=me.Width
  dim h as integer=me.Height
  dim p as Picture=NewPicture(b,h,32)
  dim r as RGBSurface=p.RGBSurface
  b=b-1
  h=h-1
  for x as integer=0 to b
    for y as integer=0 to h
      r.Pixel(x,y)=system.Pixel(x+offx,y+offy)
    Next
  next
  dim m(255) as integer
  for i as integer=0 to 255
    m(i)=i\2
    //m(i)=(512-i)\2
  next
  r.Transform(m)
  g.DrawPicture p,0,0




Am 12.10.2006 um 16:43 schrieb Christian Schmitz:

Trausti Thor Johannsson <[EMAIL PROTECTED]> wrote:

Hey,

Is there any simple way of making a window in real basic that would
look like the one you see when you cmd-tab ?

The MBS Plugins allow you to make custom windows like that.

either using an existing RB window made transparent or using an overlay
window.

Gruß
Christian

--
Around eleven thousand functions in one REALbasic plug-in.
The Monkeybread Software Realbasic Plugin v6.3. Now universal!
<http://www.monkeybreadsoftware.de/realbasic/plugins.shtml>
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>


_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to