Re: [Harbour] Contrib´s not build with 14457

2010-05-25 Thread Qatan

Rossine,

   Are you using MingW or BCC?
   MingW (TDM) is the recomended one. BCC is not as good according to tests 
made by the developers.
   Seems to me you are mixing it and you also have too many enviroment 
variables set.
   As I understand the instructions in INSTALL, it should be simpler. Did 
you read it?
   If you are using MingW it will not generate *.lib files but *.a files 
instead.
   I recomend you to re-read the INSTALL. There you will find clear 
instructions how to build the libs.

   I hope it will help you.
   Regards

Qatan

- Original Message - 
From: Rossine qii...@ig.com.br

To: harbour@harbour-project.org
Sent: Tuesday, 25 de May de 2010 11:00
Subject: Re: [Harbour] Contrib´s not build with 14457




Hello Viktor,


Use 'clean install' as documented (with lowercase).


OK. I use: \harbour\bin\mingw32-make.exe clean install

Now fbclient.lib is created, but ace32.lib and freeimage.lib. are not
created in c:\hrb_bcc\lib

This is my sets for harbour:

[SETS]
set HB_BUILD_DLL=yes
set HB_DIR_IMPLIB=yes
set HB_BUILD_IMPLIB=yes
set HB_BUILD_LOG=yes
set HB_CONTRIB_ADDONS=yes
set HB_BUILD_UNICODE=no
rem set HB_BUILD_UNICODE=yes

set HB_WITH_PGSQL=C:\pgsql84\include
set HB_WITH_ADS=C:\ads81
set HB_WITH_QT=C:\Qt\qt\include
set HB_WITH_FIREBIRD=C:\ARQUIV~1\Firebird\Firebird_2_1\include
set HB_WITH_FREEIMAGE=C:\FreeImg\3131\Dist

set HB_DIR_PGSQL=C:\pgsql84
set HB_DIR_ADS=C:\ads81
rem set HB_DIR_QT=C:\Qt\qt\include
set HB_DIR_QT=C:\Qt\qt
set HB_DIR_FIREBIRD=C:\ARQUIV~1\Firebird\Firebird_2_1
set HB_DIR_FREEIMAGE=C:\FreeImg\3131\Dist

set HB_INC_PGSQL=C:\pgsql84\include
set HB_INC_ADS=C:\ads81
set HB_INC_QT=C:\Qt\qt\include
set HB_INC_FIREBIRD=C:\ARQUIV~1\Firebird\Firebird_2_1\include
set HB_INC_FREEIMAGE=C:\FreeImg\3131\Dist

set HB_LEX=SIMPLEX
set HB_USER_CFLAGS=-DHB_GC_AUTO -DHB_FM_STATISTIC

set HB_PATH=c:\hrb_bcc
set HB_INSTALL_PREFIX=%HB_PATH%

set HB_BIN_INSTALL=%HB_PATH%\bin
set HB_LIB_INSTALL=%HB_PATH%\lib
set HB_INC_INSTALL=%HB_PATH%\include
set HB_DOC_INSTALL=%HB_PATH%\doc
set HB_DYN_INSTALL=%HB_PATH%\dyn

set HB_COMPILER=bcc

set BCC_DIR=c:\bcc55
[/SETS]

This is my LOG:

[LOG]
C:\harbour-#BCC#\harbour\bin\mingw32-make.exe clean install
! Building Harbour 2.1.0beta1 from source - http://www.harbour-project.org
! MAKE: C:/harbour/bin/mingw32-make 3.81 sh.exe clean install
! HB_USER_CFLAGS: -DHB_GC_AUTO -DHB_FM_STATISTIC
! HB_INSTALL_PREFIX: c:\hrb_bcc
! HB_BIN_INSTALL: c:\hrb_bcc\bin
! HB_LIB_INSTALL: c:\hrb_bcc\lib
! HB_DYN_INSTALL: c:\hrb_bcc\dyn
! HB_INC_INSTALL: c:\hrb_bcc\include
! HB_DOC_INSTALL: c:\hrb_bcc\doc
! HB_BUILD_DLL: yes
! HB_BUILD_IMPLIB: yes
! HB_BUILD_UNICODE: no
! HB_CONTRIB_ADDONS: yes
! HB_HOST_PLAT: win (x86)  HB_SHELL: nt
! HB_PLATFORM: win (x86) (autodetected)
! HB_COMPILER: bcc
! Component: 'zlib' found in C:/harbour/external/zlib (local)
! Component: 'pcre' found in C:/harbour/external/pcre (local)
! Component: 'openssl' not found. Configure with HB_WITH_OPENSSL.
! Component: 'gpm' not supported on win platform
! Component: 'slang' not found. Configure with HB_WITH_SLANG.
! Component: 'curses' not found. Configure with HB_WITH_CURSES.
! Component: 'x11' not found. Configure with HB_WITH_X11.
! Component: 'wattcp/watt-32' not supported on win platform
! 'gtcrs' library skipped (component not found)
! 'gtdos' library skipped (platform not supported)
! 'gtos2' library skipped (platform not supported)
! 'gtsln' library skipped (component not found)
! 'gttrm' library skipped (platform or compiler not supported)
! 'gtxwc' library skipped (component not found)
! 'gtalleg' library skipped ('allegro' not found. Configure with
HB_WITH_ALLEGRO
.)
! 'hbcairo' library skipped ('cairo' not found. Configure with
HB_WITH_CAIRO.)
! 'hbcups' library skipped ('cups' not found. Configure with 
HB_WITH_CUPS.)

