[Lazarus] use of the function Locate

[Héctor Fiandor]

Dear:

 

I have found some documentation about locate and repaired my program in this
way:

 

           //fdm.tNegocios.Locate('codigo',eCodNeg.Text,[]);

           //fdm.tAnexo_i_m.FieldByName('nomNeg').AsString
:=fdm.tNegocios.FieldByName('nombre').AsString;

 

           if fdm.tNegocios.Locate('codigo',eCodNeg.Text,[]) then

           begin

             fdm.tAnexo_i_m.FieldByName('nomNeg').AsString
:=fdm.tNegocios.FieldByName('nombre').AsString;

           end

           else           begin           end;

 

and it work well.

 

Thanks for your help.

 

hfiandor

 

De: Aradeonas [mailto:aradeonas at operamail.com] 
Enviado el: sábado, 8 de agosto de 2015 09:36 a. m.
Para: lazarus at lists.lazarus.freepascal.org
Asunto: Re: [Lazarus] use of the function Locate

 

As I remember locate is a function with boolean value.

Check it out.

 

Regards,

Ara

 

 

 
-- 
http://www.fastmail.com - A no graphics, no pop-ups email service
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20150808/50aaae53/attachment-0003.html>