Create Index no Paradox
Bom dia,
Gostaria de saber como faço pra cirar INDEX via código no PARADOX
uso D5
Gostaria de saber como faço pra cirar INDEX via código no PARADOX
uso D5
Facc
Curtidas 0
Respostas
Facc
13/09/2005
sobe
GOSTEI 0
Edilcimar
13/09/2005
exemplo com índice primário e secundário
With Table1 do
Begin
TableName := ´CLIENTES´;
AddIndex(´´,´NumCliente´,[ixPrimary, ixUnique]);
AddIndex(´CgcCliente´,´CGC´,[ixCaseInsensitive]);
Open;
IndexDefs.Update;
For I := 0 to IndexDefs.Count -1 do
IndexName := IndexDefs.Items[I].Name;
Close;
End;
With Table1 do
Begin
TableName := ´CLIENTES´;
AddIndex(´´,´NumCliente´,[ixPrimary, ixUnique]);
AddIndex(´CgcCliente´,´CGC´,[ixCaseInsensitive]);
Open;
IndexDefs.Update;
For I := 0 to IndexDefs.Count -1 do
IndexName := IndexDefs.Items[I].Name;
Close;
End;
GOSTEI 0