! 'hbcurl' library skipped ('libcurl' not found. Configure with
HB_WITH_CURL.)
! 'hbgd' library skipped ('libgd' not found. Configure with HB_WITH_GD.)
! 'hbmysql' library skipped ('mysql' not found. Configure with
HB_WITH_MYSQL.)
! 'hbqt' library skipped ('qt' not supported with bcc compiler)
! 'hbssl' library skipped (component not found)
! 'sddmy' library skipped ('mysql' not found. Configure with 
HB_WITH_MYSQL.)

! 'sddoci' library skipped ('ocilib' not found. Configure with
HB_WITH_OCILIB.)
! 'hbxbp' library skipped (compiler not supported)
   1 arquivo(s) copiado(s).
   1 arquivo(s) copiado(s).
   1 arquivo(s) copiado(s).
...
[/LOG]

This is the contents of my C:\ads81

[ADS]
Pasta de C:\ads81

..DIR 13/05/2009  16:31
. DIR 13/05/2009  16:31
ace32dll995.376 08/01/2007  08:10
axcws32  dll167.936 08/01/2007  08:10
ansi chr 24.128 08/01/2007  08:10
adsloc32 dll  1.241.088 08/01/2007  08:10
extend   chr 28.348 08/01/2007  08:10
adslocal cfg  2.370 19/03/2007  15:41
ace  h  219.472 17/08/2007  17:42
ads  ch

Re: [Harbour] Problem with upper and lower based on CDP

2010-05-21 Thread Qatan

Hello Viktor,

ANSI and OEM are totally confusing Microsoft 
(Windows-specific) terms so we stay out of 
using them in Harbour. 

We already support both, but with other names. 
ANSI is usually ??WIN, and OEM is usually 
??85n.


Viktor


   Are not ??ISO and ??WIN the same thing?
   Thanks for your help.

Qatan 
___

Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour-users] Re: DBF Fast text search / SQLite

2010-05-13 Thread Qatan

Hello Massimo,

   Good example, but I don't have MySQL installed and can't test it.
   Does anyone has MySQL installed and harbour from SVN built with 
HB_WITH_MYSQL set? Could you please test the example?
   What I am trying to see is the REPLACE command working. According to 
what I could understand it will not save the records on the server side, 
only on cached query result but SQL database is not changed.


   The programmer must call SQL command explicitly to modify SQL tables.
SSI provides a method to detect which cached rows was changed or appended.

   I would like to see it in a example, please.

   Thanks


Qatan

- Original Message - 
From: Massimo Belgrano mbelgr...@deltain.it

To: Users of the Harbour compiler harbour-users@harbour-project.org
Sent: Wednesday, 12 de May de 2010 18:02
Subject: Re: [Harbour-users] Re: DBF Fast text search / SQLite


follow is my untested sample

*#RUN hbmk2 sqltest.prg c:\harbour\contrib\sddmy\sddmy.hbc
/*
* RDDSQL - Harbour
* Copyright 2008 Grigory Filatov gfila...@freemail.ru
* Copyright 2008 Belgrano Massimo

* Based on RDDSQL sample included in Harbour distribution
* based on  Slight Modifications By Roberto Lopez (2009.04.01)

*
*/


#include dbinfo.ch
#include error.ch

#define DBI_QUERY 1001

#define RDDI_CONNECT 1001
#define RDDI_DISCONNECT 1002
#define RDDI_EXECUTE 1003
#define RDDI_ERROR 1004
#define RDDI_ERRORNO 1005
#define RDDI_NEWID 1006
#define RDDI_AFFECTEDROWS 1007
#define RDDI_QUERY 1008

ANNOUNCE RDDSYS
REQUEST SDDMY, SQLMIX

**
Function Main()
**
  RDDSETDEFAULT( SQLMIX )
  IF RDDINFO( RDDI_CONNECT, {MYSQL, localhost, root,root,
test} ) == 0
 ? Unable connect to the server!
 Return nil
  ENDIF
  OpenTable()
  AddRecord()
   dbedit()
  CloseTable()

Return nil

**
Procedure OpenTable
**
  If CreateTable()
 DBUSEAREA( .T.,, SELECT * FROM country, country )
 INDEX ON FIELD-RESIDENTS TAG residents TO country
 GO TOP
  endIf
Return

