Hallo
Kann mir jemand sagen wie ich per SQL anweisung gelöschte Datensätze anzeigen kann??
Ich hab schon was geschrieben um Datensätze mit richtig oder Falsch anzuzeigen per aktivieren der CheckBox zeigt es mir nur die Datensätze an die Wahr also True sind. Nun möchte ich aber mit einer anderen Checkbox per Click alle Datensätze anzeigen die gelöscht wurden und die die Exestieren ..einfach alle die je geschrieben wurden..
<pre>
procedure TForm1.CBox1Click(Sender: TObject);
begin
if CBox1.Checked = true then
begin
DM.Q1.Active := False; with DM.Q1 do begin
with SQL do begin
Clear;
Add('SELECT * FROM Name WHERE (Name.Aktive)=True');
end;
Open;
end;
Dm.Q1.Active := True; end else
begin
DM.Q1.Active := False; with DM.Q1 do begin
with SQL do begin
Clear;
Add('SELECT * FROM Name');
end;
Open;
end;
Dm.Q1.Active := True;
end;
end;
</pre>
Dies ist der code um alle Datensätze anzuzeigen die Wahr sind in der Spalte Active ..
MFG Nik
Kann mir jemand sagen wie ich per SQL anweisung gelöschte Datensätze anzeigen kann??
Ich hab schon was geschrieben um Datensätze mit richtig oder Falsch anzuzeigen per aktivieren der CheckBox zeigt es mir nur die Datensätze an die Wahr also True sind. Nun möchte ich aber mit einer anderen Checkbox per Click alle Datensätze anzeigen die gelöscht wurden und die die Exestieren ..einfach alle die je geschrieben wurden..
<pre>
procedure TForm1.CBox1Click(Sender: TObject);
begin
if CBox1.Checked = true then
begin
DM.Q1.Active := False; with DM.Q1 do begin
with SQL do begin
Clear;
Add('SELECT * FROM Name WHERE (Name.Aktive)=True');
end;
Open;
end;
Dm.Q1.Active := True; end else
begin
DM.Q1.Active := False; with DM.Q1 do begin
with SQL do begin
Clear;
Add('SELECT * FROM Name');
end;
Open;
end;
Dm.Q1.Active := True;
end;
end;
</pre>
Dies ist der code um alle Datensätze anzuzeigen die Wahr sind in der Spalte Active ..
MFG Nik
Comment