Gracias claudio <br><br>Algo similar estuve leyendo aca:<br><br><a href="http://wiki.lazarus.freepascal.org/Lazarus_Tdbf_Tutorial/es">http://wiki.lazarus.freepascal.org/Lazarus_Tdbf_Tutorial/es</a><br><br>Me sirve lo que comentas respecto a los indices .<br>
<br>Evidentemente es mejor tratar de usar SQL pero estoy armando algo<br>como para poder experimentar con Lazarus , y me esta gustando.<br><br>La idea seria luego tratar de hacer algo con Mysql o mejor con Postgres<br><br>
Conoces cual componente me conviene para esto  ?<br><br>Bruno <br><br><div class="gmail_quote">El 20 de junio de 2009 19:11, Claudio Romero <span dir="ltr"><<a href="mailto:clauslack@gmail.com">clauslack@gmail.com</a>></span> escribió:<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">En el componente TDbf no se pueden usar los indices CDX (aun creo),<br>
usa indices MDX.<br>
Aca un fragmento para indexar una tabla DBF con lazarus. El acceso del<br>
archivo debe ser exclusivo.<br>
<br>
   dbf1.TableName:=RutaDbf;<br>
    Dbf1.Exclusive := True;<br>
    DeleteFile(ExtraerExtension(RutaDbf)+'.mdx');//borra el indice<br>
        Dbf1.Open;<br>
    try<br>
        Dbf1.AddIndex(campo_clave, campo_clave, [ixPrimary, ixUnique]);<br>
    except<br>
        GrabaLog(Kinfo,'No pudo acceder, para indexar, en forma<br>
exclusiva a '+RutaDbf+'; o campo clave incorrecto');<br>
        raise;<br>
    end;<br>
    Dbf1.Exclusive := false;    Dbf1.IndexName :=campo_clave;<br>
<br>
Luego puedes buscar con Dbf1.SearchKey.<br>
<div><div></div><div class="h5"><br>
_______________________________________________<br>
Lazarus-es mailing list<br>
<a href="mailto:Lazarus-es@lists.lazarus.freepascal.org">Lazarus-es@lists.lazarus.freepascal.org</a><br>
<a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es" target="_blank">http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es</a><br>
</div></div></blockquote></div><br>