**
Procedure CloseTable
**
  DBCLOSEALL()
Return

**
Procedure AddRecord
**
  APPEND BLANK
  REPLACE CODE  WITH 'ARG'
  REPLACE NAME  WITH 'Argentina'
  REPLACE RESIDENTS   WITH 3874
  GO TOP
Return

**
Function CreateTable
**
Local ret := .T.
  RDDINFO(RDDI_EXECUTE, DROP TABLE country)
  If RDDINFO(RDDI_EXECUTE, CREATE TABLE country (CODE char(3), NAME
char(50), RESIDENTS int(11)))
 If ! RDDINFO(RDDI_EXECUTE, INSERT INTO country values ('LTU',
'Lithuania', 3369600), ('USA', 'United States of America', 305397000),
('POR', 'Portugal', 10617600), ('POL', 'Poland', 38115967), ('AUS',
'Australia', 21446187), ('FRA', 'France', 64473140), ('RUS', 'Russia',
14190))
? Can't fill table Country!
ret := .F.
 EndIf
  Else
 ? Can't create table Country!
 ret := .F.
  EndIf
Return ret

2010/5/12 Qatan supo...@tribalbrasil.com:

Hello Massimo,

Thanks for helping.
Do you have experience using RDDSQL?
Seems very good but I am afraid I didn't understand part 3, maybe a good
example would be the answer for that. How can I save the modifications?
Regards,

Qatan



- Original Message - From: Massimo Belgrano 
mbelgr...@deltain.it

To: Users of the Harbour compiler harbour-users@harbour-project.org
Sent: Wednesday, 12 de May de 2010 15:38
Subject: Re: [Harbour-users] Re: DBF Fast text search / SQLite


afaik last version of rddado is not working in harbour (after ole
modification)
rddsql is best choice
AFAIK RDDSQL talk directly with the sql language
this is message post by Mindaugas Kavaliauskas on this list




3. Modifying database

SSI presents a query result via RDD interface and generates no hidden
SQL queries. So, how database can be changed? Does DBAPPEND() and 
FIELDPUT()

works, or is it readonly SQL interface?
DBAPPEND(), FIELDPUT() and other similiar functions work on cached query
result, i.e. query can be appended by new rows and field values can be
changed, but SQL database is not changed. DBCREATE() function can also be
used to create an empty query result but no table is created on SQL
server.
So, SSI can also be used as implementation of array RDD.
The programmer must call SQL command explicitly to modify SQL tables.
SSI provides a method to detect which cached rows was changed or appended.


___
Harbour-users mailing list

Re: [Harbour] Slow create index under threads

2010-05-10 Thread Qatan

Hello Rafa,

   I am not sure, may be wrong but I would say also that the fisical access 
of the HD Head divided in different threads would increase the time to 
access the same ammount of data compared to only one thread.
   This is due to the fisical comings and goings of the Head over the disk 
surface.
   I don't know for SDD but maybe it would have a similar effect because 
multi threading would not be an advantage for disk access, only for CPU.


Qatan


- Original Message - 
From: rafa r...@tesipro.com

To: Harbour Project Main Developer List. harbour@harbour-project.org
Sent: Monday, 10 de May de 2010 06:20
Subject: [Harbour] Slow create index under threads



Hello,
I'm trying to do a re indexing using threads, but according to tests
under Windows Vista,
Quarda Intel Core, 4 Gig RAM, the tests are not entirely satisfactory;

The basic idea was to determine the number of threads that want to
implement,
N_THREADS, which is passed by parameter, for testing purposes.

Well, times;
1 thread= 29 minutes THE WINNER!
4 threads  = 93 minutes WoW!
7 threads  = 68 minutes
5 Threads = 64 minutes

Something to do this by penalizing Harbour indexing, or the code above,
you have
thing excessively penalized.

 SPANISH ---
Hola,

Estoy intentando hacer una re indexación usando hilos, pero según
pruebas bajo Windows Vista,
Intel Quard Core, 4 Gigas RAM, los test no son del todo satisfactorios;

La idea básica es determinar la cantidad de hilos que queremos poner en
marcha,
N_THREADS, que es pasado por parámetro, para poder realizar pruebas.

Pues bien, los tiempos ;
1 Hilo = 29 minutos  THE WINNER!
4 Hilos = 93 minutos WoW!!
7 hilos = 68 minutos
5 Hilos = 64 minutos

Algo hacer Harbour que esta penalizando la indexación, o el código
expuesto, tiene alguna
cosa que penaliza en exceso.

Cualquier comentario es bienvenido para mejorar este aspecto.

//-- source code
--
/*
  Example multiThreads index.
  One thread by table , and one thread by index.
  2010 Rafa Carmona

  Thread Main
   |-  table for test.dbf
   || Thread child index fname
   ||
   ||-Thread child index fcode

  c:\ ..\..\bin\win\bcc\hbmk2 -mt indexthread -lhbcpage
-Le:\harbour\trunk\harbour\lib\win\bcc

  New code, now, if thread dead, new thread create!

*/
#include hbclass.ch
#include hbthread.ch
#include common.ch
#include inkey.ch
#include FileIO.ch

