qry0 liefert ja die Tabellennamen, deshalb darfst du sie schon mal nicht schließen!
und dann musst du natürlich den Tabellennamen aus qry0 auch nehmen und nicht den aus 1:
Delphi-Quellcode:
procedure TForm5.DBGrid0CellClick(Column: TColumn);
begin
//qry0.Active := False;
qry1.Active := False;
qry1.SQL.Text := 'SELECT * FROM ' + qry0.Fields.Fields[index].Value;
qry1.Active := True;
end;
Ich ging mal davon aus das index das richtige Feld meint? Wenn du das
SQL-Statement von qry0 zeigen würdest könnte man es genauer sagen.
So ist evtl. besser:
qry1.SQL.Text := 'SELECT * FROM ' + qry0.FieldByName('Tabellenname').AsString;