Search found 169 matches

by fafi
Mon Oct 28, 2019 10:19 pm
Forum: FiveWin for Harbour/xHarbour
Topic:
Replies: -1
Views:

Re: LINK ERROR: 19.09

Please try :

In the Project’s Settings, add /FORCE:MULTIPLE to the Linker’s Command Line options.

From MSDN: "Use /FORCE:MULTIPLE to create an output file whether or not LINK finds more than one definition for a symbol."


regards
fafi
by fafi
Sun Jan 21, 2018 8:14 pm
Forum: FiveWin for Harbour/xHarbour
Topic: PostgresSQL from core-master\contrib\hbpgsql
Replies: 28
Views: 17109

Re: PostgresSQL from core-master\contrib\hbpgsql

giuliano wrote:Hi.
Where can I find a list of all the functions inside the lib ?
Thanks a lot

Look at the
1. postgres.c
2. tpostgre.prg
in your D:\harbour\core-master\contrib\hbpgsql\

.or.
http://postgres-xc.sourceforge.net/docs/1_0/libpq.html

regards
fafi
by fafi
Tue Oct 17, 2017 7:22 pm
Forum: FiveWin for Harbour/xHarbour
Topic: understanding OOP returning more than value from a method
Replies: 14
Views: 4163

Re: understanding OOP returning more than value from a method

For a date like : 26/11/1965

This has to change right ? Else the result for day = always 0

if day(date()) <= day(::dDob)
// nAge3 := 0
nAge3 := day(::dDob) - day(date())

endif

Thank you Mr. Marc



oPerson1 :=Tperson():new("Marc Venken",ctod("26/11/1965"))

I think that is your DOB, right ...
by fafi
Tue Oct 17, 2017 1:03 pm
Forum: FiveWin for Harbour/xHarbour
Topic: understanding OOP returning more than value from a method
Replies: 14
Views: 4163

Re: understanding OOP returning more than value from a method

Hello,
Please test..

#include "fivewin.ch"function main&#40;&#41;local oPerson1,oPerson2&nbsp; SET _3DLOOK ON&nbsp; set date british&nbsp; set century on&nbsp; set delete on&nbsp; set confirm on&nbsp; SET EPOCH TO Year&#40; Date&#40;&#41; &#41; - 60&nbsp; set date format to "DD/MM/YYYY"oPerson1 ...
by fafi
Tue Sep 05, 2017 6:43 pm
Forum: FiveWin for Harbour/xHarbour
Topic: how to assign the sql query results to the variable
Replies: 7
Views: 1316

Re: how to assign the sql query results to the variable

The result is constantly 0?

Function New&#40;&#41; Local NewName:=0 oSql:exec&#40;"SELECT sum(Value) AS NewName FROM Invice WHERE poz='123')MsgInfo(NewName)return

cSQL := "SELECT sum(Value) AS NewName FROM Invice WHERE poz='123'"oSql:exec&#40; cSql,,.t.,@aData &#41;NewName := aData&#91;1&#93 ...
by fafi
Wed Jul 05, 2017 10:31 pm
Forum: FiveWin for Harbour/xHarbour
Topic: JSON decoding
Replies: 1
Views: 511

Re: JSON decoding

TimStone wrote:Does anyone have examples / commands for decoding a JSON file ? One of my resources has converted their output to JSON and I need to revise my code accordingly.

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=32519
regards
Fafi
by fafi
Wed May 31, 2017 11:09 pm
Forum: FiveWin for Harbour/xHarbour
Topic: PostgresSQL from core-master\contrib\hbpgsql
Replies: 28
Views: 17109

Re: PostgresSQL from core-master\contrib\hbpgsql

nageswaragunupudi wrote:Now FWH 17.05 revised build provides support for hbpglib's query object.



:D you are the master of SQL Databases :

Now I'm going to test \harbour-core-master\contrib\hbsqlit3

Regards
Fafi
by fafi
Wed May 31, 2017 2:49 pm
Forum: FiveWin for Harbour/xHarbour
Topic: MySql, MariaDB and PostgeSQL are FWMARIADB's compatible?
Replies: 9
Views: 2274

Re: MySql, MariaDB and PostgeSQL are FWMARIADB's compatible?

But please tell me why do you want postgresql?
Isn't mariadb enough?

Mr. Rao..

a litle faster than mysql for Insert command