REQUEST HB_CODEPAGE_ES850, HB_CODEPAGE_ES850C
REQUEST HB_LANG_ES

static N_THREADS := 5

STATIC nTecla
STATIC s_num_procesos
STATIC s_aLineas := {  }
static s_hMutex
static s_hHandle_File
static s_nCount_Errores := 0

proc Main( nHilos )
   Local nSeconds
   Local cDbf, lProcesa := .F.
   Local aFicheros, x
   Local aDbfs, aNtxs, aKeys , aDesc, aFor, aSel
   Local aThreads := {}
   Local nProceso := 0, nLinea, lSalir := .F., nIndex
   Local nLen_Table
   Local nPosTable, cCadena, cLine, aTokens, i
   Local nPos_Column  := 1, g


   DEFAULT nHilos TO 0

   if !empty( nHilos )
   N_THREADS := val( nHilos )
   endif

//HB_SetCodePage( ES850 ) En xHarbour
   set( _SET_CODEPAGE, ES850C )

   HB_LANGSELECT('ES')
   Set( _SET_LANGUAGE, ES )


   setmode( 25,130 )
   cls

   @01,0 SAY padc( hb_ansitooem(   Indexación multihilo. Rafa Carmona
), 80 )COLOR N*/W*
   @23,0 SAY padc( Pulse ESC para cancelar. , 80) COLOR R+/N

  // ONLY for TEST, if necesary many many DBF , with millions records
for test.
 // My test is over 200 dbfs, with 12GB total size, without NTX.
  aDbfs := { test, test2 } // Arrays files dbf

   aNtxs := { { fname, fcode },; // files index for test
 { fName2 } } // files index for test2

   aKeys := { { name, code },;
 { dtos(fecha)+str(code) } } // Expresions

   aFor  :=  { { , }, {} }


   nLen_Table := len( aDbfs )
   nPosTable  := 1
   nSeconds := Seconds()
   s_num_procesos := 0
   s_hMutex := hb_mutexCreate()
   s_hHandle_File := FCreate( indexpms.log )

   for g := 1 to N_THREADS  // Posicion en la columa por cada numero de
hilo
  aadd( s_aLineas, nPos_Column )
   nPos_Column += 16
   next


while nPosTable = nLen_Table

   if ( nTecla := inkey() ) = K_ESC
  exit
   endif

   if N_THREADS = s_num_procesos // No se ha muerto ningun proceso
 loop
   endif

   cDbf := aDbfs[ nPosTable ]


   if  file( cDbf+.dbf )
  hb_mutexLock( s_hMutex )
  s_num_procesos++
  hb_mutexUnLock( s_hMutex )
  hb_threadStart( @aCreateIndexe(), cDbf, aNtxs[ nPosTable ],
aKeys[ nPosTable ], aFor[ nPosTable ]  )
   endif

   nPosTable++
   end while

 @23,1 SAY Espere, terminado reindexaciones pendientes... + space( 50
) COLOR R*/N
 hb_threadWaitForAll() // Esperamos a los ultimos.
 @23,1 SAY Proceso

Re: [Harbour] HBNetIO file functions

2010-05-04 Thread Qatan

Hello,

   I suggest to add this example to the contrib\hbnetio\tests folder.
   With more examples it is better to understand.
   I will try NETIO in the future, seems something very good  and 
professional. I am afraid I don't know the power and possibilities of it 
yet.

   Thanks!

Qatan



- Original Message - 
From: Alex Strickland s...@mweb.co.za

To: Harbour Project Main Developer List. harbour@harbour-project.org
Sent: Tuesday, 4 de May de 2010 11:30
Subject: [Harbour] HBNetIO file functions



Hi

Maybe this small test will help someone to see how easy it is to read and 
write

non DBF files using netio RPC.

Regards
Alex








___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour



___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] HBNetIO file functions

2010-05-04 Thread Qatan

Hello Mario,


Well, in my experience after conversion, the speed difference is very 
noticeable on a heavy traffic network compared to a shared access 
application.  I can also set the shared folder to Read Only from the 
server for direct file access security (accidental deletion?) while 
performing the normal application process via NETIO.  I just need a 
variable that contains like cFileSvr:=net:serverhost:server dbf 
folder then open dbf file as DbUseArea(.T., ,(cFileSvr+dbfile)).  I 
can then simply set cFileSvr:= to operate on Non-NETIO environment. 
Personally, it is that flexible to switch between the usual way of opening 
dbf files and NETIO to achieve its amazing benefit.




  Thanks for sharing your experience. It helps
   Seems pretty simple. I will try when I have time and more resources (2 
computers).

   Regards,

Qatan 


___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] get/read compatibility with S87

2010-04-09 Thread Qatan

