Ventana semitrasparente siempre en primer plano y con esquinas redondeadas igual a la de las notificaciones del sistema ( enlaces ratones inalambricos y demas ) .
Ventana semitrasparente
- 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
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
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
- karinha
- Posts: 7915
- Joined: Tue Dec 20, 2005 7:36 pm
- Location: São Paulo - Brasil
- Been thanked: 3 times
- Contact:
Re: Ventana semitrasparente
En que version esto funciona? Solo en FiveMac?
Gracias.
Regards, saludos.
Gracias.
Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
- 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
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