Access - Während der Laufzeit eine neue Spalte hinzufügen

[Boy2melo]

Also:

Ich benütze eine ADOTable mit dem namen 'TDatabase'. Diese ist natürlich an eine ADOConnection gebunden. Wenn das Formular aufgerufen wird, importiert das Programm die derzeitigen Werte der Datenbank in eine Listbox (Das klappt). Nun soll es danach eine neue Spalte in die Datenbank einfügen:

Delphi-Quellcode:

procedure TFRegistration.FormActivate(Sender: TObject);
begin
  TDatabase.open;
  LBResults.clear;

  TDatabase.First;
  while not TDatabase.Eof do                             //Importiert die Datenbank in eine Listbox
    begin
      LBResults.Items.Add(TDatabase.FieldByName('Name').AsString + ' ' + TDatabase.FieldByName('Surname').AsString + ' - ' + TDatabase.FieldByName('D/Base').AsString);               //Name Nachname - Primärschlüssel
      TDatabase.Next;
    end;
end;

Vielen Dank
Boy2