Chris,

   Did you look the getsys.prg source code? 
   I think you will find what you are lookng for there.

   I hope it helps you.

Qatan

- Original Message - 
From: chris lueders harbour-l...@cxxl.de

To: harbour@harbour-project.org
Sent: Friday, 9 de April de 2010 11:32
Subject: [Harbour] get/read compatibility with S87


hi,

i used to do clipper summer 87.  now i ported to harbour and find that
@ get/read behaves slightly different under harbour.

1) @ get/read fields can not be confirmed with ctrl-enter (chr(10)),
only with enter (chr(13)).  clipper S87 will not exit the whole read
by pressing ctrl-enter, but at least lastkey() is set to 10 in a valid
function. 


2) ctrl-pgdn will not move the cursor to the last field (as in S87),
but will exit the whole read.

i would try to change that behaviour myself, but i don't know where to
start looking.

can anyone help?


proof of concept code:

  private x, y
  x = 123
  y =
  @ 0,0 get x valid showlast(0)
  @ 1,0 get y valid showlast(1)
  read

function showlast
  parameter r
  @ r,20 say lastkey() picture 
return .t.

--
/chris/

___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] Introducing myself

2010-04-07 Thread Qatan
Hello Maniero,

I understand you. I had (and have) the same difficulties you have.
Documentation is something difficult to do and the developers are too busy 
fixing and tunning up Harbour. This is a very good quality job they are doing. 
Do not give up! Soon you will be able to compile and test every example and 
maybe help to find some bugs (and solutions) to make Harbour even better.
I am trying to develop a small ERP but I take a long time for anything 
because of two main reasons: 1) I am too purist and want to do something very 
good but simple for the end-user and 2) I do not have time... (this is the main 
problem and I belive is the main problem of most developers).

Regards,

Qatan
  - Original Message - 
  From: Antonio Maniero 
  To: Harbour Project Main Developer List. 
  Sent: Wednesday, 7 de April de 2010 11:02
  Subject: Re: [Harbour] Introducing myself


  Hi Qatan


  I got compiled last night. There are so many detais, finnaly I got. Lack of 
documentation is really a big problem. I did search for whole list to found my 
answers.


  I still trying to compile several components and examples without success but 
I will try harder before post my doubts here.


  []´s Maniero



  2010/4/7 Qatan supo...@tribalbrasil.com

Antonio,

I had problems building HBIDE in the past and I understand you.
My main problem was configuring the enviroment. I assume that you have 
already downloaded the right tools from the right places and have QT, MingW and 
of course, Harbour with contribs (HBIDE).
I hope the way I do is correct (please anyone correct me if wrong).
Follows how it is configured in my computer with Windows XP Home. It 
works for me:

AUTOEXEC.NT
@cls
set PATH=%PATH%;c:\x\bin;c:\x\bin\ng;
set PATH=%PATH%;c:\x\upx;
set PATH=%PATH%;C:\x\QT\4.5.3\bin;
set PATH=%PATH%;C:\x\mgw\bin;
set PATH=%PATH%;C:\x\hb\bin;
set HB_BUILD_UNICODE=yes





I have a BATCH file that builds Harbour from SVN: (I build it in this 
folder: C:\x\hb\ )

CREATE.NT
@cls
set HB_WITH_QT=C:\x\QT\4.5.3\include
set HB_QT_STATIC=yes
set HB_INSTALL_PREFIX=C:\x\hb
set HB_BUILD_IMPLIB=yes
echo:
echo Cleanning...
echo:
CD \x\svn
mingw32-make clean
echo:
echo Clean OK!
echo:
echo Start building libs (Press ctrl-C to stop now)...
echo:
pause NUL:
mingw32-make install
echo:
echo Done! 





To build HBIDE I just point the prompt to HBIDE folder under CONTRIB 
and fire a simple hbmk2 hbide.hbp as stated by Pritpal Bedi.

I recommend you to read the INSTALL file that comes with HARBOUR 
carefully because there you find valuable and important details to build and 
use Harbour successfully.

I use MingW from TDM. I've compiled HBIDE and it is an impressive work 
by Pritpal Bedi. I am creating a small program (CUI mode) using GTWVT and when 
I finish it I will try to port it to *nix.

PC is Przemyslaw Czerpak but I think you can just say Przemek since he 
signs down his name this way and seems to be much easier for non Slavic 
speakers.

I hope it helps you a bit.

Regards,


Qatan



- Original Message - 
  From: Antonio Maniero 
  To: harbour@harbour-project.org 
  Sent: Tuesday, 6 de April de 2010 12:08
  Subject: [Harbour] Introducing myself


  Hello everybody 


  First of all I really sorry by my bad and poor English. I made my best.


  I am a software developer for 26 years working with several programming 
languages mostly building Line Of Business applications in Brazil.


  I worked with Clipper since Clipper exists. I used the first copy sold in 
