dbCheckbox und dbGrid mit Abfrage

[mkinzler]

Die onClick-Methode ist unnötig

Delphi-Quellcode:

procedure TForm1.AbfrageClick(Sender: TObject);
begin
    IBDataSet1.SelectSQL.Text :='Select * from Tabelle;';
    iBDataSet1.ModifySQL.Text := 'UPDATE Tabelle SET FELD = :FELD WHERE ID = :old_ID;';
    IBDataSet1.Open;
end;

[blutigerAnfänger]

Verdammt schwer zu begreifen, daß es keinen ClickEvent für Checkbox geben soll, da es ja erst beim Drücken auf die Checkbox eine Änderung geben sollte.

[Sir Rufo]

Zitat von blutigerAnfänger:

Verdammt schwer zu begreifen, daß es keinen ClickEvent für Checkbox geben soll, da es ja erst beim Drücken auf die Checkbox eine Änderung geben sollte.

Da kommt es ja auch zur Änderung, aber du arbeitest hier mit "data aware" Controls, und das heißt übersetzt, dass diese Controls sich ihres Datenkontextes bewusst sind. Nur darum funktioniert diese automatische Weitergabe der Werte. Wofür gibts du bei der Komponente wohl das DataSet und den Feldnamen an?

Wenn du dann während des Klicks an der Grundlage herumpfuschst (DataSet schließen) dann rummst eben im Gebälk.

[Jumpy]

Wenn du keine Checkbox im Grid betrachtest, sondern mal ein Edit-Feld. Wenn du da den Wert in dem Feld änderst gehst du doch auch davon aus, dass diese Änderung automatisch weitergegeben wird. Andernfalls müsstest du ja für jedes Edit-Felds eines Grids ein eigenes OnChange-Event erstellen.

[blutigerAnfänger]

Es funktioniert. Danke, daß ihr Euch die Köpfe zerbrochen habt.

[Perlsau]

Zitat von blutigerAnfänger:

Es funktioniert. Danke, daß ihr Euch die Köpfe zerbrochen habt.

Und woran hat's jetzt gelegen?

[blutigerAnfänger]

Zitat von Perlsau:

Zitat von blutigerAnfänger:

Es funktioniert. Danke, daß ihr Euch die Köpfe zerbrochen habt.

Und woran hat's jetzt gelegen?

Ich wollt, ich wüßte es.

Eigentlich wollte ich die Abfrage jetzt selber schreiben, denn bisher habe ich ja nur die gesamte Tabelle abgefragt.

Delphi-Quellcode:

procedure TForm1.AbfrageClick(Sender: TObject);
begin
    IBDataSet1.SelectSQL.Text :='Select * from Tabelle;';
    IBDataSet1.Open;
end;

Doch da stimmt etwas nicht.

Delphi-Quellcode:

procedure TForm1.AbfrageClick(Sender: TObject);
begin
StringNAME := '____';
StringBEZEICHNUNG := '%'; 
  with IBDataSet1 do
    begin      
      Active:=False;
      SelectSQL.Clear;
      SelectSQL.Add('Select * from Tabelle2 where NAME Like :text1 ');
      SelectSQL.Add('And Upper (BEZEICHNUNG) Like Upper (:text2) ');
      ParamByName('text1').asString := StringNAME;
      ParamByName('text2').asString := StringBEZEICHNUNG;
      Active:=True;
    end;
end;

Hiermit frage ich alle Datensätze, welche 4 Buchstaben haben, ab.
In der gesamten Tabelle2 sind einige tausend Treffer vorhanden, angezeigt werden 0, Null, nichts, gar nichts.
Ersetze ich die vier Unterstriche in StringNAME durch ein Prozentzeichen funktioniert die Abfrage, allerdings werden auch alle Datensätze angezeigt.
In der Vorversion dieses Programms hat doch noch alles funktioniert. Dort hatte ich nur die Felder Name und Bezeichnung. Hier sind es ja noch die Felder Combobox, und das ID Feld.
Woran liegt das?
Achso In der Vorversion war es eine Query.