Leaderboard
Popular Content
Showing content with the highest reputation on 08/08/2014 in all areas
-
São tantos os nomes mas todos levam a uma pessoa sóm um kra caridoso, as vezes corintiano, na maioria das vezes gentil e sempre a disposição, meu kro todas essas palavras para te parabeniza-lo pelo dia de hoje, que em sua vida sempre aconteça o melhor, saúde, paz, amor(es) e muitos bits para escovar. Parabéns Karinha Kapiaba Kapi João Santos.1 point
-
Já pensou em usar o kbmake que vem junto com o xHarbour ?1 point
-
mas eu nao tenho interesse no envio de email....1 point
-
Eu mando o arquivo error.log via ftp para um servidor meu....1 point
-
Fala Tranka.... Parabéns pelo niver. Desejo que esta data se repita por muitos e muitos anos, sempre repletos de muita Paz, Saúde, Carinho e Realizações. abração.1 point
-
Parabéns João Santos.... Abraços.1 point
-
Olá, Grande Vagner, blz? Como é este "trem"?1 point
-
Efeito transparencia em Dialog quando fora de focus
Dr.Microso reacted to SAOliveira for a topic
Uso a do Vagner com algumas adaptações para mim. O resultado é o mesmo, e bem resumida a função. **------------------------------------------------------------------------------** ** Finalidade : Setar a transparencia em dialogs ** Parametros : 1 = Dialog origem ** 2 = Fator da transparencia de 0 at-e 255 ** Original : Vagner ** Alterado : SAOliveira **------------------------------------------------------------------------------** #include "Fivewin.ch" **------------------------------------------------------------------------------** FUNCTION PCS_SetTransparencia(tDlg) **------------------------------------------------------------------------------** SETWINDOWLONG( &(tDlg):hWnd, -20,NOR( GETWINDOWLONG( &(tDlg):hWnd,-20 ), 524288 ) ) SETLAYEREDWINDOWATTRIBUTES( &(tDlg):hWnd, , 255, 2 ) RETURN(NIL) **------------------------------------------------------------------------------** FUNCTION PCS_Transparencia(tDlg) **------------------------------------------------------------------------------** SETLAYEREDWINDOWATTRIBUTES( &(tDlg):hWnd, , 155, 2 ) SysRefresh() RETURN(NIL) **------------------------------------------------------------------------------** FUNCTION PCS_VTransparencia(tDlg) **------------------------------------------------------------------------------** SETLAYEREDWINDOWATTRIBUTES( &(tDlg):hWnd, , 255, 2 ) SysRefresh() RETURN(NIL) DLL32 FUNCTION SetLayeredWindowAttributes( hWnd As LONG, crKey As LONG,; bAlpha As LONG, dwFlags As LONG ) AS LONG PASCAL ; FROM "SetLayeredWindowAttributes" lib "user32.DLL"1 point
