Firebird y ADO/ODBC en D2010

[cesarsoftware]

Que menos quillotmarc, gracias a ti.

En cuanto a lo que propone gallosuarez solo comentar un tema.
Creo (en mi opinion) que cuantos menos componentes de terceros usemos, mas estable, mas controlable y mas portable sera nuestra aplicacion.
Con esto no quiero decir que no usemos componentes que nos puedan hacer mejor "la vida" pero que ha pasado al migrar a D2010, que los amigos de embarcadero "nos joden" un poco, yo he pagado por el producto, y luego me encuentro que no puedo migrar un moton de programas que ya he realizado, no puedo/debo (que ahora lo hago) usar 2 compiladores simultaneamente ¡QUIERO SOLO UNO!. Ya me paso con quick report, a la mier**da un monton de aplicaciones, entonces, ¿que hago? uso un componente de terceros, pero ¿me funcionara en mi nuevo compilador? casi seguro que no.
Por tanto, si se puede usar solo el IDE basico y el resto currartelo tu mismo, al principio cuesta mas, pero luego....jejeje, CONTROL TOTAL.

Pues eso, si puedo usar una libreria externa, un solo dll y luego el creador de esta lo mantiene pues mejor, pero lo mejor, es que el codigo que ya habia escrito con los componentes dbxpress (un monton de aplicaciones) me FUNCIONAN TODAS, NO TENGO QUE REESCRIBIR como por ejemplo al intentar usar ADO/ODBC que es lo que empece para evitar usar componentes de terceros. Y si es sobre libre, mejor.

[lbuelvas]

Hola foro.

Pues les cuento, resulta que he trabajado con Delphi 6 + IBX + Firebird 1.5.6, adquirí licencia para RAD Studio 2007 hace un par de años, trate de migrar las aplicaciones pero desistí por falta de tiempo y he continuado con Delphi 6.

Ahora aparecen nuevas dificultades, mis aplicaciones compiladas con Delphi 6 no corren conectandome al motor Firebird 2.x, razon por la que estoy haciendo pruebas con "Delphi 2010" y con los componentes dbExpress.

Resulta que los dbExpress como son mas genericos que los componentes especificos IBX (construidos para Interbase no para Firebird) no tienen ciertas características que me son de mucha utilidad: Conocer el Plan de una Consulta por medio del método TIBSQL.Plan, Administrar Usurios, Roles y permisos con el componente TIBSecurityService de la pestaña Interbase Admin.

Como podrían hacerse estas cosas con los componentes dbExpress ?

[guillotmarc]

Buenos días.

Empezado por lbuelvas

Resulta que los dbExpress como son mas genericos que los componentes especificos IBX (construidos para Interbase no para Firebird) no tienen ciertas características que me son de mucha utilidad: Conocer el Plan de una Consulta por medio del método TIBSQL.Plan, Administrar Usurios, Roles y permisos con el componente TIBSecurityService de la pestaña Interbase Admin.

Como podrían hacerse estas cosas con los componentes dbExpress ?

Para gestionar Roles, hay el comando CREATE/DROP ROLE. En Firebird 2.5 se ha añadido el comando CREATE/ALTER/DROP USER para gestionar usuarios. En caso de que no quieras aún cambiar a FB 2.5, puedes usar la herramienta de línea de comandos gsec.exe, solo tienes que copiarla junto a tu aplicación, para poder llamarla cuando la necesites y crear y modificar usuarios.

Finalmente, para gestionar permisos tienes el comando GRANT. (ejplo. GRANT SELECT, INSERT ON CLIENTES TO "PUBLIC").

Todos estos comandos los puedes ejecutar directamente en SQL por dbexpress.

Lo que no conozco es como averiguar el PLAN de una consulta utilizando solo dbExpress.

NOTA: Yo siempre pruebo mis consultas en IBExpert antes de incorporarlas a los programas, de esta forma me aseguro, comprobando su PLAN, de que tengan los índices adecuados.

Saludos.

