Firebird a pelo-o sin componentes de Terceros

[MAXIUM]

Pues que repito que los enlaces publicados inmediatamente anterior a mi post, no estan accesibles.

No se encuentra el blog que busca.
Cita:
Could not open the requested SVN filesystem
Cita:
An Exception Has Occurred

The root "hdstiflamebird" is unknown. If you believe the value is correct, then please double-check your configuration.

HTTP Response Status

404 Repository not found
Cita:
Oops! Google Chrome could not find avedefuego.hdsti.com
Suggestions:
Go to hdsti. com
Search on Google:

[Casimiro Noteví]

Si te refieres a la web de firebird.mx, han estado dos o tres días caídos por un problema con su servidor, pero ayer estaban ya funcionando.

[JXJ]

yo no me refiero a la web firebird.com.mx sino a los enlaces del articulo

http://nettrodon.blogspot.com/2009/0...lphi-2006.html

https://hdstiflamebird.svn.sourcefor.../firebird_2.1/

http://avedefuego.hdsti.com/

[NetTrodon]

El TRAC se encuentra en:

dev.hdsti.com/cardenal/trac/

No hay SVN por el momento y aún pienso si será necesario ponerlo.
Tengo un repositorio mercurial, no es público, pero si desean ayudarme, puedo brindarles un nombre de usuario y contraseña a quién sea necesario.

Las descargas directas están en la siguiente dirección y la explicación de ellas en el TRAC:

downloads.hdsti.com/cadenal/firebird_api/

Realmente abandoné el proyecto momentaneamente porque Delphi 2010 trae acceso a Firebird con DBX4, pero solo en las versiones Enterprise y Architect. Aparentemente el driver incluido es una copia del driver para InterBase (DBX Adapter, no nativo), pero no lo puedo asegurar, porque la instalación solo incluye los fuentes para el manejo de metadatos y el driver en si solo está en binario como DLL.

[JXJ]

Gracias NetTrodon, por responder

no tienes ejemplos de su uso?

[NetTrodon]

El único ejemplo que tengo es el como administrar los usuarios con el Services API de Firebird, que es el proyecto incluido en el port de del API versión 2.0; pero según lo que tengo entendio, usar cadenas como buffers, ya no es muy válido en Delphi 2007 y superior.

Si tienes a la mano Interbase 6: API Guide puedes usar los ejemplos, pero traduciéndolos a pascal, es lo que hago actualmente.

Actualmente uso punteros y GetMem-FreeMem en Delphi 2010 para desarrollar el driver DBX4, pero tampoco es muy agradable el hacer casts de un puntero a otro para respetar la aritmética, por ejemplo, para obtener el tamaño del buffer uso:

Código Delphi [-]
dbp_length := PByte(dbp_buffer_current) - PByte(dbp_buffer);

para incrementar el puntero:

Código Delphi [-]
Inc(PByte(dbp_buffer_current));

para escribir un byte en el puentro del byte actual:

Código Delphi [-]
PByte(dbp_buffer_current)^ := isc_dpb_version1;

y para escribir cadenas:

Código Delphi [-]
Move(tmp_string, dbp_buffer_current, tmp_string_length);

Estoy revisando mis códigos para usar en lugar de GetMem-FreeMem los arreglos de bytes (TBytes), que son más amigables que los punteros.

Pero si tienes prisa, te adjunto el como realizo la conexión actualmente, usando punteros y GetMem-FreeMem; pueden servirte de mala guia por el momento.