Ich habe mich für IBDataset entschieden. Daraufhin ein Checkbox click event erzeugt. Mit der IBCheckbox verknüpft, kompiliert(funktioniert), und jetzt bekomme ich mehrere Fehlermeldungen. Achso, mittlerweile liegt zu Versuchszwecken ein zweites Dataset auf der Form.
Delphi-Quellcode:
procedure TForm1.AbfrageClick(Sender: TObject);
begin
with IBDataSet1 do
begin
Active := False;
SelectSQL.Clear;
SelectSQL.Text :=('Select * from Tabelle ');
Active := True;
end;
end;
procedure TForm1.DBCheckBox1Click(Sender: TObject);
begin
if DBCheckBox1.Checked = true then
begin
with IBDataSet1 do
begin
Close;
ModifySQL.Clear;
ModifySQL.Text :=('UPDATE Tabelle SET FELD = :FELD WHERE ID = :ID1');
Open;
end;
end;
end;
Nach Aufruf des Abfrageclicks erscheint Fehlermeldung Stackoverflow. Mit F7 durchgeklickt wurde schnell klar, der Checkbox1Click wird bereits aufgerufen bevor der Abfrageclick beendet wird. in der Datenbank sind 15 Datensätze, das CheckboxClick event wurde 15 mal aufgerufen.
Mit IBDataset2 im Checkboxclick event erscheint Fehlermeldung EmptySQL.
Also langsam verzweifele ich.