Search found 169 matches

by fafi
Mon Oct 28, 2019 10:19 pm
Forum: FiveWin for Harbour/xHarbour
Topic: LINK ERROR: 19.09
Replies: 11
Views: 1127

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: 4047

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: 2628

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 :D oPerson1 :=Tperson():new("Marc Venken",ctod("26/11/1965")) I think that is your D...
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: 2628

Re: understanding OOP returning more than value from a method

Hello, Please test.. #include "fivewin.ch" function main() local oPerson1,oPerson2   SET _3DLOOK ON   set date british   set century on   set delete on   set confirm on   SET EPOCH TO Year( Date() ) - 60   set date format to "DD/MM/YYYY" oPerson1 :=Tperson():new("Enas Samir&...
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: 977

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

The result is constantly 0? Function New() Local NewName:=0  oSql:exec("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( cSql,,.t.,@aData ) NewName := aData[1][1]   :D :D
by fafi
Wed Jul 05, 2017 10:31 pm
Forum: FiveWin for Harbour/xHarbour
Topic: JSON decoding
Replies: 1
Views: 493

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/viewt ... =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: 4047

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: 1477

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     ...
by fafi
Sun May 28, 2017 5:33 pm
Forum: FiveWin for Harbour/xHarbour
Topic: PostgresSQL from core-master\contrib\hbpgsql
Replies: 28
Views: 4047

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     4096 #include "FileIO.ch" #include "hbclass.ch" #include "post...
by fafi
Sun May 28, 2017 5:03 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Display web content without activex
Replies: 5
Views: 818

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/viewt ... =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: 4047

PostgresSQL from core-master\contrib\hbpgsql

I tested with PostgreSQL versi 9: #include "fivewin.ch" #include "xbrowse.ch" #require "hbpgsql" #include "DbStruct.ch" REQUEST DBFNTX REQUEST DBFCDX REQUEST DBFFPT REQUEST DBFDBT static aData,oBrwData PROCEDURE Main( cHost, cDatabase, cUser, cPass )    LOCAL ...
by fafi
Fri May 26, 2017 7:22 am
Forum: FiveWin for Harbour/xHarbour
Topic: how lpressed works?
Replies: 6
Views: 775

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 lExit function main() local oDlg,cGet := space(20), oGet , cGet1 := spac(20), oGet1 lExit := .f. define dialog oDlg from 1,1 to 200,200 pixel title "T...
by fafi
Thu May 25, 2017 7:31 pm
Forum: FiveWin for Harbour/xHarbour
Topic: how lpressed works?
Replies: 6
Views: 775

Re: how lpressed works?

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

Re: Modifying tGroup class

my color border and gradient : https://s29.postimg.org/4jyxlut5z/tgroup3.jpg #include "FiveWin.ch" #include "Constant.ch" #define WM_NCHITTEST     132  // 0x84 #define WM_UPDATEUISTATE 296  // 0x0128 #define DT_TOP         0 #define DT_LEFT        0 #define DT_CENTER      1 #defi...
by fafi
Mon May 15, 2017 1:21 am
Forum: FiveWin for Harbour/xHarbour
Topic: Modifying tGroup class
Replies: 15
Views: 2419

Re: Modifying tGroup class

gradient https://s30.postimg.org/na7vc2ggx/tgroup2.jpg #include "FiveWin.ch" #include "Constant.ch" #define WM_NCHITTEST     132  // 0x84 #define WM_UPDATEUISTATE 296  // 0x0128 #define DT_TOP         0 #define DT_LEFT        0 #define DT_CENTER      1 #define DT_RIGHT       2 #d...