Brazil by Softcorp (succeeded by Officer and after Nantucket Brasil and CA 
Brasil). I worked on a company (one of the major business software companies in 
the world) that was practically the only VO beta tester in Brazil. It's a shame 
a good idea turns trash :-) As 1996 on internet era I change my career and 
dropped Clipper in favor of other solutions. Now I am back to LOB applications 
with total freedom to choose my way. I decided modernize my old Clipper 
applications porting to Harbour. I was a big lover of Clipper, specially 5.2 
and I had supported the way Nantucket did think Clipper evolution and some 
aspects of Visual Objects developed by CA. I liked to see Clipper near to 
syntax and some semantics of C. Yes, I am not a typical Clipper developer. I 
think dBase style is a bad thing although is a necessary evil to carry.


  I want fix some errors and bad style which I made on 80's and use 
improved features available on Harbour.  I need rewrite my C functions, throw 
away some, rethink about UI (console to GUI) and databases

Re: [Harbour] Introducing myself

2010-04-06 Thread Qatan
Antonio,

I had problems building HBIDE in the past and I understand you.
My main problem was configuring the enviroment. I assume that you have 
already downloaded the right tools from the right places and have QT, MingW and 
of course, Harbour with contribs (HBIDE).
I hope the way I do is correct (please anyone correct me if wrong).
Follows how it is configured in my computer with Windows XP Home. It works 
for me:

AUTOEXEC.NT
@cls
set PATH=%PATH%;c:\x\bin;c:\x\bin\ng;
set PATH=%PATH%;c:\x\upx;
set PATH=%PATH%;C:\x\QT\4.5.3\bin;
set PATH=%PATH%;C:\x\mgw\bin;
set PATH=%PATH%;C:\x\hb\bin;
set HB_BUILD_UNICODE=yes





I have a BATCH file that builds Harbour from SVN: (I build it in this folder: 
C:\x\hb\ )

CREATE.NT
@cls
set HB_WITH_QT=C:\x\QT\4.5.3\include
set HB_QT_STATIC=yes
set HB_INSTALL_PREFIX=C:\x\hb
set HB_BUILD_IMPLIB=yes
echo:
echo Cleanning...
echo:
CD \x\svn
mingw32-make clean
echo:
echo Clean OK!
echo:
echo Start building libs (Press ctrl-C to stop now)...
echo:
pause NUL:
mingw32-make install
echo:
echo Done! 





To build HBIDE I just point the prompt to HBIDE folder under CONTRIB and 
fire a simple hbmk2 hbide.hbp as stated by Pritpal Bedi.

I recommend you to read the INSTALL file that comes with HARBOUR carefully 
because there you find valuable and important details to build and use Harbour 
successfully.

I use MingW from TDM. I've compiled HBIDE and it is an impressive work by 
Pritpal Bedi. I am creating a small program (CUI mode) using GTWVT and when I 
finish it I will try to port it to *nix.

PC is Przemyslaw Czerpak but I think you can just say Przemek since he 
signs down his name this way and seems to be much easier for non Slavic 
speakers.

I hope it helps you a bit.

Regards,


Qatan



- Original Message - 
  From: Antonio Maniero 
  To: harbour@harbour-project.org 
  Sent: Tuesday, 6 de April de 2010 12:08
  Subject: [Harbour] Introducing myself


  Hello everybody 


  First of all I really sorry by my bad and poor English. I made my best.


  I am a software developer for 26 years working with several programming 
languages mostly building Line Of Business applications in Brazil.


  I worked with Clipper since Clipper exists. I used the first copy sold in 
Brazil by Softcorp (succeeded by Officer and after Nantucket Brasil and CA 
Brasil). I worked on a company (one of the major business software companies in 
the world) that was practically the only VO beta tester in Brazil. It's a shame 
a good idea turns trash :-) As 1996 on internet era I change my career and 
dropped Clipper in favor of other solutions. Now I am back to LOB applications 
with total freedom to choose my way. I decided modernize my old Clipper 
applications porting to Harbour. I was a big lover of Clipper, specially 5.2 
and I had supported the way Nantucket did think Clipper evolution and some 
aspects of Visual Objects developed by CA. I liked to see Clipper near to 
syntax and some semantics of C. Yes, I am not a typical Clipper developer. I 
think dBase style is a bad thing although is a necessary evil to carry.


  I want fix some errors and bad style which I made on 80's and use improved 
features available on Harbour.  I need rewrite my C functions, throw away some, 
rethink about UI (console to GUI) and databases (transition from DBF to MySQL 
and others RDBMS).


  I think harbor 2.0 is a wonderful piece of software. It's not perfect because 
the heavy legacy to honor. I like the design of a clean core with extensions. I 
want publicly prize Viktor and PC (I can´t write his name :-) ). I agree with 
most of their decisions and I strongly appreciate their work. Ok, now I can 
criticize some points without fear :-) I want to see Harbour moving forward, 
not in xHarbour style, but in smart Harbour style. In Brazil we have a popular 
expression: The hasty eating raw :-)


  I want to make it clear: I want help Harbour development. Now I can mainly 
