Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 28-07-2011
Avatar de Thoma
Thoma Thoma is offline
Miembro
NULL
 
Registrado: abr 2011
Posts: 46
Poder: 0
Thoma Va por buen camino
maeyanes, ante todo darte las gracias por tu ayuda.
A ver si capto un poco como funciona.
Tengo un TIBDataBase: Name: dbCrearBD
E añadido un TIBScript: Name ScriptBD
DataBase: dbCrearBD
En c:\BD\tbsistema.ini
[Tablas]
TUsuarios=c:\BD\usuarios.sql

En c:\BD\usuarios.sql
CREATE TABLE TUSUARIOS
(
"IDUSUARIO" INTEGER NOT NULL,
"USUARIO" VARCHAR(50) ,
"CLAVEACCESO" VARCHAR(50) ,
"FECHACADUCIDAD" TIMESTAMP ;
CONSTRAINT "TUSUARIOSPRIMARYKEY" PRIMARY KEY ("IDUSUARIO")
);
CREATE UNIQUE INDEX "USUARIOKEY" ON "TUSUARIOS"("USUARIO");

Código Delphi [-]
function LeerCampoIni(etiqueta,texto,campo:string):string;
begin
   Result:='';
   with TIniFile.Create(sFileIni) do
   try
     Result:=ReadString(etiqueta,texto,'');
     Free;
   finally
     Free;
   end;
end;
--------------------------------------------------------------------------
sSQL:=LeerCampoIni('Tablas','TUsuarios','');
if sSQL<>'' then begin
  if dbCrearBd.Connected then dbCrearBd.Connected:=False;
  dbCrearBd.DatabaseName:=NameBD;
  dbCrearBd.Connected:=True;
  with ScriptBD do try
    ScriptBD.Script :=sSQL;
  except

  end;
end;

Me da el siguiente error
[DCC Error] E2010 Incompatible types: 'TStrings' and 'string'

Última edición por Thoma fecha: 28-07-2011 a las 17:33:31.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
¿Cómo creo una base de datos desde Delphi? Thoma Firebird e Interbase 12 27-07-2011 20:27:16
como creo una tabla mientras el programa esta en ejecucion? gonza_619 Varios 3 15-02-2010 13:44:36
insertar datos en una tabla desde fichero XML??? mguixot Conexión con bases de datos 2 17-05-2006 16:18:04
Como creo campos en una tabla Paradox?? JoseQ Conexión con bases de datos 1 13-07-2004 19:07:09
Como creo, inserto y leo un txt desde delphi? danytorres Varios 5 28-11-2003 21:17:17


La franja horaria es GMT +2. Ahora son las 16:44:09.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi