SQL / qQuery /Grid Datensätze markieren und SQL-Text umschr

bockwurst · Beiträge: 191 win98 /XP D1 D5 Prof DE2005PE

Hallo zusammen,
habe noch eine Frage. Wenn ich dann die gefundenen Datensätze durch eine SQL-Filter in einem Grid stehen haben, gibt es dann eine einfache Möglichkeit, im Grid die Datensätze zu markieren und den SQL-Text zu umzuschreiben, daß nur die markierten Datensätze im Grid gefunden werden

Vielen Dank

Andreas

bockwurst · Beiträge: 191 win98 /XP D1 D5 Prof DE2005PE

Habe selbst eine Lösung gefunden

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

if DBGrid1.SelectedRows.Count > 0
    then begin
           s:='';
           sText:='';

           with DBGrid1.DataSource.DataSet do
             for i:=0 to DBGrid1.SelectedRows.Count-1 do
             begin
               GotoBookMark(pointer(DBGrid1.SelectedRows.Items[i]));
               s:=Fields[0].AsString;
               if i=0 then sText:= 'WHERE(A.Nummer = "' + s + '")'
                      else sText:= sText + 'OR (A.Nummer = "' + s +'")';
             end;
            .....

Moderiert von UGrohne: Delphi-Tags hinzugefügt.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme