xBase Command Interpreter

Topic Specific Tutorials and Tips.

Moderator: Rathinagiri

User avatar
esgici
Posts: 4502
Joined: Wed Jul 30, 2008 9:17 pm
DBs Used: DBF
Location: iskenderun / Turkiye
Has thanked: 371 times
Been thanked: 111 times
Contact:

Re: xBase Command Interpreter

Post by esgici » Mon Mar 10, 2014 10:46 am

Rathinagiri wrote:Wow. It is a very nice work. Great achievement. Thanks a lot for sharing MeneAle.
+1

Viva HMG :D
Viva INTERNATIONAL HMG :D

User avatar
meneale
Posts: 51
Joined: Sat Jan 12, 2013 2:05 am
Location: Campinas -SP, Brasil

Post by meneale » Thu Mar 13, 2014 1:33 am

Thanks :D

.facp samples:
youip.facp // Get your IP from http://www.ip-adress.com" onclick="window.open(this.href);return false;" onclick="window.open(this.href);return false;

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)
To Execute it:
load_fromfile('yourip.facp')
Or Drag and Drop

chrome.facp // Turns Google Chrome or Opera into half transparent

Code: Select all

echo('Turns Google Chrome or Opera into half transparent')
var('hWndChr',findwindow('Chrome_WidgetWin_1',nil))
SetWindowTransparent (getparent(hWndChr), 128)
To Execute it:
load_fromfile('chrome.facp')
Or Drag and Drop
AMD Phenom II X6 1090T 3.2GHz (OverClock 3.9GHz) | Windows 8.1 Pro 64-bit
4GB DDR3 | GTX 550 Ti 1GB | MSI 880GMA-E35

User avatar
srvet_claudio
Posts: 2044
Joined: Thu Feb 25, 2010 8:43 pm
Location: Uruguay
Has thanked: 35 times
Been thanked: 146 times
Contact:

Post by srvet_claudio » Thu Mar 27, 2014 8:59 pm

Rathinagiri wrote:Wow. It is a very nice work. Great achievement. Thanks a lot for sharing MeneAle.
+1
Best regards.
Dr. Claudio Soto
(from Uruguay)
http://srvet.blogspot.com

Post Reply