FiveTech Software tech support forums

... ECHO ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß if A%1 == A GOTO :SINTAX if NOT EXIST %1.prg GOTO :NOEXIST ECHO Compiling... set hdir=c:\xharbour set bcdir=c:\bcc55 %hdir%\bin\harbour %1 /n /i..\include;%hdir%\include ...

... Source ***************************** REM Self contained Harbour DLL, original idea and research Antonio Linares @ECHO OFF CLS IF A%1 == A GOTO :SINTAX IF NOT EXIST %1.prg GOTO :NOEXIST ECHO Compiling... SET hdir=c:\xharbour SET bcdir=c:\borland\bcc55\bin %bcdir%\bcc32 -c -D__EXPORT__ -I%hdir%\include ...

... ""}, {"",""}, {"","" }} y ser browseado sin problemas. Para usar array, yo prefiero usar TArray, que crea un objeto array con metodos del tipo :GoTo(), :LastRec(); :Seek(), y otros. saludos

... if A%1 == A GOTO :SINTAX if NOT EXIST %1.prg GOTO :NOEXIST ECHO Compiling... set hdir=d:\harbour set bcdir=d:\bcc55 %hdir%\bin\harbour %1 /n /i..\include;%hdir%\include ...

... than one PRG: %hdir%\bin\harbour %1 /n /i..\include;%hdir%\include /w /p %2 %3 > clip.log @type clip.log IF ERRORLEVEL 1 PAUSE IF ERRORLEVEL 1 GOTO EXIT echo -O2 -e%1.exe -I%hdir%\include %1.c > b32.bc %bcdir%\bin\bcc32 -M -c -v @b32.bc :ENDCOMPILE %hdir%\bin\harbour another /n /i..\include;%hdir%\include ...

... than one PRG: %hdir%\bin\harbour %1 /n /i..\include;%hdir%\include /w /p %2 %3 > clip.log @type clip.log IF ERRORLEVEL 1 PAUSE IF ERRORLEVEL 1 GOTO EXIT echo -O2 -e%1.exe -I%hdir%\include %1.c > b32.bc %bcdir%\bin\bcc32 -M -c -v @b32.bc :ENDCOMPILE %hdir%\bin\harbour another /n /i..\include;%hdir%\include ...

... NEW CODE 0004:0B2A 009FFH NEW CODE 0004:152A 00098H NEW CODE 0004:15C2 0036EH BRWFIELDS CODE 0004:1930 000E7H REFRESHBAR CODE 0004:1A18 00274H REGGOTO CODE 0004:1C8C 000F0H REGPOS CODE 0004:1D7C 006F5H BUSINCR CODE 0004:2472 00216H FLOATCLICK CODE 0004:2688 00230H FLOATCLICK CODE 0004:28B8 00396H ...