New FWH 18.04

[Antonio Linares]

viewtopic.php?f=16&t=35712&start=0

[TimStone]

In another thread there is mention a new update to this release would be posted.

Can you please advise when the update is posted so we can download that one. Apparently it addresses issues with the DIALOG in xHarbour.

Thanks.

[fraxzi]

In another thread there is mention a new update to this release would be posted.

Can you please advise when the update is posted so we can download that one. Apparently it addresses issues with the DIALOG in xHarbour.

Thanks.

Hi Mr. Tim,

The new release was already published. I already downloaded it.

[nageswaragunupudi]

In another thread there is mention a new update to this release would be posted.

Can you please advise when the update is posted so we can download that one. Apparently it addresses issues with the DIALOG in xHarbour.

Thanks.

The issue pertains to MariaDB.
Not to dialogs as such.

[TimStone]

Thank you.

I suppose it is time to start playing with SQL ...

[Rick Lipkin]

Tim

I use MS Access and ( free ) Sql Express Server 2017 .. the nice thing about this combination . is you can use the same code for both and just change the connection string and your code is ( virtually ) seamless.

The only quirk about MS Access is quering by datetime .. and you have to use hash tags to surround your query dates instead of single quotes ..:

Code: Select all  Expand view  RUN

     cSQL := "SELECT * from WORKORD"
     If xDatabase = "S"  // sql server
        cSQL += " where date_out >= '"+DTOC(LDATE)+"' and date_out <= '"+DTOC(HDATE)+"'"
     Else                       // ms access
        cSql += " WHERE [Date_Out] >= #"+dtoc(lDate)+"# And [Date_Out] <= #"+dtoc(hDate)+"#"
     ENdif
     cSQL += " and wotype = '2' and ageneid = '"+xAGENEID+"' order by DATE_out"

 

This allows you to use MS Access as a portable database for those customers that can not afford MS Sql Server, however, you can also deploy Sql Express to your customer, but is more difficult for a small Customer to manage.... and you can forget about ANY optlock headaches and cranky dbf access on network shares.

Rao has created a whole set of ado wrappers to simplify the connections, recordsets, etc .. see \source\function\adofuncs.prg for the syntax .. or you can do it the ole fashioned ansi sql way .. \samples\AdoRick.prg ( ms access )

I only use DBfCdx for creating temporary tables for reports.

Rick Lipkin

[byte-one]

New SPINNER BUTTONS <cbmp1>,<cbmp2> and RIHGTTOLEFT for TGet seems not functioning! Headers (.CH) wrong?

[Antonio Linares]

Günther,

Could you provide an example to test that was working fine and it is not working now ? thanks

[byte-one]

Antonio, the source of TGet-class is ok, but in fivewin.ch the new clausulas are not present!

[nageswaragunupudi]

The new clauses are present only in @ row,col GET command but not in REDEFINE command. In fact, we did not test this feature with resources.

However, can you test with resources and offer your feedback?
In the REDEFINE GET command, can you please replace the line

Code: Select all  Expand view  RUN

            [ <spin: SPINNER> [ON UP <SpnUp>] [ON DOWN <SpnDn>] [MIN <Min>] [MAX <Max>] ] ;
 

with

Code: Select all  Expand view  RUN

           [ <spin: SPINNER> [BUTTONS <bmp1>,<bmp2> ] [ON UP <SpnUp>] [ON DOWN <SpnDn>] [MIN <Min>] [MAX <Max>] ] ;
 

Please ensure that you do not include VSCROLBAR in the style while defining the resource in the rc file.

[byte-one]

Mr. Rao,
I have tested for now oGet:lRightToLeft := .T. on get from resources.
Is functioning but the foreground-color is not respecting COLOR-Clause (always black).

[nageswaragunupudi]

Painting is done with ::nClrText.
May I know how did you set the color?

[byte-one]

Code: Select all  Expand view  RUN

REDEFINE GET obetrag VAR finanz->betrag ID 107 OF oDialog PICTURE PIC_BETRAG MESSAGE "Betrag" UPDATE COLOR NSAYFARBE_ALL_INVERS,NSAYFARBE_ALL FONT oFont_konto WHEN larbeit .and. !finanz->check1