Zitat von
Jelly:
Du hast doch sicherlich irgendwo eine TQuery oder TADOQuery o.ä. Komponente auf deiner Form liegen, über die du den
SQL Befehl ausführst. Und diese hat auch Ereignisse, und eins davon ist ein, das ausgelöst wird, wenn sich der Cursor ändert, sprich wenn du auf einen anderen Datensatz springst. Und daruaf muss du reagieren, denn wenn du auf den Betrieb 27 gehst, musst du dir diese 27 ja aus der 1.
Query rausziehen, und als Parameter in der 2.
Query nutzen.
Ich habe das jetzt mal in das AfterScroll-Ereignis ausgelagert, aber jetzt bekomme ich einen "list index out of bounds (0)" Error.
Delphi-Quellcode:
procedure TForm1.ADOQuery1AfterScroll(DataSet: TDataSet);
begin
with ADOQuery2
do begin
Close;
SQL.Clear;
Parameters[0].Value:=AdoQuery1.FieldByName('
pbID').AsInteger;
SQL.Add('
SELECT sName FROM schueler WHERE sBetrieb=:id');
Open;
end;
end;