Como recriar os indices apagados ou descorromper arquivos
Se alguem puder me ajudar ficarei muito grato, pois tenho tentado buscar em muitos sites esta resposta até encontrei o clube do delphi. :D
Machado
Curtidas 0
Respostas
Mabel
17/07/2003
Não sei se eh isso que vc procura, mas tente o seguinte pra recriar os índices de uma TTable:
with Table1 do
begin
DataBaseName := ´C:\TESTE´;
TableName := ´TESTE.DB´;
Active := False;
Exclusive := True;
AddIndex(´TESTE_0´,´CAMPO_1´,[ixPrimary]); //caso de indice primário
AddIndex(´TESTE_1´,´CAMPO_2´,[ixCaseInsensitive]);
end;
Para mais detalhes faça uma pesquisa em um SITE (CADE, por exemplo) sobre DELPHI e pegue alguns exemplos-fonte.
Falow, jovem!
:shock:
with Table1 do
begin
DataBaseName := ´C:\TESTE´;
TableName := ´TESTE.DB´;
Active := False;
Exclusive := True;
AddIndex(´TESTE_0´,´CAMPO_1´,[ixPrimary]); //caso de indice primário
AddIndex(´TESTE_1´,´CAMPO_2´,[ixCaseInsensitive]);
end;
Para mais detalhes faça uma pesquisa em um SITE (CADE, por exemplo) sobre DELPHI e pegue alguns exemplos-fonte.
Falow, jovem!
:shock:
GOSTEI 0