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:[email protected]]
Enviado el: sábado, 8 de agosto de 2015 09:36 a. m.
Para: [email protected]
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
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
