FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Para verdaderos conocedores de Delphi y Bases
Tengo un problema creando tabla, utilizando los metodos de findtableid para saber si ya existe la table (por medio de un edit.text ingreso el nombre dela tabla) al ejecutar aparece el mensaje de error filename too long for a paradox5.0 table, el tipo de tabla creada es ttdefault
|
#2
|
||||
|
||||
Para empezar el fallo que te da es supuestamente que el nombre de la tabla es demasiado largo para la versión 5.0 de Paradox, pero como no vemos el código que utilizas para crear la tabla, no sabemos donde puede estar el fallo.
Aquí tienes un ejemplo de creación de tabla: Código:
{ Hier ein Beispiel, wie man schnell eine Paradox Tabelle mit einigen definierten Feldern mittels SQL erzeugen kann. } procedure TForm1.Button1Click(Sender: TObject); begin with Query1 do begin DatabaseName := 'DBDemos'; with SQL do begin Clear; { CREATE TABLE erzeugt eine Tabelle mit einem angegebenen Namen in der aktuellen Datenbank } Add('CREATE TABLE "PDoxTbl.db" (ID AUTOINC,'); Add('Name CHAR(255),'); Add('PRIMARY KEY(ID))'); { Mit ExecSQL wird die Anweisung ausgeführt, welche aktuell in der Eigenschaft SQL enthalten ist. } ExecSQL; Clear; Add('CREATE INDEX ByName ON "PDoxTbl.db" (Name)'); ExecSQL; end; end; end; Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
||||
|
||||
La manera que uso para averiguar si una tabla existe proviene del ejemplo de CreateTable que da Delphi:
Código:
{ Table es una componente TTable } Table.Active := false; Table.DatabaseName = 'base de datos'; Table.TableType := ttParadox; Table.TableName := 'tabla'; if Table Exists then { la tabla existe } |
|
|
|