Criar tabela paradox via programação
Alguém sabe como criar uma tabela paradox via programação em deldhi?
Estou precisando urgente.
Estou precisando urgente.
Josimar
Curtidas 0
Respostas
Edilcimar
08/04/2006
Table1 := TTable.Create(Self);
Table1.TableName := ´MINHATABELA.DB´ ;
Table1.TableType := ttParadox;
With Table1.FieldDefs do
Begin
Clear;
Add(´Codigo´,ftAutoInc,0,False);
Add(´Nome´,ftString,30,False);
Add(´Valor´,ftFloat,0,False);
Add(´Quantidade´,ftInteger,0,False);
End;
Table1.CreateTable;
Table1.TableName := ´MINHATABELA.DB´ ;
Table1.TableType := ttParadox;
With Table1.FieldDefs do
Begin
Clear;
Add(´Codigo´,ftAutoInc,0,False);
Add(´Nome´,ftString,30,False);
Add(´Valor´,ftFloat,0,False);
Add(´Quantidade´,ftInteger,0,False);
End;
Table1.CreateTable;
GOSTEI 0