Does TDatabase supports SEEK LAST?

Does TDatabase supports SEEK LAST?

Postby hua » Tue Nov 07, 2023 5:03 am

Looking at TDatabase of FWH1912, I don't see support for 3rd param for dbSeek(). It is the equivalent of SEEK LAST
Is this rectified in latest version of FWH?
FWH 11.08/FWH 19.12
BCC5.82/BCC7.3
xHarbour/Harbour
hua
 
Posts: 1072
Joined: Fri Oct 28, 2005 2:27 am

Re: Does TDatabase supports SEEK LAST?

Postby nageswaragunupudi » Tue Nov 07, 2023 5:54 am

Please try
Code: Select all  Expand view  RUN
oDbf:DbSeek( cSeek, nil, .T. )

This works with FWH1912 also,
Don't bother if you can not find the method DbSeek()
With database class we call use any (x)Harbour function as if it is a method, if that function is linked to the application.

Note:
If you get runtime error, just include this line anywhere at the end of your prg
Code: Select all  Expand view  RUN
EXTERNAL DBSEEK
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10655
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Does TDatabase supports SEEK LAST?

Postby hua » Tue Nov 07, 2023 6:53 am

Thanks Rao,
Saved me a few keystrokes :)
I normally would type as (oDbf:cAlias)->(dbSeek(cSeek, nil, .t.))
FWH 11.08/FWH 19.12
BCC5.82/BCC7.3
xHarbour/Harbour
hua
 
Posts: 1072
Joined: Fri Oct 28, 2005 2:27 am

Re: Does TDatabase supports SEEK LAST?

Postby nageswaragunupudi » Tue Nov 07, 2023 7:21 am

Not only DBSEEK,
You can use any (x)Harbour function as if it is a METHOD.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10655
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Does TDatabase supports SEEK LAST?

Postby James Bott » Fri Nov 10, 2023 1:42 am

Saved me a few keystrokes :)
I normally would type as (oDbf:cAlias)->(dbSeek(cSeek, nil, .t.))


If you use database objects then you can just do:

oCustomer:goBottom()
FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10
User avatar
James Bott
 
Posts: 4840
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA

Re: Does TDatabase supports SEEK LAST?

Postby nageswaragunupudi » Fri Nov 10, 2023 4:08 am

He is using database object.
But he is not looking for DbGoBottom()
He is looking for
Code: Select all  Expand view  RUN
SEEK cSeek LAST // i.e., DBSEEK( cSeek, nil, .T. )

which is totally different from "GoBottom()"
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10655
Joined: Sun Nov 19, 2006 5:22 am
Location: India


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 29 guests