Indexfehler ??

[Fritz01]

Hallo,
ist schon spät geworden.
Habe es mal so gemacht und es hat sich nur etwas verändert.
Die erste Tabelle wird geöffnet, ein Index auf PLZ und Index gelöscht.
Eine Andere läßt sich nun öffnen, aber kommt dann der Click für den Index kommt die Fehlermeldung: Zugriffsverletzung
Ich kriegs nicht gebacken, aber nur nicht aufgeben!

Zitat:

Was verbirgt sich hinter der Funktion/Prozedur SelectTable()?

Delphi-Quellcode:

procedure TfrmMain.SelectTable(Name: String='');
var
 i: Integer;              
begin
  if (name <> '') then for i:=1 to TreeView.Items.Count-1 do
  if AnsiUpperCase(TreeView.Items[i].Text) = AnsiUpperCase(Name) then
  begin
    TreeView.Selected := TreeView.Items[i];
    Break;
  end;
end;

Erst mal genug für heute, morgen werde ich weitersehen.
Fritz