give my opinions, try to influence some decisions, suggest enhancements, report 
bugs. I need to get experience with C99 and GCC. My C experience is about MS-C 
5.0 (I give you a candy if you know why :-) ). I need to get time to help with 
code. I will try to contribute with some thing later.


  I can't help too much with documentation, IMHO the biggest Harbour need, 
because my bad English. I am improving Wikipedia's article now. I invite you to 
contribute too. It's an initial work. I will contribute more on Portuguese 
article. I am writing about Harbour on a variety of articles (xBase, 
programming languages comparison, etc). See my contribs logged as bigown. 
Please, feel free to add new information or edit and delete wrong or bad text. 
I am reviewing text bring from xHarbour. It's a good way to learn more about 
Harbour. Viktor

Re: [Harbour] inkey(0) and set key to

2010-03-26 Thread Qatan

Hello,


   I use like this:

CODE

nKey := Inkey(0)
if nKey = K_ESC
  exit
elseif nKey = K_ENTER
  ...
else
   HB_SetKeyCheck( lastkey() )  // Tests SET KEY events
endif

ENDCODE

Works for me althrough maybe it isn't the best way.


Qatan

- Original Message - 
From: francesco perillo fperi...@gmail.com

To: Harbour Project Main Developer List. harbour@harbour-project.org
Sent: Friday, 26 de March de 2010 16:07
Subject: Re: [Harbour] inkey(0) and set key to



You can use setkey with one parameter ( the inkey(0) return value) to
check if a codeblock is associated and then invoke it with correct
parameters...


something like this

nCode := inkey( 0 )
(check nCode)
cBlock := setkey ( nCode )
if cBlock
 Eval( cBlock, procfile(1), procname(1), procline(1)  )
endif


if you put the code in a function, like myInkey() 1 should became 2... or 
3...

___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour 


___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] harbour: fantastic software!

2010-03-26 Thread Qatan

Hello,

   Me too, I am amazed.
   The developers are worth of it. They are almost full time dedicating 
themselves to make this project something really impressive.


Qatan

- Original Message - 
From: harbour-l...@cxxl.de

To: harbour@harbour-project.org
Sent: Friday, 26 de March de 2010 15:39
Subject: [Harbour] harbour: fantastic software!


dear list,

i am an old clipper summer 87 hacker and still actively maintain
one application in it (some 30k lines of code, for 13 years now...).
in the past i had to find solutions for different of its limitations
and so i looked into some alternatives just for fun this monday.

i found harbour and i'm simply BLOWN AWAY!  this is so much better
than i had imagined!

it took me only some hours to fix the missing externals in my existing
source code.  we had written some stuff ourselves, some of it in
assembler, most of it in clipper, some in C.

after it linked and i did some tests, i was amazed that almost
everything worked just like that.  harbour is incredibly compatible, i
only had to change the set filter to and set relation to commands
(missing database-).

of course, there were other little things to do, but i think that
after maybe 20 hours of work, the application could be considered
working again.  i'm still very impressed with your work, both compiler
and libs.

so, thank you again for your terrific work!  this mail is only for
praise.  though i have some tech questions, i will post them
independently, to ease discussion.

i would like to know: where can i send some money to support harbour
development?  it will save me a lot of time in the future and that's
worth some euros!  is there some coordinated fund?

thanks,

--
/chris/

___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour 


___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] SF.net SVN: harbour-project:[14188] trunk/harbour

2010-03-19 Thread Qatan

Hi,

   I humblely agree since HBIde is a tool and it is not the language so 
it should have a separate documentation to avoid overstuffing the Changelog.
   Also, this would help anyone interested in using this nice and 
impressive tool to find concentrate information in one place.

   I may be wrong... please correct me.

Qatan

- Original Message - 
From: Viktor Szakáts harbour...@syenar.hu

To: Harbour Project Main Developer List. harbour@harbour-project.org
Sent: Friday, March 19, 2010 7:19 AM
Subject: Re: [Harbour] SF.net SVN: harbour-project:[14188] trunk/harbour


Hi Pritpal,

I'd like to suggest to start a doc file inside hbide
dir and add hbide related documentation in there,
instead of using ChangeLog entries for this purpose.

Brgds,
Viktor

On 2010 Mar 19, at 09:50, vouch...@users.sourceforge.net wrote:


Revision: 14188

http://harbour-project.svn.sourceforge.net/harbour-project/?rev=14188view=rev
Author:   vouchcac
Date: 2010-03-19 08:50:45 + (Fri, 19 Mar 2010)

