Problem beim Füllen eines dbadvgrid's mit sqlquery

[JBlocher]

Hurrah, ich hab's geschafft!

Mit einer ADOConnection zum MSSQL-Server und einer ADOQuery, die direkt dem Dataset der DataSource zugewiesen wird, lässt sich das DBAdvGrid dann wunderschön programmgesteuert (hier zum Testen über einen Button) mit Datensätzen aus einer SQL-Abfrage füllen:

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
Var Artikel: Array[1..5] of String =
   ('4500101','3002001','D3552900','CA2540203','1201600');
begin
   ADOQuery1.Prepared := True;
   SQLStr := 'Select Bemerkung from aplanpos where aplan = ' +
              chr(39) + Artikel[i] + Chr(39) +
             'Order by position';
   ADOQuery1.Active := False;
   ADOQuery1.SQL.Clear;
   ADOQuery1.SQL.Add(SQLStr);
   ADOQuery1.Active := True;
   If i > 4 then i:= 1 else inc(i)
end;

Zugegeben, ohne die wertvollen Infos hier aus dem Forum wäre ich da nicht so schnell weitergekommen. Das ist eine prima Sache hier, das muss ich schon sagen.

Nochmals vielen Dank und Grüße Jürgen