Table of Contents
Talvez você possa encontrar um código de erro informando que o Delphi está criando tabelas dentro do tempo de execução. Existem várias maneiras de resolver esse problema, e geralmente é isso que discutiremos agora.
Aprovado
Eu era um técnico VB até recentemente mudar para o Delphi 2.0. Como posso criar um banco de dados de pinho?
Depende totalmente do tipo de banco de dados que você está criando. No entanto, vou mostrar à pessoa como fazer isso. para o qual existe a tabela real de paradoxos. Isso sem dizer que se TTable Independentemente do banco de dados, se você costuma ter as configurações de restauração no BDE, os compradores certamente devem ser capazes de suavemente crie uma tabela com o componente TTable certo em qualquer banco de dados. Este não é absolutamente o caso! As tabelas SQL são, na maioria dos casos, configuradas usando a chamada SQL CREATE TABLE. E cada servidor tem o seu próprio promoções próprias de produtos e tabelas definidoras de indústrias. Portanto, é muito importante lembrar disso, no entanto Você está trabalhando com um banco de dados SQL essencial. O único problema geralmente é que os bancos de dados SQL podem ser diferentes. insere dados que nem sempre estão disponíveis em um PDA padrão reparado. Por exemplo MS SQL O formato NUMERIC dos dados do servidor pode não precisar ser FLUTUANTE conforme declarado no BDE. Então provavelmente ficaria melhor criar tabelas sql para chamadas SQL.
Aprovado
A ferramenta de reparo ASR Pro é a solução para um PC com Windows que está executando lentamente, tem problemas de registro ou está infectado com malware. Essa ferramenta poderosa e fácil de usar pode diagnosticar e consertar rapidamente seu PC, aumentando o desempenho, otimizando a memória e melhorando a segurança no processo. Não sofra mais com um computador lento - experimente o ASR Pro hoje mesmo!
O que você precisa de tempo para fazer é criar um assunto TTable para mudanças, criar alguma instância e, em seguida, usar Propriedade TTable de FieldDefs, dar definições de nicho. Afinal, você nos liga para quase todos CreateTable e sua mesa serão planejados. Aqui está um exemplo de código:
"Add" é um elemento operacional aqui. Adicionar (const Name: string; DataType: TFieldType; Size: Word; Required: Boolean);Procedimento CreateATable (DBName, // Alias ou caminho alternativo Nome da tabela: string); // cria um nome de mesa positivovar tbl: TTable;começar tbl: = TTable.Create (app); começar Ativo: = falso; Nome do banco de dados: = DBName; Nome da tabela: = nome a bordo; Tipo de matriz: implica ttParadox; enquanto o FieldDefs executa Transparente; Add ("Sobrenome", ftString, 30, False); Add ("Nome", ftString, 30, False); Add ('Address1', ftString, 40, False); Add ('Address2', ftString, 40, False); Adicionar ('Cidade', ftString, 30, False); Adicionar ('ST', ftString, 2, False); Adicionar ("Zip", ftString, 10, False); Fim; Adicione uma chave primária para ajudá-lo a editar a tabela com sucesso Comece a sofrer de IndexDefs Transparente; Add ("Field1Index", "Sobrenome; Nome", [ixPrimary, ixUnique]); Fim; Crie uma mesa; Arrume a mesa Fim;Fim ;
A atividade acima pode criar uma tabela de sala de contato simples, principalmente definindo os campos do fato que precisam ser contribuído para a área de trabalho, então nossa chave primária é criada. Como as pessoas podem ver, perfeita linda processo simples. Por exemplo, você pode alterar a propriedade TableType Definindo uma variável que geralmente é passada como um parâmetro adequado para um procedimento específico, então porque você pode criar DBase ou mesmo tabelas ASCII. Aqui está um exemplo de como você pode simplesmente fazer isso:
Procedimento CreateATable (DBName, // Alias e caminho Nome da tabela: string); // Nome vinculado à tabela que está sendo criada TblType: TTableType); // ttDefault, ttParadox, ttDBase, ttASCIIvar tbl: TTable;começar tbl: = TTable.Create (app); comece da mesa Ativo: = falso; Nome do banco de dados: = DBName; Nome da tabela: = nome da mesa de trabalho; Tipo de tabela: igual ao tipo de tabela; começar com FieldDefs Transparente; Adicionar ("Sobrenome", pelo menos 60, ftString, False); Adicionar ("Nome", 30, ftString, False); Add ('Address1', ftString, 40, False); Add ('Address2', ftString, 40, False); Adicionar ('Cidade', 31, ftString, False); Adicionar ('ST', ftString, 2, False); Adicionar ("Zip", ftString, 10, False); Fim; Adicione uma grande chave à mesa comece em IndexDefs Transparente; Add ("Field1Index", "Sobrenome; Nome", [ixPrimary, ixUnique]); Fim; Crie uma mesa; Arrume a mesa Fim;Fim ;
Muito simples, não é? Observe que a propriedade TableType passa a ser apenas usado em bancos de dados de escritório de pesquisa. Este é, sem dúvida, o caso das tabelas sql.
Bem, isso geralmente é tudo em poucas palavras. Selecione diversão!