_DrawTransparent

[Greek]

Hi

Instructions

expandcollapse popup

;===============================================================================
;
; Function Name:
;                  _DrawTransparentEllipse
; Description::    Let you draw a transparent Ellipse
; Parameter(s):
;                  $hwnd - Handle of GUI to work on
;                  $x - Postion x of the Ellipse
;                  $y - Postion y of the Ellipse
;                  $w - Width of the Ellipse 
;                  $h - Height of the Ellipse, If w=h it will be a circle.
;                  $Transparency - Set Transparancy of GUI ( optional )
; Requirement(s):  The Styles $WS_EX_COMPOSITED $WS_EX_LAYERED
; Return Value(s): Returns a windows handle.
; Author(s):       Greek, martin
; Example :        Yes
;===============================================================================

;===============================================================================
;
; Function Name:   
;                  _DrawTransparentRect
; Description::    Let you draw a transparent Rect
; Parameter(s):
;                  $hwnd - Handle of GUI to work on
;                  $x - Postion x of the Rect
;                  $y - Postion y of the Rect
;                  $w - Width of the Rect
;                  $h - Height of the Rect, If w=h it will be a square.
;                  $Transparency - Set Transparancy of GUI ( optional )
; Requirement(s):  The Styles $WS_EX_COMPOSITED $WS_EX_LAYERED
; Return Value(s): Returns a windows handle.
; Author(s):       Greek, martin
;===============================================================================

;===============================================================================
;
; Function Name:   
;                  _DrawTransparentLine
; Description::    Let you draw a transparent Line
;                  Lines must be drawed first and can't used dynamical!!.
; Parameter(s):
;                  $hwnd - Handle of GUI to work on
;                  $x - Postion x of the Line
;                  $y - Postion y of the Line
;                  $length - length of the Line
;                  $course - course of the Line
;                  $pensize - The pensize, default is 2 ( optional )
;                  $Transparency - Set Transparancy of GUI ( optional )
; Requirement(s):  Layered Windows ( $WS_EX_LAYERED )
; Return Value(s): ControlID of the Form
; Author(s):       Greek, martin
;===============================================================================