[guillotmarc]

Vaya que casualidad. Firebird 2.5 acaba de ser liberado hoy mismo, así que ya no hay excusa para cambiarse a él y así poder gestionar las cuentas de usuario mediante sentencias SQL.

[cesarsoftware]

Hola de nuevos compis.

Perdonarme la intromision para formularos una pregunta,
¿Como puedo crear la base de datos desde codigo?, ya sabeis que no me gusta usar otras aplicaciones, hasta ahora usaba ibaccess para crearlas, pero me empieza a dar problemas y prefiero crearlas yo.

He probado SQLConnection.ExecuteDirect('CREATE DATABASE c:\mibase.fdb') y me dice que no encuentra el fichero, "UNAVAILABLE DATABASE".
En la pagina http://www.firebirdsql.org/refdocs/l...reate-database dice que se hace asi, pero supongo que lo que "falla" es el componente tsqlconnecion, no se.

Una ayudita "please", prometo documentarlo, jejeje

[guillotmarc]

Hola.

Yo en mi aplicación tengo una copia de una base de datos vacía, así que para crear una nueva bbdd por código, solo tengo que copiar la base de datos en blanco.

Puedes probar a conectar a una base de datos existente y desde esa conexión lanzar el create database.

Puedes ejecutar el comando externo isql.exe para ejecutar un script de creación de la base de datos (aunque tendrás que distribuir con tu aplicación el isql.exe para asegurarte de tenerlo disponible).

También puedes probar usar directamente el api de Firebird, saltándote dbExpress.

http://stackoverflow.com/questions/4...ress-in-delphi

Finalmente parece que en DBX4, a partir de Delphi 2007, ya se puede hacer. Pero no logro encontrar el artículo que citan en los blogs de Embarcadero (es como si todas las entradas de la epoca Borland/CodeGear hayan sido eliminadas). Parece que esa funcionalidad viene en dbxcommons.pas

http://es.w3support.net/index.php?db=so&id=400114

Saludos.

[cesarsoftware]

Gracias guillotmarc.
Yo uso la misma tecnica, dispongo de una base de datos vacia y la mando junto con la aplicacion y creo las tablas que necesito.
Los articulos mencionados ya los habia leido, parece facil con ib pero no asi con dbx, creo que seguiremos usando la tecnica de base en blanco ya que el comando "create database" con una base dase datos abierto indica "cannot prepare a CREATE DATABASE/SCHEMA statement".

Seguiremos investigando.

[Estifmauin]

Empezado por cesarsoftware

Hola de nuevos compis.
¿Como puedo crear la base de datos desde codigo?, ya sabeis que no me gusta usar otras aplicaciones, hasta ahora usaba ibaccess para crearlas, pero me empieza a dar problemas y prefiero crearlas yo.

SQLConnection, al igual que ADOConnection necesita una base de datos a la que conectarse para poder "actuar", así que no puede crear ella misma una desde cero.
Yo uso el componente TIBDatabase, de las IBX de Delphi, ya que la creación de una bbdd Firebird es igual a una Interbase (al menos por ahora).

Código Delphi [-]
function CrearBDFB(path :string; ps :integer; cs :string):boolean;
var
    db :TIBDatabase;
    r :string;
begin
result:=false;
if ps <= 0 then ps:=4096;
if cs = '' then cs:='ISO8859_1';
db:=TIBDatabase.Create(nil);
try
    with db.Params do begin
        Clear;
        Add('user ''sysdba''');
        Add('password ''masterkey''');
        Add('page_size = '+IntToStr(ps));
        Add('default character set '+cs);
    end;
    db.SQLDialect:=3;
    db.DatabaseName:=path;
    try
        db.CreateDatabase;
        result:=true;
    except
        on e:exception do
            ShowMessage('No se ha podido crear la base de datos.'+#13+'Motivo: '+e.Message);
    end;
finally
    FreeAndNil(db);
end;
end;

Requiere uses ibdatabase

Espero que te ayude.