problem to check xbrowse

problem to check xbrowse

Postby Silvio.Falconi » Sat Jan 02, 2016 9:34 pm

to select a record on xbrowse I use a field call "select" of 1 character
when I wish select a record I change the field select with a replace

sample :
Replace MV->SELECT with "x"

OR to deselect I use another replace

sample :
Replace MV->SELECT with " "

it run ok but I see the operation is too slow

how I can make to make it fast ?
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7048
Joined: Thu Oct 18, 2012 7:17 pm

Re: problem to check xbrowse

Postby Randal » Tue Jan 05, 2016 1:42 am

You could create an array of record numbers or primary keys and then setup the "Checked" column something like this:

oCol:AddResource( FWBmpOn() )
oCol:AddResource( FWBmpOff() )
oCol:bBmpData := { || iif(ascan(aTagged,Invoice->invno) > 0, 1, 2) }

Randal
Randal
 
Posts: 260
Joined: Mon Oct 24, 2005 8:04 pm

Re: problem to check xbrowse

Postby Silvio.Falconi » Tue Jan 05, 2016 10:26 am

Randal I use dbf no array
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)
I use : FiveWin for Harbour November 2023 - January 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
User avatar
Silvio.Falconi
 
Posts: 7048
Joined: Thu Oct 18, 2012 7:17 pm

Re: problem to check xbrowse

Postby ukoenig » Tue Jan 05, 2016 3:11 pm

Silvio,

the way I'm selecting a record
i need a three-way status and using a numeric field instead of a characterfield with "" and "X"
values are
0 = nothing
1 = Yes
2 = No
a right mouseclick scrolls the status vom 0 to 2 like 0, 1, 2, 0, 1,2

I never use REPLACE because it is known, to be slow

I added a numeric field < CHECK N 1.0 > to customer.dbf for a test

Image

a full sample

Download :
http://www.pflegeplus.com/DOWNLOADS/Select1.zip

best regards
Uwe :D
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 118 guests