+1Rathinagiri wrote:Wow. It is a very nice work. Great achievement. Thanks a lot for sharing MeneAle.
Viva HMG
Moderator: Rathinagiri
+1Rathinagiri wrote:Wow. It is a very nice work. Great achievement. Thanks a lot for sharing MeneAle.
Code: Select all
var('oHttp')
var('x')
oHttp:=TipClientHttp():New("http://www.ip-adress.com/")
oHttp:Open()
x:=oHttp:ReadAll()
x:=substr(x,at("Your IP address is: ",x)+20)
x:=substr(x,0,at("<",x)-1)
msgbox(x)
Code: Select all
echo('Turns Google Chrome or Opera into half transparent')
var('hWndChr',findwindow('Chrome_WidgetWin_1',nil))
SetWindowTransparent (getparent(hWndChr), 128)
+1Rathinagiri wrote:Wow. It is a very nice work. Great achievement. Thanks a lot for sharing MeneAle.