+- Sinisterly (https://sinister.li)
+-- Forum: Coding (https://sinister.li/Forum-Coding)
+--- Forum: Coding (https://sinister.li/Forum-Coding--71)
+--- Thread: [AutoIt]Glass style window or border (/Thread-AutoIt-Glass-style-window-or-border)
[AutoIt]Glass style window or border - 1234hotmaster - 11-06-2011
Code:
Func _CompExtendFrame($hWnd,$Left=-1,$Top=-1,$Right=-1,$Bottom=-1)
;by 1234hotmaster
If @OSVersion = Chr(87)&Chr(73)&Chr(78)&Chr(95)& _
Chr(55) Or @OSVersion = Chr(87)&Chr(73)&Chr(78)&Chr(95)& _
Chr(86)&Chr(73)&Chr(83)&Chr(84)&Chr(65) Then
$tRect = DllStructCreate(Chr(108)&Chr(111)&Chr(110)&Chr(103)& _
Chr(32)&Chr(76)&Chr(101)&Chr(102)&Chr(116)& _
Chr(59)&Chr(108)&Chr(111)&Chr(110)&Chr(103)& _
Chr(32)&Chr(84)&Chr(111)&Chr(112)&Chr(59)& _
Chr(108)&Chr(111)&Chr(110)&Chr(103)&Chr(32)& _
Chr(82)&Chr(105)&Chr(103)&Chr(104)&Chr(116)& _
Chr(59)&Chr(108)&Chr(111)&Chr(110)&Chr(103)& _
Chr(32)&Chr(66)&Chr(111)&Chr(116)&Chr(116)& _
Chr(111)&Chr(109))
DllStructSetData($tRect, Chr(76)&Chr(101)&Chr(102)&Chr(116), $Left)
DllStructSetData($tRect, Chr(84)&Chr(111)&Chr(112), $Top)
DllStructSetData($tRect, Chr(82)&Chr(105)&Chr(103)&Chr(104)& _
Chr(116), $Right)
DllStructSetData($tRect, Chr(66)&Chr(111)&Chr(116)&Chr(116)& _
Chr(111)&Chr(109), $Bottom)
Return DllCall(Chr(100)&Chr(119)&Chr(109)&Chr(97)& _
Chr(112)&Chr(105)&Chr(46)&Chr(100)&Chr(108)& _
Chr(108), Chr(108)&Chr(111)&Chr(110)&Chr(103), Chr(68)&Chr(119)&Chr(109)&Chr(69)& _
Chr(120)&Chr(116)&Chr(101)&Chr(110)&Chr(100)& _
Chr(70)&Chr(114)&Chr(97)&Chr(109)&Chr(101)& _
Chr(73)&Chr(110)&Chr(116)&Chr(111)&Chr(67)& _
Chr(108)&Chr(105)&Chr(101)&Chr(110)&Chr(116)& _
Chr(65)&Chr(114)&Chr(101)&Chr(97), Chr(104)&Chr(119)&Chr(110)&Chr(100),$hWnd , Chr(108)&Chr(111)&Chr(110)&Chr(103), DllStructGetPtr($tRect))
EndIf
EndFuncNormal Window:
[altimg=http://i.minus.com/iS0ncBQNqP4nE.png]Normal Window[/altimg]
10 for top, bottom, left, right:
[altimg=http://i.minus.com/isvCB0zxRiolS.png]All 10[/altimg]
20 for top, bottom, left, right:
[altimg=http://i.minus.com/i7iqQaR7roSNz.png]All 20[/altimg]
20 for top, left, right. 0 for bottom:
[altimg=http://i.minus.com/ibjOAX1ZU73fg7.png]All 20 except for bottom[/altimg]
Full Glassed Window: ( top, bottom, left, right all = -1 )
[altimg=http://i.minus.com/ifiiqh1R8RP.png]Full Screen Glassed[/altimg]
RE: [AutoIt]Glass style window or border - ReaperX - 12-02-2011
Thats Cool. I Will Definetly Use this.