Log Message:
---
2010-03-19 01:40 UTC-0800 Pritpal Bedi (prit...@vouchcac.com)
 * contrib/hbide/ideskeletons.prg
   ! Meta concept enhanced further.
   -NAME=PROMPT ; then NAME will be the meta and string
 returned by PROMPT dialog will be assigned to -NAME
 for next occurances. The assignment is done only with
 -PROMPT meta.

 This feature is especially useful when skeleton is built
 defining a class:

 --- SKELETON ---

 #include common.ch

 /*--*/

 CLASS -NAME=PROMPT INHERIT IdeObject

DATA  oUI

METHOD new( oIde )
METHOD create( oIde )
METHOD destroy()

ENDCLASS

 /*--*/

 METHOD -NAME:new( oIde )

::oIde := oIde

RETURN Self

 /*--*/

 METHOD -NAME:create( oIde )

DEFAULT oIde TO ::oIde
::oIde := oIde

RETURN Self

 /*--*/



 --- INSERTION ( after input MyNewClass in the dialog ) ---

 #include common.ch

 /*--*/

 CLASS MyNewClass INHERIT IdeObject

DATA  oUI

METHOD new( oIde )
METHOD create( oIde )
METHOD destroy()

ENDCLASS

 /*--*/

 METHOD MyNewClass:new( oIde )

::oIde := oIde

RETURN Self

 /*--*/

 METHOD MyNewClass:create( oIde )

DEFAULT oIde TO ::oIde
::oIde := oIde

RETURN Self

 /*--*/

Modified Paths:
--
   trunk/harbour/ChangeLog
   trunk/harbour/contrib/hbide/ideskeletons.prg


This was sent by the SourceForge.net collaborative development platform, 
the world's largest Open Source development site.

___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour 


___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] mingw 4.5.0 benchmarks

2010-03-19 Thread Qatan

Hello Francesco,

   Just to mention: Did you try the hbmk2 -jobs=n option.
   This option starts n compilaton threads (multiprocess plataforms 
only).

   It works very well for me and reduces the compilation time.

Qatan

- Original Message - 
From: francesco perillo fperi...@gmail.com

To: Harbour Project Main Developer List. harbour@harbour-project.org
Sent: Friday, March 19, 2010 2:20 PM
Subject: Re: [Harbour] mingw 4.5.0 benchmarks



Though at least for live builds used by real users
IMO it's worth to take the pain of a longer build
to offer a faster working application. It's a one
time overhead on developer's side and and permanent
and noticeable gain on the users' side.


No problem for a lng one-time compiler build but I believe
that also prg compilation is slower... hbmk2 incremental helps a lot
but it is anyway a longer edit-compile-debug cycle
___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour 


___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] recommended C compiler for Win

2010-03-10 Thread Qatan

Maurilio,


PS. I've installed dragon media, smartsvn and I was able to build harbour
on
win32 very smoothly.

Maurilio.


Just to share my humble experience I've installed MingW-5.1.6,
TortoiseSVN-1.6.7.18415-win32-svn-1.6.9., UPX-304w without any problems
and I was able to build harbour from SVN on WinXP very well.

The mingw installation I found here:
http://sourceforge.net/projects/mingw/files/Automated%20MinGW%20Installer/
It was very simple for me. Maybe I was a lucky sailor in the first voyage?

Qatan


___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] recommended C compiler for Win

2010-03-10 Thread Qatan

Viktor,


  Just don't be mistaken by the misleading versioning of
mingw here, 5.1.6 has nothing to do with the gcc version
which the distro is based on, it's their own numbering
(similar to cygwin (1.7) and djgpp (2.04b) verison).


  Thanks for the nice explanation. It brings light for us to understand all 
that.



Now it's fine, the only problem is that it gives
you gcc version 3.4.5, which is a 6 years old version,
much less efficient than current ones.
[ Even if you chose candidate or current. ]
[ Besides it install itself into start menu, plus
saves temporary files without asking about it or
deleting them. But that's really minor issue compared
to the rest. ]


   Ok, Thanks again. I just downloaded TDM bundled installer and installed 
it. Pretty easy.
   Didn't notice much difference (my app is very small) but your advise 
gives me the centainty that I am now using the best tool for harbour.


   What do you think about changing the INSTALL file where it says:



Tools:
...
GNU Make
Windows binary + source:
   http://sourceforge.net/projects/mingw/files/MinGW%20make



   And put: http://www.tdragon.net/recentgcc/ instead (or as an option)?



   Just a humble suggestion, of course.

   Thanks


Qatan

___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] recommended C compiler for Win

2010-03-10 Thread Qatan

Viktor,



  What do you think about changing the INSTALL file where it says:

Tools:
   ...
   GNU Make
   Windows binary + source:
  http://sourceforge.net/projects/mingw/files/MinGW%20make

  And put: http://www.tdragon.net/recentgcc/ instead (or as an option)?

  Just a humble suggestion, of course.


It's there already, take a look at the 'C/C++ Compilers/Shells:'
subsection right at the beginning of '13. LINKS TO EXTERNAL COMPONENTS'
main section.



  You are right. I didn't notice that before. Thank you again for taking 
time to help.

  Regards,


Qatan 


___
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour