HMGforum.com

Hello,
In the last 4 months i was working in a project that is an 'HMG' version of Command Prompt but executing HMG functions using Macro (&)
Now it seems finished, and then i decided to post it in HMGForum.
The Form looks pretty good using the DwmExtendFrameIntoClientArea function contributed by Dr. Claudio Soto

Basic Tips:
Creating text files and drag 'n' drop into the window, the program will run like CMD opens '.bat' files, reading line per line and executing them
Var(cIdVar,xValue) // for define public variables
XCOM=T or F (XCOM=F program will decline HMGFunctions and will execute custom commands)
lEcho := .t. (all function that give return will be printed on screen)

What does not work // yet:
Commands like: IF ENDIF ELSE FOR CALL RUN DO WHILE CASE...

Maybe it can be part of official HMG Samples

Hello Meneale,

I do not understand what your program, any ideas?

regards

Javier Tovar wrote:Hello Meneale,

I do not understand what your program, any ideas?

regards

..

Javier :
Visual Fox , foxpro desde epocas antiguas venia con una linea de comando donde ejecutas comandos basicos como abrir tablas, indezr bases etc.etc.
imaginate que podes tener abierto un proyecto y necesitas ver el contenido de una tabla que no pertenece al proyecto.
no salis del IDE y desde la linea de comando haces

USE MITABLA
BROW.

simple no ?

Gracias por compatir Meneale !!!!

descargando y probando !!!!!!

Yes Daniel,
I create this program to run test scripts without needed to compile it.
Make it very useful

Error :

Falta Win.ico

windres: can't open icon file `win.ico': No such file or directory

Necesitarios una lista de los comandos soportados por "xBase Command Interpreter"

Ahhh ,

OK DanielMaximiliano eso seria estupendo

Saludos

xBase CMD Support all defined Functions, including user defined, hmg default functions, c functions...

xBaseCMD doesn't support commands / structures, like:
LOCAL, PRIVATE, STATIC, PUBLIC // substitute var(idVar,xContent) // define public variables
IF, ELSE, ENDIF // substitute If(conditional,iftrue,iffalse)
DEFINE <control definition>, END // substitute(s) _DefineWindow(), _DefineModalWindow, _DefineSplitChildWindow(), _DefineEditBox(),... (look at hmg3.2\include)
DO WHILE, END DO, LOOP // nothing yet
FOR, NEXT // substitute fstep(starn,end,step,bAction)
CASE, OTHERWISE, END // nothing yet
@...BOX, @...SAY, @....<control definition>
SET *

.facp files are scripts to the xBase (like .bat for the cmd)
chrome.facp // Turns Google Chrome or Opera into half transparent
cmdmenu.facp // Define a Main Menu in the form, but look bad because of DWM
yourip.facp // Get you ip address
To open it, drag and drop in EXE or in the form

Wow. It is a very nice work. Great achievement. Thanks a lot for sharing MeneAle.

+1
Excellent work, Thank's for sharing