Criar tabela..iniciante..
ola pessoal sou iniciante e gostaria de saber:
Como criar uma tabela no IB, com os seguintes dados
tabela ´PROFESSORES´
CODIGO (auto incremento)
NOME (indiceprimario)
DATANASCIMENTO
PONTOS
FILHOS
FAIXA
CATEGORIA
[]´s
Junior
Como criar uma tabela no IB, com os seguintes dados
tabela ´PROFESSORES´
CODIGO (auto incremento)
NOME (indiceprimario)
DATANASCIMENTO
PONTOS
FILHOS
FAIXA
CATEGORIA
[]´s
Junior
Anonymous
Curtidas 0
Respostas
Romeusql
23/02/2003
tente assim :
Create table PROFESSORES (
CODIGO INTEGER NOT NULL ,
NOME VARCHAR(60) NOT NULL PRIMARY KEY,
DATANASCIMENTO DATE,
PONTOS NUMERIC,
FILHOS VARCHAR(30),
FAIXA vARCHAR(20),
CATEGORIA vARCHAR(10)
);
oBS :(auto incremento) NÃO EXISTE NO INTERBASE AI VC TEM QUE CRIAR TRIGRES E STORES PROCEDURES
Create table PROFESSORES (
CODIGO INTEGER NOT NULL ,
NOME VARCHAR(60) NOT NULL PRIMARY KEY,
DATANASCIMENTO DATE,
PONTOS NUMERIC,
FILHOS VARCHAR(30),
FAIXA vARCHAR(20),
CATEGORIA vARCHAR(10)
);
oBS :(auto incremento) NÃO EXISTE NO INTERBASE AI VC TEM QUE CRIAR TRIGRES E STORES PROCEDURES
GOSTEI 0
Jfalexandre
23/02/2003
Olha para aprendizado, é melhor desenvolver tabelas no Paradox, utilizando o DataBase Desktop, é bem mais fácil de assimilar todos os dados que vc colocou no seu pedido de ajuda!
Caso se interesse, entre em contato comigo que mando um esquinha explicando passa a passo!
Valeu!
Caso se interesse, entre em contato comigo que mando um esquinha explicando passa a passo!
Valeu!
GOSTEI 0
Dor_poa
23/02/2003
Criar um arquivo em tempo de execução é relativamente simples, você tem que criar uma instância do objeto TTable, esse objeto(de uma lida no Help TTable e suas propriedades e metodos) tem um método de criação e um de Criar tabela.
Depois disso é só definir as propriedades da nova tabela:
DatabaseName := ´c:\lista´;
TableName := ´Produtos.dbf´;
TableType := ttDbase;
os campos da tabela:
Add(´codigo´, ftString,7, false);
Add(´Nome´, ftString, 45, false);
e os índices:
Add(´prod1´, ´codigo´, []);
Add(´prod2´, ´Fornecedor´, []);
com todos os dados devidamente setados:
CreateTable;
Procedure TMainForm.Inicializa;
var
Table1 : TTable;
begin
{ Criar componente TTable }
Table1 := TTable.create(Application);
{ Definições de Campos e criação do arquivo }
with Table1 do
begin
DatabaseName := ´c:\lista´;
TableName := ´Produtos.dbf´;
TableType := ttDbase;
with FieldDefs do
begin
Clear;
Add(´codigo´, ftString,7, false);
Add(´Nome´, ftString, 45, false);
Add(´Fornecedor´, ftString, 5,false );
Add(´Custo´, ftCurrency, 0, false );
Add(´Venda´, ftCurrency, 0, false );
end;
with IndexDefs do
begin
Clear;
Add(´prod1´, ´codigo´, []);
Add(´prod2´, ´Fornecedor´, []);
end;
CreateTable;
end;
end;
Utilizando o tipo ftCurrency, formato de valores do sistema financeiro, o Delphi cria um campo Dbase com N,20,4
Depois disso é só definir as propriedades da nova tabela:
DatabaseName := ´c:\lista´;
TableName := ´Produtos.dbf´;
TableType := ttDbase;
os campos da tabela:
Add(´codigo´, ftString,7, false);
Add(´Nome´, ftString, 45, false);
e os índices:
Add(´prod1´, ´codigo´, []);
Add(´prod2´, ´Fornecedor´, []);
com todos os dados devidamente setados:
CreateTable;
Procedure TMainForm.Inicializa;
var
Table1 : TTable;
begin
{ Criar componente TTable }
Table1 := TTable.create(Application);
{ Definições de Campos e criação do arquivo }
with Table1 do
begin
DatabaseName := ´c:\lista´;
TableName := ´Produtos.dbf´;
TableType := ttDbase;
with FieldDefs do
begin
Clear;
Add(´codigo´, ftString,7, false);
Add(´Nome´, ftString, 45, false);
Add(´Fornecedor´, ftString, 5,false );
Add(´Custo´, ftCurrency, 0, false );
Add(´Venda´, ftCurrency, 0, false );
end;
with IndexDefs do
begin
Clear;
Add(´prod1´, ´codigo´, []);
Add(´prod2´, ´Fornecedor´, []);
end;
CreateTable;
end;
end;
Utilizando o tipo ftCurrency, formato de valores do sistema financeiro, o Delphi cria um campo Dbase com N,20,4
GOSTEI 0