Moin Leute,
*delphi-Newbie*
ich hab jetzt lange das Forum durchsucht, konnte aber zu meinem Problem nichts finden. Vielleicht bin ich auch nur blind^^
Nun denn,
ich hab
Code:
DataBase0(TIBDataBase), Transaction0(TIBTransaction), qry0(TIBQuery), DataSource0(TDataSource)
qry1(TIBQuery), DataSource1(TDataSource)
DBGrid0, DBGrid1
Ich hab meine Firebird Datenbank angebunden und die Tabellennamen erscheinen, wie sie sollen, im DBGrid0. Funktioniert also bis hier hin.
Nun möchte ich auf eine der angezeigten Tabellen in DBGrid0 klicken und die Datensätze der geklickten Tabelle sollen in DBGrid1 erscheinen.
Jedoch weiß ich nicht so recht wie das gehen soll.
Ich hab bei
qry1
als
DataSource die
DataSource0
gesetzt. Und bei
DataSource1
hab ich als
DataSet die
qry1
gesetzt.
Dann hab ich ein
OnCellClick auf
DBGrid0
erzeugt. Ich weiß allerdings nicht wie ich eine unbekannte Zeile in DBGrid0 anspreche.
Vermutlich ist das Problem sehr einfach zu lösen.
Ich hoffe ihr versteh meine Problemerläuterung und könnt mir weiterhelfen^^
Gru0
Kratos
EDIT:
dataset.fieldbyname('feldname').asirgendwas
Ist das des Rätsels Lösung?
Ich probiere es gleich mal.
EDIT2:
Ich scheine immer noch etwas falsch zu machen.
Code:
procedure TForm5.DBGrid0CellClick(Column: TColumn);
begin
qry0.Active := False;
qry1.Active := False;
qry1.SQL.Text := 'SELECT * FROM ' + qry1.Fields.Fields[index].Value;
qry1.Active := True;
end;
Fehler: qry1: Listenindex außerhalb des gültigen Bereichs (0)