Ventana semitrasparente

Post Reply
User avatar
mastintin
Posts: 1516
Joined: Thu May 27, 2010 2:06 pm

Ventana semitrasparente

Post by mastintin »

Ventana semitrasparente siempre en primer plano y con esquinas redondeadas igual a la de las notificaciones del sistema ( enlaces ratones inalambricos y demas ) .
Image
User avatar
Antonio Linares
Site Admin
Posts: 42398
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Has thanked: 10 times
Been thanked: 47 times
Contact:

Re: Ventana semitrasparente

Post by Antonio Linares »

Manuel,

Muy bueno! :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
mastintin
Posts: 1516
Joined: Thu May 27, 2010 2:06 pm

Re: Ventana semitrasparente

Post by mastintin »

Por cierto , el codigo de fivemac que lo genera :

Function redondo()
local oDlg
local oimage
DEFINE WINDOW oDlg FROM 20, 100 TO 320, 260 ROUNDED
@ 40, 40 IMAGE oImage OF oDlg SIZE 220, 220 FILENAME respath()+"/"+"PrefApp.tiff"
ACTIVATE WINDOW oDlg
Return nil
User avatar
karinha
Posts: 7915
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil
Been thanked: 3 times
Contact:

Re: Ventana semitrasparente

Post by karinha »

En que version esto funciona? Solo en FiveMac?

Gracias.

Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
Antonio Linares
Site Admin
Posts: 42398
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Has thanked: 10 times
Been thanked: 47 times
Contact:

Re: Ventana semitrasparente

Post by Antonio Linares »

Estimado Joao,

Code: Select all | Expand

#include "FiveWin.ch"

function Main()

   local oWnd 

   DEFINE WINDOW oWnd 

   oWnd:nOpacity = 70

   ACTIVATE WINDOW oWnd CENTERED

return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com
Post Reply