;===============================================================================
;
; Function Name:   
;                  _DeletTransparentForm
; Description::    Delet the Form
; Parameter(s):
;                  $Form - controlID/handle of the Form
; Return Value(s): Success: Returns 1. 
;                  Failure: Returns 0. 
; Author(s):       Greek, martin
;===============================================================================oÝ÷ Ù²'r[{öÚºÚ"µÍÚ[ÛYK[ÛÙBÚ[ÛYH ÕÚ[ÝÜÐÛÛÝ[Ë]LÉÝÂÚ[ÛYH ÑÕRPÛÛÝ[Ñ^]LÉÝÂÛØ[ÛÛÝ ÌÍÕÔ×ÑVÐÓÓTÔÒUQH[ÈÑ]Õ[Ü[[ÙJ ÌÍÚÛ    ÌÍÞ  ÌÍÞK ÌÍÝË    ÌÍÚ  ÌÍÕ[Ü[ÞOLMJBIÌÍÐÚ[QÕRPÜX]H
    ][ÝÉ][ÝË    ÌÍÝË    ÌÍÚ  ÌÍÞ  ÌÍÞK ÌÍÕÔ×ÐÒSLK   ÌÍÚÛ
BWÕÚ[TWÔÙ]^YYÚ[ÝÐ]X]Ê   ÌÍÚÛPÑQ    ÌÍÕ[Ü[ÞJBÕRTÙ]ÐÛÛÜ
PÑQ    ÌÍÐÚ[
BWÑÝZTÝ[ÛÜÈ
    ÌÍÐÚ[   ÌÍÝË    ÌÍÚ
BÕRTÙ]Ý]J
BT] ÌÍÐÚ[[[Â[ÈÑ[][Ü[ÜH
    ÌÍÑÜH
BRYÒÛ
    ÌÍÑÜJH[BIÌÍØOQÕRQ[]J    ÌÍÑÜJBBT]   ÌÍØBQ[ÙBBIÌÍØQÕRPÝ[]J  ÌÍÑÜJBBT]   ÌÍØQ[Y[[Â[ÈÑ]Õ[Ü[XÝ
    ÌÍÚÛ    ÌÍÞ  ÌÍÞK ÌÍÝË    ÌÍÚ  ÌÍÕ[Ü[ÞOLMJBIÌÍÐÚ[QÕRPÜX]H
    ][ÝÉ][ÝË    ÌÍÝË    ÌÍÚ  ÌÍÞ  ÌÍÞK ÌÍÕÔ×ÐÒSLK   ÌÍÚÛ
BWÕÚ[TWÔÙ]^YYÚ[ÝÐ]X]Ê   ÌÍÚÛPÑQ    ÌÍÕ[Ü[ÞJBÕRTÙ]ÐÛÛÜ
PÑQ    ÌÍÐÚ[
BÕRTÙ]Ý]J
BT] ÌÍÐÚ[[[Â[ÈÕÚ[TWÔÙ]^YYÚ[ÝÐ]X]Ê ÌÍÚÛ    ÌÍÚWÝ[ØÛÛÜ  ÌÍÕ[Ü[ÞHHMK    ÌÍÙÑYÙÈHË    ÌÍÚÐÛÛÜYH[ÙJBÈÙØ[BY  ÌÍÙÑYÙÈHY][Ü ÌÍÙÑYÙÈH  ][ÝÉ][ÝÈÜ  ÌÍÙÑYÙÈ   È[ ÌÍÙÑYÙÈHÂYÝ ÌÍÚÐÛÛÜY[    ÌÍÚWÝ[ØÛÛÜH^
Ý[Ê   ÌÍÚWÝ[ØÛÛÜK
B   ÌÍÚWÝ[ØÛÛÜH^XÝ]J   ÌÎNÌ ÌÎNÈ [ÈÝ[ÓZY
    ÌÍÚWÝ[ØÛÛÜ
KH  [ÈÝ[ÓZY
    ÌÍÚWÝ[ØÛÛÜËH   [ÈÝ[ÓZY
    ÌÍÚWÝ[ØÛÛÜKJB[YØØ[    ÌÍÔ]HØ[
    ][ÝÝÙÌ  ][ÝË  ][ÝÚ[ ][ÝË  ][ÝÔÙ]^YYÚ[ÝÐ]X]É][ÝË  ][ÝÚÛ    ][ÝË  ÌÍÚÛ    ][ÝÛÛÉ][ÝË    ÌÍÚWÝ[ØÛÛÜ  ][ÝØ]I][ÝË  ÌÍÕ[Ü[ÞK   ][ÝÛÛÉ][ÝË    ÌÍÙÑYÙÊBÙ[XÝØÙHÜ]Ù]ÜÜ
BØÙH  ÌÍÔ]ÌHH]Ù]Ü
ÕÚ[TWÑÙ]ÝÜ
K
BØÙH[ÙB]B[Ù[XÝ[[ÈÏOIÝ×ÕÚ[TWÔÙ]^YYÚ[ÝÐ]X]Â[ÈÕÚ[TWÑÙ]ÝÜ
BSØØ[ ÌÍØTÝ[IÌÍØTÝ[HØ[
    ][ÝÒÙ[Ì ][ÝË  ][ÝÚ[ ][ÝË  ][ÝÑÙ]ÝÜ][ÝÊBRYÜ[]Ù]ÜÜ
BT] ÌÍØTÝ[ÌB[[ÈÏOIÝ×ÕÚ[TWÑÙ]ÝÜ[ÈÑÝZTÝ[ÛÜÊ ÌÍÚÛ    ÌÍÞK ÌÍÞLK    ÌÍÞË    ÌÍÞLÊBØØ[ ÌÍÜÜË  ÌÍÜ] ÌÍÜ] ÌÍÜÜÈHÚ[Ù]ÜÊ   ÌÍÚÛ
B   ÌÍÜ]HØ[
    ÌÎNÙÙLÌ    ÌÎNË ÌÎNÛÛÉÌÎNË  ÌÎNÐÜX]TÝ[XÝÛÌÎNË ÌÎNÛÛÉÌÎNË  ÌÍÞK ÌÎNÛÛÉÌÎNË  ÌÍÞLK    ÌÎNÛÛÉÌÎNË  ÌÍÜÜÖÌK   ÌÎNÛÛÉÌÎNË  ÌÍÜÜÖÌ×K ÌÎNÛÛÉÌÎNË  ÌÍÞË    ÌÎNÛÛÉÌÎNË  ÌÍÞLÊBY ÌÍÜ]ÌH[ ÌÍÜ]HØ[
    ÌÎNÝÙÌ ÌÎNË ÌÎNÛÛÉÌÎNË  ÌÎNÔÙ]Ú[ÝÔÛÌÎNË  ÌÎNÚÛ   ÌÎNË ÌÍÚÛ    ÌÎNÛÛÉÌÎNË  ÌÍÜ]ÌK  ÌÎNÚ[    ÌÎNËJBY  ÌÍÜ]ÌH[]B[ÙB][Y[ÙB][Y[[Â[ÈÑ]Õ[Ü[[J   ÌÍÚÛ    ÌÍÖ  ÌÍÖK ÌÍÛ[Ý   ÌÍØÛÝÙK   ÌÍÜ[Ú^OL    ÌÍÕ[Ü[ÞOLMJBÕÚ[TWÔÙ]^YYÚ[ÝÐ]X]Ê    ÌÍÚÛPÑQ    ÌÍÕ[Ü[ÞJBIÌÍÙÌOQÕRPÝÜX]QÜXÊ   ÌÍÖ  ÌÍÖK
BQÕRPÝÙ]ÜXÊ    ÌÍÙÌK   ÌÍÑÕRWÑÔÔSÒVK   ÌÍÜ[Ú^H
BQÕRPÝÙ]ÜXÊ    ÌÍÙÌK   ÌÍÑÕRWÑÔÐÓÓÔPÑQPÑQBQÕRPÝÙ]ÜXÊ  ÌÍÙÌK   ÌÍÑÕRWÑÔÓSK  ÌÍÛ[Ý   ÌÍØÛÝÙJBQÕRPÝÙ]ÜXÊ   ÌÍÙÌK   ÌÍÑÕRWÑÔÔQTÒ
BQÕRPÝÙ]ÜXÊ    ÌÍÙÌK   ÌÍÑÕRWÑÔÓSKKJBT] ÌÍÙÌB[[oÝ÷ Ù±1jje{öÚºÚ"µÍÚ[ÛYH  Ñ]Õ[Ü[]LÉÝÂÛØ[  ÌÍÐÛÝ[LÌÛØ[ ÌÍÑ[ÙVÉÌÍÐÛÝ[K    ÌÍÚLBÌÍÛ^QÝZOQÕRPÜX]H
    ][ÝÙ[[ZXÈ[Ü[Ý  ][ÝËÚÝÜÚYÚÝÜZYÚ   ÌÍÕÔ×ÔÔT]Ô
    ÌÍÕÔ×ÑVÕÔSÔÕ  ÌÍÕÔ×ÑVÐÓÓTÔÒUQ  ÌÍÕÔ×ÑVÓVQTQ
H
BÕRTÙ]ÐÛÛÜ

BÕRTÙ]Ý]H

BÌÍÑ[ÙVÌOWÑ]Õ[Ü[[ÙJ    ÌÍÛ^QÝZKÚÝÜÚYÌLÚÝÜZYÚÌL
Ì
BÜ ÌÍÚOLHÈ ÌÍÐÛÝ[LHÝ
ÌBIÌÍÑ[ÙVÉÌÍÚWOWÑ]Õ[Ü[[ÙH
    ÌÍÛ^QÝZKÚÝÜÚYÌLIÌÍÚKÚÝÜZYÚÌL

ÉÌÍÚÌ
BQÕRQ[]H
    ÌÍÑ[ÙVÉÌÍÚKLWH
BIÌÍÚÏL^Ú[HBIÌÍÛÙÏQÕRQÙ]ÙÊ
BTÝÚ]Ú   ÌÍÛÙÂBPØÙH   ÌÍÑÕRWÑUSÐÓÔÑBBBQ^]Q[ÝÚ]ÚÑ[

Update 2, now you can use Rect and Ellipse dynamical, see example

Edited April 26, 2009 by Greek

[UEZ]

Looks nice but check this out -> http://www.autoitscript.com/forum/index.php?showtopic=86879

UEZ

[Greek]

Looks nice but check this out -> http://www.autoitscript.com/forum/index.php?showtopic=86879

UEZ

Nice, but need mine too

[vengat]

I think it doesnt works well on vista ,as i cannot see any transparency over the circle or rectangle , i can just see a blue screen filled rectangles and circles , what is the reason , can any body jot it out ?

[myspacee]

search for this for long time

thank you,

m.

[Greek]

I think it doesnt works well on vista ,as i cannot see any transparency over the circle or rectangle , i can just see a blue screen filled rectangles and circles , what is the reason , can any body jot it out ?

You tried out, exactly what i posted? I have no vista on any pc :/ can't try it out.

[Greek]

search for this for long time

thank you,

m.

Good to hear

[KaFu]

Nice Stuff, will for sure come in handy at some point ...

[Greek]

Big update!

Now you can use it dynamical, check out the example