Re: [Lazarus] locate command for dBase

2023-05-27 Thread Werner Pamler via lazarus
The attached project demonstrates that dbf.Locate works as expected. <> -- ___ lazarus mailing list lazarus@lists.lazarus-ide.org https://lists.lazarus-ide.org/listinfo/lazarus

Re: [Lazarus] locate command for dBase

2023-05-26 Thread wkitty42--- via lazarus
On 5/26/23 7:31 AM, Michael Van Canneyt via lazarus wrote: On Fri, 26 May 2023, wkitty42--- via lazarus wrote: i don't see where you did a seek to the record you are trying to get to... granted, it has been a long while since i did anything with FPC/Lazarus or an dBase databases but it would

Re: [Lazarus] locate command for dBase

2023-05-26 Thread Michael Van Canneyt via lazarus
On Fri, 26 May 2023, wkitty42--- via lazarus wrote: On 5/25/23 8:12 PM, john Ward via lazarus wrote:   if   temp.Locate('temp_no', (tempid),[loPartialkey])   then   begin     showmessage('we found the field or Partial' + tempid);     showmessage('current temp_no is ');     tno :=

Re: [Lazarus] locate command for dBase

2023-05-26 Thread wkitty42--- via lazarus
On 5/25/23 8:12 PM, john Ward via lazarus wrote:   if   temp.Locate('temp_no', (tempid),[loPartialkey])   then   begin     showmessage('we found the field or Partial' + tempid);     showmessage('current temp_no is ');     tno := temp.FieldbyName('temp_no').asString;   

[Lazarus] locate command for dBase

2023-05-25 Thread john Ward via lazarus
I need to find records in an indexed dBase file based on a key. version is 2.2.6 fpc 3.2.2 x86_64. The following is the test I did in the program. The dBase file is temp.dbf and the index if temp.mdx; The program includes tDbf and tDatasource. I also have tDbnavigator in the program, all