How made easy running simple script found on websiste or fourm Is very basic but I hope that can be interesting for [x]harbour developer
Compile jtt.prg #include "inkey.ch" function main LOCAL X_WHERE,X_CLIP KEYBOARD CHR(K_CTRL_C) // COPY TO CLIBBOARD IF NOT ALREADY MADE X_CLIP=GTGetClipboard() X_WHERE=GetEnv( "TMP" ) IDLE=FCREATE(X_WHERE+"\TEST.PRG") FWRITE(IDLE,X_CLIP) FCLOSE(IDLE) X_COMMAND="HARBOUR /N /GH "+X_WHERE+"\TEST.PRG" RUN (x_Command) // IF ERROR // X_COMMAND="Notepad.exe "+X_WHERE+"\TEST.PRG" X_COMMAND="HBRUN TEST.HRB" RUN (X_COMMAND) RETURN http://groups.google.it/group/comp.lang.xharbour/browse_thread/thread/b7 df1af212ee7a81/887f0920ca975ac5?lnk=gst&q=clipper+get+differences# select main function copy start jtt (by a shortcut) Massimo Belgrano _______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