Please test here :
#include "fivewin.ch"#include "dbstruct.ch"#include "mysql.ch"#include "DbStruct.ch"#define _STRU_FIELDNAME &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 1 ...
by fafi
Sun May 28, 2017 5:33 pm
Forum: FiveWin for Harbour/xHarbour
Topic: PostgresSQL from core-master\contrib\hbpgsql
Replies: 28
Views: 17109

Re: PostgresSQL from core-master\contrib\hbpgsql

Mr Fafi

Thanks for the good example.
I never used Postgresql and interested in learning.

Please test to compare with mysql :
#include "fivewin.ch"#include "xbrowse.ch"#define BLOCK_SIZE &nbsp; &nbsp; 4096#include "FileIO.ch"#include "hbclass.ch"#include "postgres.ch"#require "hbpgsql"#include ...
by fafi
Sun May 28, 2017 5:03 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Display web content without activex
Replies: 5
Views: 974

Re: Display web content without activex

cdmmaui wrote:Hello,

Has anyone been able to load content from web page in a dialog without activex? Perhaps via JSON?

I would appreciate assistance on this.

Thank you,


http://forums.fivetechsupport.com/viewtopic.php?f=3&t=32519
by fafi
Fri May 26, 2017 9:53 am
Forum: FiveWin for Harbour/xHarbour
Topic: PostgresSQL from core-master\contrib\hbpgsql
Replies: 28
Views: 17109

PostgresSQL from core-master\contrib\hbpgsql

I tested with PostgreSQL versi 9:
#include "fivewin.ch"#include "xbrowse.ch"#require "hbpgsql"#include "DbStruct.ch"REQUEST DBFNTXREQUEST DBFCDXREQUEST DBFFPTREQUEST DBFDBTstatic aData,oBrwDataPROCEDURE Main&#40; cHost, cDatabase, cUser, cPass &#41; LOCAL oServer, oQuery, oRow, i, x, aTables ...
by fafi
Fri May 26, 2017 7:22 am
Forum: FiveWin for Harbour/xHarbour
Topic: how lpressed works?
Replies: 6
Views: 1147

Re: how lpressed works?

thank you Fafi, but how can I to check in "static function Hello" if BtnEsc was pressed ?

ciao
#include "FiveWin.ch"static lExitfunction main&#40;&#41;local oDlg,cGet := space&#40;20&#41;, oGet , cGet1 := spac&#40;20&#41;, oGet1lExit := .f.define dialog oDlg from 1,1 to 200,200 pixel title "Test ...
by fafi
Thu May 25, 2017 7:31 pm
Forum: FiveWin for Harbour/xHarbour
Topic: how lpressed works?
Replies: 6
Views: 1147

Re: how lpressed works?

Please try :
#include "FiveWin.ch"function main&#40;&#41;local oDlg,cGet := space&#40;20&#41;, oGet , cGet1 := spac&#40;20&#41;, oGet1define dialog oDlg from 1,1 to 200,200 pixel title "Test"@ 1,20 get oGet &nbsp;var cGet &nbsp;size 60,12 of oDlg pixel valid &#40; Hello&#40;cGet&#41;, .t. &#41;@20 ...
by fafi
Mon May 15, 2017 5:30 am
Forum: FiveWin for Harbour/xHarbour
Topic: Modifying tGroup class
Replies: 15
Views: 3155

Re: Modifying tGroup class

my color border and gradient :
https&#58;//s29&#46;postimg&#46;org/4jyxlut5z/tgroup3&#46;jpg

#include "FiveWin.ch"#include "Constant.ch"#define WM_NCHITTEST &nbsp; &nbsp; 132 &nbsp;// 0x84#define WM_UPDATEUISTATE 296 &nbsp;// 0x0128#define DT_TOP &nbsp; &nbsp; &nbsp; &nbsp; 0#define DT_LEFT ...
by fafi
Mon May 15, 2017 1:21 am
Forum: FiveWin for Harbour/xHarbour
Topic: Modifying tGroup class
Replies: 15
Views: 3155

Re: Modifying tGroup class

gradient
https&#58;//s30&#46;postimg&#46;org/na7vc2ggx/tgroup2&#46;jpg

#include "FiveWin.ch"#include "Constant.ch"#define WM_NCHITTEST &nbsp; &nbsp; 132 &nbsp;// 0x84#define WM_UPDATEUISTATE 296 &nbsp;// 0x0128#define DT_TOP &nbsp; &nbsp; &nbsp; &nbsp; 0#define DT_LEFT &nbsp; &nbsp; &nbsp; &nbsp ...