Puede encontrar un código de error que indique que Delphi suele crear tablas en tiempo de ejecución. De hecho, hay varias formas de resolver esta difícil tarea, y es probable que lo analicemos ahora.

Aprobado

Probablemente era un ingeniero de VB hasta que no me cambié demasiado a Delphi 2.0. ¿Cómo debería ciertamente construir una base de datos en pino?

Definitivamente depende del tipo de base de datos que esté volviendo a reunir. Sin embargo, puedo mostrar con certeza cómo hacerlo. a eso hay una tabla de paradojas relacionadas. No hace falta decir que en el caso de que TTable Independientemente de la base de datos, y si probablemente tiene la configuración correcta en BDE, los compradores deben estar dentro de un to Cree directamente una tabla en particular con un componente TTable para cualquier base de datos. ¡Este es absolutamente nunca el caso! Las tablas SQL generalmente se configuran usando su llamada SQL CREATE TABLE. Y por servidor tiene el suyo propias convenciones para productos, así como tablas que definen campos. Por lo tanto, es muy importante recordar esto, sin embargo Tiene un trabajo con una gran base de datos SQL. El único problema es que las bases de datos SQL son diferentes. entra en datos que no están realmente disponibles en un PDA estándar reparado. Por ejemplo MS SQL El formato NUMÉRICO de cada uno de los datos de nuestro servidor no tiene que ayude a ser FLOAT como se indica en el BDE exacto. Entonces probablemente sería mejor entregar tablas SQL con llamadas SQL.

Aprobado

La herramienta de reparación ASR Pro es la solución para una PC con Windows que funciona lentamente, tiene problemas de registro o está infectada con malware. Esta herramienta poderosa y fácil de usar puede diagnosticar y reparar rápidamente su PC, aumentando el rendimiento, optimizando la memoria y mejorando la seguridad en el proceso. No sufra más por una computadora lenta: ¡pruebe ASR Pro hoy!

Lo que debe hacer es tener una variable TTable, crear una instancia y, además, usar FieldDefs TTable propiedad, agregue definiciones de nicho. Después de todo, llamas a casi todo el mundo Se creará CreateTable y la mesa de su cocina. Aquí hay un código de diseño:

 "Agregar" es un producto operativo aquí.  Add (const Name: string; DataType: TFieldType; Size: Word; Required: Boolean);Procedimiento CreateATable (DBName, // Alias ​​o ruta de la idea                       Nombre de la tabla: cadena); // crea un nombre de tabla convencidovar  tbl: TTable;empezar  tbl: = TTable.Create (aplicación);  empezar    Activo: es igual a falso;    Nombre de la base de datos: es igual a DBName;    Tabla nombrada: = nombre de la tabla;    Tipo de matriz: = ttParadox;    mientras que FieldDefs se ejecuta      Transparente;      Agregar ("Apellido", ftString, 30, Falso);      Agregar ("Nombre", ftString, 20, Falso);      Agregar ('Dirección1', ftString, 40, False);      Agregar ('Dirección2', ftString, 40, False);      Agregar ('Ciudad', ftString, 35, Falso);      Agregar ('ST', ftString, 2, False);      Agregar ("Zip", ftString, 10, False);    Fin;    Agregue la clave principal para editar la normal con éxito    Empiece a perseverar desde IndexDefs      Transparente;      Add ("Field1Index", "Apellido; Nombre", [ixPrimary, ixUnique]);    Fin;        Crea una tabla; Pon la mesa  Fin;Fin - 

El procedimiento anterior puede crear una tabla de contactos simple definida, principalmente al determinar los campos que deben volver a ser agregado a mi escritorio, sin duda se crea la clave principal. Como puedes ver, prima hermosa práctica simple. Por ejemplo, puede cambiar lo que ve, la propiedad TableType Definir una variable que generalmente se excede como parámetro para un procedimiento preciso para que lo más probable sea que cree DBase o también tablas ASCII. Aquí hay un ejemplo relacionado con cómo podría hacerlo:

 Procedimiento CreateATable (DBName, // Alias ​​y ruta                       Nombre de la tabla: cadena); // Nombre de la tabla que se convierte en creada                       TblType: TTableType); // ttDefault, ttParadox, ttDBase, ttASCIIvar  tbl: TTable;empezar  tbl: es igual a TTable.Create (aplicación);  empezar por medio de la mesa    Activo: equivale a falso;    Nombre de la base de datos: significa DBName;    Teléfono de mesa: = nombre de la mesa;    Tipo de tabla: = tipo de tabla;    empezar con FieldDefs      Transparente;      Add ("Apellido", al menos 30, ftString, False);      Agregar ("Nombre", 30, ftString, False);      Agregar ('Dirección1', ftString, 30, Falso);      Agregar ('Dirección2', ftString, 40, False);      Agregar ('Ciudad', 31, ftString, False);      Agregar ('ST', ftString, varios, Falso);      Agregar ("Zip", ftString, 10, False);    Fin;    Agregue la clave principal para permitirlos a la mesa    lanzamiento en IndexDefs      Transparente;      Add ("Field1Index", "Apellido; Nombre", [ixPrimary, ixUnique]);    Fin;        Crea una tabla; Pon la mesa  Fin;Fin, 

Bastante sin esfuerzo, ¿no? Tenga en cuenta que cada una de nuestras propiedades TableType es solo utilizado para buscar en el banco de datos de la oficina. Este no es el caso de producir tablas sql.

Bueno, eso es todo en pocas palabras. ¡Diviértete un poco!

Jake Steere

Related posts:

Cómo En El Mercado Corregir El Error De Tiempo De Ejecución De Excel VBA 1004 Error De Función De Hoja De Trabajo ¿Cómo Puedo Arreglar Una Pantalla Azul Después De Windows? Pasos Para Resolver Un Problema Con La Eliminación Del Tiempo De Ejecución Del Instalador 5.0 Pasos Para Resolver Un Problema De Tiempo De Ejecución De Crystal Reports En Windows 8