Fórum alterar campo da tabela em execução #190672

Para criar uma tabela eu faço assim:

Table1.DatabaseName := DirectoryListBox1.Directory;
Table1.TableName := ´WPALU.DB´;
Table1.TableType := ttParadox;
with Table1.FieldDefs do Begin
Clear;
Add(´ALCOD´, ftString, 5, true);
Add(´ALNOME´, ftString, 40, false);
Add(´ALDTNAS´, ftDate, 0, false);
end;
//Chave primária
with Table1.IndexDefs do begin
Clear;
Add(´´, ´ALCOD´, [ixPrimary]);
end;
Table1.CreateTable;
Table1.Open;
Except
MessageDlg(´Error na Criação da Tabela ou Índice WPALU.DB´, mtError, [mbOK],0);
end;


Mas como alterar a tabela ?

Obrigada
Debora